diff options
| -rwxr-xr-x | constants.asm | 1 | ||||
| -rwxr-xr-x | constants/pokemon_constants.asm | 153 | ||||
| -rwxr-xr-x | data/blue_wild_mons.asm | 434 | ||||
| -rwxr-xr-x | data/red_wild_mons.asm | 434 | ||||
| -rwxr-xr-x | main.asm | 231 | ||||
| -rwxr-xr-x | wram.asm | 2 |
6 files changed, 1254 insertions, 1 deletions
diff --git a/constants.asm b/constants.asm index ec27c6f..baa0cbf 100755 --- a/constants.asm +++ b/constants.asm @@ -3,5 +3,6 @@ INCLUDE "vram.asm" INCLUDE "constants/joy_constants.asm" INCLUDE "constants/map_constants.asm" +INCLUDE "constants/pokemon_constants.asm" INCLUDE "constants/song_constants.asm" INCLUDE "constants/sound_effect_constants.asm" diff --git a/constants/pokemon_constants.asm b/constants/pokemon_constants.asm new file mode 100755 index 0000000..89da238 --- /dev/null +++ b/constants/pokemon_constants.asm @@ -0,0 +1,153 @@ +const_value = 1 + + const BULBASAUR ; $1 + const IVYSAUR ; $2 + const VENUSAUR ; $3 + const CHARMANDER ; $4 + const CHARMELEON ; $5 + const CHARIZARD ; $6 + const SQUIRTLE ; $7 + const WARTORTLE ; $8 + const BLASTOISE ; $9 + const CATERPIE ; $a + const METAPOD ; $b + const BUTTERFREE ; $c + const WEEDLE ; $d + const KAKUNA ; $e + const BEEDRILL ; $f + const PIDGEY ; $10 + const PIDGEOTTO ; $11 + const PIDGEOT ; $12 + const RATTATA ; $13 + const RATICATE ; $14 + const SPEAROW ; $15 + const FEAROW ; $16 + const EKANS ; $17 + const ARBOK ; $18 + const PIKACHU ; $19 + const RAICHU ; $1a + const SANDSHREW ; $1b + const SANDSLASH ; $1c + const NIDORAN_F ; $1d + const NIDORINA ; $1e + const NIDOQUEEN ; $1f + const NIDORAN_M ; $20 + const NIDORINO ; $21 + const NIDOKING ; $22 + const CLEFAIRY ; $23 + const CLEFABLE ; $24 + const VULPIX ; $25 + const NINETALES ; $26 + const JIGGLYPUFF ; $27 + const WIGGLYTUFF ; $28 + const ZUBAT ; $29 + const GOLBAT ; $2a + const ODDISH ; $2b + const GLOOM ; $2c + const VILEPLUME ; $2d + const PARAS ; $2e + const PARASECT ; $2f + const VENONAT ; $30 + const VENOMOTH ; $31 + const DIGLETT ; $32 + const DUGTRIO ; $33 + const MEOWTH ; $34 + const PERSIAN ; $35 + const PSYDUCK ; $36 + const GOLDUCK ; $37 + const MANKEY ; $38 + const PRIMEAPE ; $39 + const GROWLITHE ; $3a + const ARCANINE ; $3b + const POLIWAG ; $3c + const POLIWHIRL ; $3d + const POLIWRATH ; $3e + const ABRA ; $3f + const KADABRA ; $40 + const ALAKAZAM ; $41 + const MACHOP ; $42 + const MACHOKE ; $43 + const MACHAMP ; $44 + const BELLSPROUT ; $45 + const WEEPINBELL ; $46 + const VICTREEBEL ; $47 + const TENTACOOL ; $48 + const TENTACRUEL ; $49 + const GEODUDE ; $4a + const GRAVELER ; $4b + const GOLEM ; $4c + const PONYTA ; $4d + const RAPIDASH ; $4e + const SLOWPOKE ; $4f + const SLOWBRO ; $50 + const MAGNEMITE ; $51 + const MAGNETON ; $52 + const FARFETCH_D ; $53 + const DODUO ; $54 + const DODRIO ; $55 + const SEEL ; $56 + const DEWGONG ; $57 + const GRIMER ; $58 + const MUK ; $59 + const SHELLDER ; $5a + const CLOYSTER ; $5b + const GASTLY ; $5c + const HAUNTER ; $5d + const GENGAR ; $5e + const ONIX ; $5f + const DROWZEE ; $60 + const HYPNO ; $61 + const KRABBY ; $62 + const KINGLER ; $63 + const VOLTORB ; $64 + const ELECTRODE ; $65 + const EXEGGCUTE ; $66 + const EXEGGUTOR ; $67 + const CUBONE ; $68 + const MAROWAK ; $69 + const HITMONLEE ; $6a + const HITMONCHAN ; $6b + const LICKITUNG ; $6c + const KOFFING ; $6d + const WEEZING ; $6e + const RHYHORN ; $6f + const RHYDON ; $70 + const CHANSEY ; $71 + const TANGELA ; $72 + const KANGASKHAN ; $73 + const HORSEA ; $74 + const SEADRA ; $75 + const GOLDEEN ; $76 + const SEAKING ; $77 + const STARYU ; $78 + const STARMIE ; $79 + const MR_MIME ; $7a + const SCYTHER ; $7b + const JYNX ; $7c + const ELECTABUZZ ; $7d + const MAGMAR ; $7e + const PINSIR ; $7f + const TAUROS ; $80 + const MAGIKARP ; $81 + const GYARADOS ; $82 + const LAPRAS ; $83 + const DITTO ; $84 + const EEVEE ; $85 + const VAPOREON ; $86 + const JOLTEON ; $87 + const FLAREON ; $88 + const PORYGON ; $89 + const OMANYTE ; $8a + const OMASTAR ; $8b + const KABUTO ; $8c + const KABUTOPS ; $8d + const AERODACTYL ; $8e + const SNORLAX ; $8f + const ARTICUNO ; $90 + const ZAPDOS ; $91 + const MOLTRES ; $92 + const DRATINI ; $93 + const DRAGONAIR ; $94 + const DRAGONITE ; $95 + const MEWTWO ; $96 + const MEW ; $97 diff --git a/data/blue_wild_mons.asm b/data/blue_wild_mons.asm new file mode 100755 index 0000000..2fe50fc --- /dev/null +++ b/data/blue_wild_mons.asm @@ -0,0 +1,434 @@ +BlueStageWildMons: ; 0x1144d +BlueStageViridianCityWildMons: ; 0x1144d + db BULBASAUR + db SQUIRTLE + db SQUIRTLE + db SQUIRTLE + db SQUIRTLE + db SQUIRTLE + db SPEAROW + db NIDORAN_F + db NIDORAN_F + db NIDORAN_F + db NIDORAN_M + db NIDORAN_M + db NIDORAN_M + db POLIWAG + db TENTACOOL + db GOLDEEN + +BlueStagePalleViridianCityonsRare: ; 0x1145d + db BULBASAUR + db BULBASAUR + db BULBASAUR + db SQUIRTLE + db SPEAROW + db SPEAROW + db NIDORAN_F + db NIDORAN_F + db NIDORAN_M + db NIDORAN_M + db POLIWAG + db POLIWAG + db TENTACOOL + db TENTACOOL + db GOLDEEN + db GOLDEEN + +BlueStageViridianForestWildMons: ; 0x1146d + db CATERPIE + db CATERPIE + db CATERPIE + db CATERPIE + db CATERPIE + db PIDGEY + db PIDGEY + db PIDGEY + db PIDGEY + db PIDGEY + db RATTATA + db RATTATA + db RATTATA + db RATTATA + db RATTATA + db PIKACHU + +BlueStageViridianForestWildMonsRare: ; 0x1147d + db CATERPIE + db CATERPIE + db CATERPIE + db WEEDLE + db WEEDLE + db PIDGEY + db PIDGEY + db RATTATA + db RATTATA + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + +BlueStageMtMoonWildMons: ; 0x1148d + db RATTATA + db SPEAROW + db SPEAROW + db EKANS + db EKANS + db SANDSHREW + db SANDSHREW + db ZUBAT + db ZUBAT + db PARAS + db PARAS + db PSYDUCK + db GEODUDE + db GEODUDE + db KRABBY + db GOLDEEN + +BlueStageMtMoonWildMonsRare: ; 0x1149d + db EKANS + db EKANS + db SANDSHREW + db SANDSHREW + db CLEFAIRY + db CLEFAIRY + db CLEFAIRY + db CLEFAIRY + db CLEFAIRY + db CLEFAIRY + db ZUBAT + db ZUBAT + db PARAS + db PARAS + db GEODUDE + db GEODUDE + +BlueStageCeruleanCityWildMons: ; 0x114ad + db CATERPIE + db CATERPIE + db PIDGEY + db MEOWTH + db MEOWTH + db MEOWTH + db PSYDUCK + db ABRA + db ABRA + db BELLSPROUT + db BELLSPROUT + db BELLSPROUT + db BELLSPROUT + db BELLSPROUT + db KRABBY + db GOLDEEN + +BlueStageCeruleanCityWildMonsRare: ; 0x114bd + db WEEDLE + db NIDORAN_M + db MEOWTH + db MEOWTH + db PSYDUCK + db PSYDUCK + db ABRA + db ABRA + db ABRA + db BELLSPROUT + db KRABBY + db GOLDEEN + db GOLDEEN + db JYNX + db JYNX + db JYNX + +BlueStageVermilionStreetsWildMons: ; 0x114cd + db PIDGEY + db SPEAROW + db SANDSHREW + db SANDSHREW + db MEOWTH + db MEOWTH + db BELLSPROUT + db BELLSPROUT + db SHELLDER + db SHELLDER + db SHELLDER + db DROWZEE + db DROWZEE + db KRABBY + db KRABBY + db KRABBY + +BlueStageVermilionStreetsWildMonsRare: ; 0x114dd + db SANDSHREW + db SANDSHREW + db SANDSHREW + db SANDSHREW + db MEOWTH + db BELLSPROUT + db FARFETCH_D + db FARFETCH_D + db FARFETCH_D + db FARFETCH_D + db SHELLDER + db SHELLDER + db DROWZEE + db DROWZEE + db KRABBY + db KRABBY + +BlueStageRockMountainWildMons: ; 0x114ed + db RATTATA + db SPEAROW + db SANDSHREW + db SANDSHREW + db ZUBAT + db DIGLETT + db DIGLETT + db DIGLETT + db DIGLETT + db MACHOP + db GEODUDE + db SLOWPOKE + db ONIX + db VOLTORB + db VOLTORB + db VOLTORB + +BlueStageRockMountainWildMonsRare: ; 0x114fd + db ZUBAT + db ZUBAT + db DIGLETT + db MACHOP + db MACHOP + db GEODUDE + db GEODUDE + db SLOWPOKE + db SLOWPOKE + db ONIX + db ONIX + db VOLTORB + db VOLTORB + db MR_MIME + db MR_MIME + db MR_MIME + +BlueStageCeladonCityWildMons: ; 0x1150d + db PIDGEY + db PIDGEY + db VULPIX + db VULPIX + db ODDISH + db ODDISH + db MEOWTH + db MEOWTH + db MEOWTH + db MANKEY + db MANKEY + db MANKEY + db GROWLITHE + db GROWLITHE + db BELLSPROUT + db BELLSPROUT + +BlueStageCeladonCityWildMonsRare: ; 0x1151d + db CLEFAIRY + db CLEFAIRY + db ABRA + db ABRA + db SCYTHER + db PINSIR + db EEVEE + db EEVEE + db EEVEE + db PORYGON + db PORYGON + db PORYGON + db PORYGON + db DRATINI + db DRATINI + db DRATINI + +BlueStageFuchsiaCityWildMons: ; 0x1152d + db VENONAT + db VENONAT + db KRABBY + db KRABBY + db KRABBY + db EXEGGCUTE + db EXEGGCUTE + db KANGASKHAN + db KANGASKHAN + db GOLDEEN + db GOLDEEN + db GOLDEEN + db MAGIKARP + db MAGIKARP + db MAGIKARP + db MAGIKARP + +BlueStageFuchsiaCityWildMonsRare: ; 0x1153d + db VENONAT + db VENONAT + db VENONAT + db VENONAT + db KRABBY + db EXEGGCUTE + db EXEGGCUTE + db EXEGGCUTE + db EXEGGCUTE + db KANGASKHAN + db KANGASKHAN + db KANGASKHAN + db KANGASKHAN + db GOLDEEN + db MAGIKARP + db MAGIKARP + +BlueStageSafariZoneWildMons: ; 0x1154d + db NIDORAN_F + db NIDORAN_F + db NIDORAN_F + db NIDORAN_F + db PARAS + db PARAS + db PARAS + db PARAS + db DODUO + db DODUO + db DODUO + db DODUO + db RHYHORN + db RHYHORN + db RHYHORN + db RHYHORN + +BlueStageSafariZoneWildMonsRare: ; 0x1155d + db NIDORAN_F + db NIDORAN_F + db PARAS + db PARAS + db RHYHORN + db RHYHORN + db CHANSEY + db CHANSEY + db CHANSEY + db CHANSEY + db PINSIR + db PINSIR + db TAUROS + db TAUROS + db DRATINI + db DRATINI + +BlueStageSaffronCityWildMons: ; 0x1156d + db PIDGEY + db PIDGEY + db EKANS + db EKANS + db EKANS + db SANDSHREW + db SANDSHREW + db SANDSHREW + db VULPIX + db ODDISH + db ODDISH + db MEOWTH + db MANKEY + db GROWLITHE + db BELLSPROUT + db BELLSPROUT + +BlueStageSaffronCityWildMonsRare: ; 0x1157d + db PIDGEY + db EKANS + db SANDSHREW + db VULPIX + db MEOWTH + db MANKEY + db GROWLITHE + db HITMONLEE + db HITMONLEE + db HITMONLEE + db HITMONCHAN + db HITMONCHAN + db HITMONCHAN + db LAPRAS + db LAPRAS + db LAPRAS + +BlueStageCinnabarIslandWildMons: ; 0x1158d + db VULPIX + db VULPIX + db VULPIX + db PONYTA + db PONYTA + db PONYTA + db PONYTA + db PONYTA + db GRIMER + db GRIMER + db KOFFING + db KOFFING + db KOFFING + db KOFFING + db TANGELA + db TANGELA + +BlueStageCinnabarIslandWildMonsRare: ; 0x1159d + db VULPIX + db PONYTA + db PONYTA + db GRIMER + db GRIMER + db KOFFING + db KOFFING + db TANGELA + db TANGELA + db TANGELA + db MAGMAR + db MAGMAR + db MAGMAR + db AERODACTYL + db AERODACTYL + db AERODACTYL + +BlueStageIndigoPlateauWildMons: ; 0x115ad + db SPEAROW + db SANDSHREW + db ZUBAT + db ZUBAT + db MACHOP + db MACHOP + db MACHOP + db GEODUDE + db GEODUDE + db GEODUDE + db ONIX + db ONIX + db ONIX + db DITTO + db DITTO + db DITTO + +BlueStageIndigoPlateauWildMonsRare: ; 0x115bd + db SPEAROW + db SANDSHREW + db ZUBAT + db MACHOP + db GEODUDE + db ONIX + db DITTO + db DITTO + db DITTO + db DITTO + db MOLTRES + db MOLTRES + db MOLTRES + db MEWTWO + db MEWTWO + db MEWTWO + + db MEW diff --git a/data/red_wild_mons.asm b/data/red_wild_mons.asm new file mode 100755 index 0000000..60a4574 --- /dev/null +++ b/data/red_wild_mons.asm @@ -0,0 +1,434 @@ +RedStageWildMons: ; 0x112cc +RedStagePalletTownWildMons: ; 0x112cc + db BULBASAUR + db CHARMANDER + db CHARMANDER + db CHARMANDER + db CHARMANDER + db CHARMANDER + db CHARMANDER + db PIDGEY + db PIDGEY + db PIDGEY + db RATTATA + db RATTATA + db RATTATA + db NIDORAN_M + db POLIWAG + db TENTACOOL + +RedStagePalletTownWildMonsRare: ; 0x112dc + db BULBASAUR + db BULBASAUR + db BULBASAUR + db CHARMANDER + db PIDGEY + db RATTATA + db NIDORAN_M + db NIDORAN_M + db NIDORAN_M + db POLIWAG + db POLIWAG + db POLIWAG + db POLIWAG + db TENTACOOL + db TENTACOOL + db TENTACOOL + +RedStageViridianForestWildMons: ; 0x112ec + db WEEDLE + db WEEDLE + db WEEDLE + db WEEDLE + db WEEDLE + db PIDGEY + db PIDGEY + db PIDGEY + db PIDGEY + db PIDGEY + db RATTATA + db RATTATA + db RATTATA + db RATTATA + db RATTATA + db PIKACHU + +RedStageViridianForestWildMonsRare: ; 0x112fc + db CATERPIE + db CATERPIE + db WEEDLE + db WEEDLE + db WEEDLE + db PIDGEY + db PIDGEY + db RATTATA + db RATTATA + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + db PIKACHU + +RedStagePewterCityWildMons: ; 0x1130c + db PIDGEY + db PIDGEY + db SPEAROW + db SPEAROW + db SPEAROW + db SPEAROW + db SPEAROW + db SPEAROW + db EKANS + db JIGGLYPUFF + db JIGGLYPUFF + db JIGGLYPUFF + db JIGGLYPUFF + db JIGGLYPUFF + db MAGIKARP + db MAGIKARP + +RedStagePewterCityWildMonsRare: ; 0x1131c + db PIDGEY + db PIDGEY + db SPEAROW + db SPEAROW + db SPEAROW + db EKANS + db EKANS + db EKANS + db EKANS + db JIGGLYPUFF + db JIGGLYPUFF + db JIGGLYPUFF + db MAGIKARP + db MAGIKARP + db MAGIKARP + db MAGIKARP + +RedStageCeruleanCityWildMons: ; 0x1132c + db WEEDLE + db WEEDLE + db PIDGEY + db ODDISH + db ODDISH + db ODDISH + db ODDISH + db ODDISH + db PSYDUCK + db MANKEY + db MANKEY + db MANKEY + db ABRA + db ABRA + db KRABBY + db GOLDEEN + +RedStageCeruleanCityWildMonsRare: ; 0x1133c + db CATERPIE + db NIDORAN_M + db ODDISH + db PSYDUCK + db PSYDUCK + db MANKEY + db MANKEY + db ABRA + db ABRA + db ABRA + db KRABBY + db GOLDEEN + db GOLDEEN + db JYNX + db JYNX + db JYNX + +RedStageVermilionSeasideWildMons: ; 0x1134c + db PIDGEY + db SPEAROW + db EKANS + db EKANS + db ODDISH + db ODDISH + db MANKEY + db MANKEY + db SHELLDER + db SHELLDER + db SHELLDER + db DROWZEE + db DROWZEE + db KRABBY + db KRABBY + db KRABBY + +RedStageVermilionSeasideWildMonsRare: ; 0x1135c + db EKANS + db EKANS + db EKANS + db EKANS + db ODDISH + db MANKEY + db FARFETCH_D + db FARFETCH_D + db FARFETCH_D + db FARFETCH_D + db SHELLDER + db SHELLDER + db DROWZEE + db DROWZEE + db KRABBY + db KRABBY + +RedStageRockMountainWildMons: ; 0x1136c + db RATTATA + db SPEAROW + db EKANS + db EKANS + db EKANS + db ZUBAT + db DIGLETT + db DIGLETT + db DIGLETT + db MACHOP + db GEODUDE + db SLOWPOKE + db ONIX + db VOLTORB + db VOLTORB + db VOLTORB + +RedStageRockMountainWildMonsRare: ; 0x1137c + db ZUBAT + db ZUBAT + db DIGLETT + db MACHOP + db MACHOP + db GEODUDE + db GEODUDE + db SLOWPOKE + db SLOWPOKE + db ONIX + db ONIX + db VOLTORB + db VOLTORB + db MR_MIME + db MR_MIME + db MR_MIME + +RedStageLavenderTownWildMons: ; 0x1138c + db PIDGEY + db PIDGEY + db EKANS + db EKANS + db MANKEY + db MANKEY + db GROWLITHE + db GROWLITHE + db MAGNEMITE + db MAGNEMITE + db GASTLY + db GASTLY + db GASTLY + db GASTLY + db GASTLY + db CUBONE + +RedStageLavenderTownWildMonsRare: ; 0x1139c + db EKANS + db MANKEY + db GROWLITHE + db MAGNEMITE + db MAGNEMITE + db GASTLY + db GASTLY + db CUBONE + db CUBONE + db CUBONE + db ELECTABUZZ + db ELECTABUZZ + db ELECTABUZZ + db ZAPDOS + db ZAPDOS + db ZAPDOS + +RedStageCyclingRoadWildMons: ; 0x113ac + db RATTATA + db RATTATA + db SPEAROW + db SPEAROW + db TENTACOOL + db TENTACOOL + db DODUO + db DODUO + db DODUO + db KRABBY + db KRABBY + db LICKITUNG + db GOLDEEN + db GOLDEEN + db MAGIKARP + db MAGIKARP + +RedStageCyclingRoadWildMonsRare: ; 0x113bc + db TENTACOOL + db DODUO + db DODUO + db DODUO + db DODUO + db DODUO + db KRABBY + db LICKITUNG + db LICKITUNG + db LICKITUNG + db LICKITUNG + db GOLDEEN + db MAGIKARP + db SNORLAX + db SNORLAX + db SNORLAX + +RedStageSafariZoneWildMons: ; 0x113cc + db NIDORAN_M + db NIDORAN_M + db NIDORAN_M + db NIDORAN_M + db PARAS + db PARAS + db PARAS + db PARAS + db DODUO + db DODUO + db DODUO + db DODUO + db RHYHORN + db RHYHORN + db RHYHORN + db RHYHORN + +RedStageSafariZoneWildMonsRare: ; 0x113dc + db NIDORAN_M + db NIDORAN_M + db PARAS + db PARAS + db RHYHORN + db RHYHORN + db CHANSEY + db CHANSEY + db CHANSEY + db CHANSEY + db SCYTHER + db SCYTHER + db TAUROS + db TAUROS + db DRATINI + db DRATINI + +RedStageSeafoamIslandsWildMons: ; 0x113ec + db ZUBAT + db PSYDUCK + db TENTACOOL + db SLOWPOKE + db SEEL + db SHELLDER + db KRABBY + db HORSEA + db HORSEA + db HORSEA + db HORSEA + db GOLDEEN + db STARYU + db STARYU + db STARYU + db STARYU + +RedStageSeafoamIslandsWildMonsRare: ; 0x113fc + db SEEL + db SEEL + db SEEL + db SEEL + db SEEL + db GOLDEEN + db GOLDEEN + db GOLDEEN + db GOLDEEN + db STARYU + db STARYU + db STARYU + db STARYU + db ARTICUNO + db ARTICUNO + db ARTICUNO + +RedStageCinnabarIslandWildMons: ; 0x1140c + db GROWLITHE + db GROWLITHE + db GROWLITHE + db GROWLITHE + db PONYTA + db PONYTA + db PONYTA + db PONYTA + db GRIMER + db GRIMER + db KOFFING + db KOFFING + db KOFFING + db KOFFING + db TANGELA + db TANGELA + +RedStageCinnabarIslandWildMonsRare: ; 0x1141c + db GROWLITHE + db GROWLITHE + db PONYTA + db PONYTA + db GRIMER + db KOFFING + db KOFFING + db TANGELA + db TANGELA + db TANGELA + db OMANYTE + db OMANYTE + db OMANYTE + db KABUTO + db KABUTO + db KABUTO + +RedStageIndigoPlateauWildMons: ; 0x1142c + db SPEAROW + db EKANS + db ZUBAT + db ZUBAT + db MACHOP + db MACHOP + db MACHOP + db GEODUDE + db GEODUDE + db GEODUDE + db ONIX + db ONIX + db ONIX + db DITTO + db DITTO + db DITTO + +RedStageIndigoPlateauWildMonsRare: ; 0x1143c + db SPEAROW + db EKANS + db ZUBAT + db MACHOP + db GEODUDE + db ONIX + db DITTO + db DITTO + db DITTO + db DITTO + db MOLTRES + db MOLTRES + db MOLTRES + db MEWTWO + db MEWTWO + db MEWTWO + + db MEW @@ -5494,7 +5494,236 @@ INCBIN "baserom.gbc",$f269,$10000 - $f269 SECTION "bank4", ROMX, BANK[$4] -INCBIN "baserom.gbc",$10000,$14000 - $10000 ; 0x10000 +INCBIN "baserom.gbc",$10000,$1003f - $10000 + +Func_1003f: ; 0x1003f + ld a, [$d54b] ; current game mode? + and a + ret nz + ld a, $1 + ld [$d54b], a ; set to catchem mode? + xor a + ld [$d550], a + ld [$d54d], a + ld a, [$d4ac] + sla a + ld c, a + ld b, $0 + push bc + ld hl, WildMonOffsetsPointers + add hl, bc + ld a, [hli] + ld h, [hl] + ld l, a + ld a, [$d54a] ; current map? + sla a + ld c, a + add hl, bc + ld a, [hli] + ld c, a + ld a, [hl] + ld b, a + pop de + ld hl, WildMonPointers + add hl, de + ld a, [hli] + ld h, [hl] + ld l, a + add hl, bc + call Func_959 ; random number? + and $f + call .asm_10130 + ld c, a + ld b, $0 + add hl, bc + ld a, [$d55b] + sla a + ld c, a + add hl, bc + ld a, [hl] + dec a + ld [$d579], a + ld a, [$d579] + ld c, a + ld b, $0 + ld hl, $561d + add hl, bc + ld c, [hl] + ld h, b + ld l, c + add hl, bc + add hl, bc + ld bc, $7685 + add hl, bc + ld a, [hli] + ld [$d5c1], a + ld [$d5be], a + ld a, [hli] + ld [$d5c2], a + ld a, [hli] + ld [$d5c3], a + ld hl, $d586 + ld a, [$d5b6] + ld c, a + and a + ld b, $18 + jr z, .asm_100c7 +.asm_100ba + ld a, $1 + ld [hli], a + xor a + ld [hli], a + dec b + dec c + jr nz, .asm_100ba + ld a, b + and a + jr z, .asm_100ce +.asm_100c7 + xor a + ld [hli], a + inc a + ld [hli], a + dec b + jr nz, .asm_100c7 +.asm_100ce + ld a, [$d579] + ld c, a + ld b, $0 + sla c + rl b + ld hl, $6a22 + add hl, bc + ld a, [hli] + ld c, a + ld a, [hl] + ld b, a + ld [$ff8a], a + ld a, $2 + ld hl, $467d + call Func_54f + ld [$ff8a], a + ld a, $3 + ld hl, $5bd4 + call Func_54f + call $4696 + call $3579 + ld a, [$d4ac] + bit 0, a + jr z, .asm_1011d + ld a, $28 + ld hl, $6300 + ld de, $8ae0 + ld bc, $0020 + call $0735 + ld a, $0 + ld hl, $2898 + ld de, $9906 + ld bc, $0008 + call $0735 +.asm_1011d + call $4753 + ld a, [$d4ac] + rst $18 + ld [hl], c + ld c, b + ld [hl], c + ld c, b + adc d + ld c, c + adc d + ld c, c + adc h + ld c, c + adc h + ld c, c +.asm_10130 ; I think this checks to see if it should be Mew + push af + cp $f + jr nz, .asm_10155 + ld a, c + cp $60 + jr nz, .asm_10155 + ld a, b + cp $1 + jr nz, .asm_10155 + ld a, [$d55b] + cp $8 + jr nz, .asm_10155 + ld a, [$d62f] + cp $2 + jr nz, .asm_10155 + pop af + xor a + ld [$d62f], a + ld a, $10 + ret +.asm_10155 + pop af + ret + +INCBIN "baserom.gbc",$10157,$1126c - $10157 + +WildMonOffsetsPointers: ; 0x1126c + dw RedStageWildMonDataOffsets + dw RedStageWildMonDataOffsets + dw RedStageWildMonDataOffsets + dw RedStageWildMonDataOffsets + dw BlueStageWildMonDataOffsets + dw BlueStageWildMonDataOffsets + +RedStageWildMonDataOffsets: ; 0x11278 + dw (RedStagePalletTownWildMons - RedStageWildMons) ; PALLET_TOWN + dw $0000 ; VIRIDIAN_CITY (unused in Red Stage) + dw (RedStageViridianForestWildMons - RedStageWildMons) ; VIRIDIAN_FOREST + dw (RedStagePewterCityWildMons - RedStageWildMons) ; PEWTER_CITY + dw $0000 ; MT_MOON (unused in Red Stage) + dw (RedStageCeruleanCityWildMons - RedStageWildMons) ; CERULEAN_CITY + dw (RedStageVermilionSeasideWildMons - RedStageWildMons) ; VERMILION_SEASIDE + dw $0000 ; VERMILION_STREETS (unused in Red Stage) + dw (RedStageRockMountainWildMons - RedStageWildMons) ; ROCK_MOUNTAIN + dw (RedStageLavenderTownWildMons - RedStageWildMons) ; LAVENDER_TOWN + dw $0000 ; CELADON_CITY (unused in Red Stage) + dw (RedStageCyclingRoadWildMons - RedStageWildMons) ; CYCLING_ROAD + dw $0000 ; FUCHSIA_CITY (unused in Red Stage) + dw (RedStageSafariZoneWildMons - RedStageWildMons) ; SAFARI_ZONE + dw $0000 ; SAFFRON_CITY (unused in Red Stage) + dw (RedStageSeafoamIslandsWildMons - RedStageWildMons) ; SEAFOAM_ISLANDS + dw (RedStageCinnabarIslandWildMons - RedStageWildMons) ; CINNABAR_ISLAND + dw (RedStageIndigoPlateauWildMons - RedStageWildMons) ; INDIGO_PLATEAU + +BlueStageWildMonDataOffsets: ; 0x1129c + dw $0000 ; PALLET_TOWN (unused in Blue Stage) + dw (BlueStageViridianCityWildMons - BlueStageWildMons) ; VIRIDIAN_CITY + dw (BlueStageViridianForestWildMons - BlueStageWildMons) ; VIRIDIAN_FOREST + dw $0000 ; PEWTER_CITY (unused in Blue Stage) + dw (BlueStageMtMoonWildMons - BlueStageWildMons) ; MT_MOON + dw (BlueStageCeruleanCityWildMons - BlueStageWildMons) ; CERULEAN_CITY + dw $0000 ; VERMILION_SEASIDE (unused in Blue Stage) + dw (BlueStageVermilionStreetsWildMons - BlueStageWildMons) ; VERMILION_STREETS + dw (BlueStageRockMountainWildMons - BlueStageWildMons) ; ROCK_MOUNTAIN + dw $0000 ; LAVENDER_TOWN (unused in Blue Stage) + dw (BlueStageCeladonCityWildMons - BlueStageWildMons) ; CELADON_CITY + dw $0000 ; CYCLING_ROAD (unused in Blue Stage) + dw (BlueStageFuchsiaCityWildMons - BlueStageWildMons) ; FUCHSIA_CITY + dw (BlueStageSafariZoneWildMons - BlueStageWildMons) ; SAFARI_ZONE + dw (BlueStageSaffronCityWildMons - BlueStageWildMons) ; SAFFRON_CITY + dw $0000 ; SEAFOAM_ISLANDS (unused in Blue Stage) + dw (BlueStageCinnabarIslandWildMons - BlueStageWildMons) ; CINNABAR_ISLAND + dw (BlueStageIndigoPlateauWildMons - BlueStageWildMons) ; INDIGO_PLATEAU + +WildMonPointers: ; 0x112c0 + dw RedStageWildMons + dw RedStageWildMons + dw RedStageWildMons + dw RedStageWildMons + dw BlueStageWildMons + dw BlueStageWildMons + +INCLUDE "data/red_wild_mons.asm" +INCLUDE "data/blue_wild_mons.asm" + +INCBIN "baserom.gbc",$115ce,$14000 - $115ce SECTION "bank5", ROMX, BANK[$5] @@ -15,6 +15,8 @@ wOAMBuffer:: ; d000 ds $4da + ; d54b might be the current mode (catchEm, evolution, map change, etc.) + wTimerSeconds:: ; 0xd57a ds 1 wTimerMinutes:: ; 0xd57b |