summaryrefslogtreecommitdiff
path: root/main.asm
diff options
context:
space:
mode:
Diffstat (limited to 'main.asm')
-rw-r--r--main.asm272
1 files changed, 57 insertions, 215 deletions
diff --git a/main.asm b/main.asm
index a8566f7e0..eab1ee3ca 100644
--- a/main.asm
+++ b/main.asm
@@ -1,5 +1,6 @@
INCLUDE "includes.asm"
+
SECTION "bank1", ROMX
PlaceWaitingText:: ; 4000
@@ -246,6 +247,7 @@ Predef1: ; 747a
; not used
ret
+
SECTION "bank2", ROMX
INCLUDE "engine/player_object.asm"
@@ -253,6 +255,7 @@ INCLUDE "engine/sine.asm"
INCLUDE "engine/predef.asm"
INCLUDE "engine/color.asm"
+
SECTION "bank3", ROMX
CheckTime:: ; c000
@@ -380,6 +383,7 @@ KnowsMove: ; f9ea
text_jump UnknownText_0x1c5ea8
db "@"
+
SECTION "bank4", ROMX
INCLUDE "engine/pack.asm"
@@ -603,6 +607,7 @@ root set 1
root set root+1
endr
+
SECTION "bank5", ROMX
INCLUDE "engine/rtc.asm"
@@ -628,6 +633,7 @@ SECTION "bank8", ROMX
INCLUDE "engine/clock_reset.asm"
+
SECTION "bank9", ROMX
StringBufferPointers:: ; 24000
@@ -1147,6 +1153,7 @@ Kurt_SelectQuantity_InterpretJoypad: ; 27a28
ld b, a
ret
+
SECTION "bankA", ROMX
INCLUDE "engine/link.asm"
@@ -1171,6 +1178,7 @@ INCBIN "gfx/player/chris_back.2bpp.lz"
DudeBackpic: ; 2bbaa
INCBIN "gfx/battle/dude.2bpp.lz"
+
SECTION "bankB", ROMX
INCLUDE "battle/trainer_huds.asm"
@@ -1606,10 +1614,12 @@ PlaceGraphic: ; 2ef6e
jr nz, .x2
ret
+
SECTION "Effect Commands", ROMX
INCLUDE "battle/effect_commands.asm"
+
SECTION "Enemy Trainers", ROMX
INCLUDE "battle/ai/items.asm"
@@ -1690,12 +1700,14 @@ INCLUDE "trainers/trainer_pointers.asm"
INCLUDE "trainers/trainers.asm"
+
SECTION "Battle Core", ROMX
INCLUDE "battle/core.asm"
INCLUDE "battle/effect_command_pointers.asm"
+
SECTION "bank10", ROMX
INCLUDE "engine/pokedex.asm"
@@ -1704,232 +1716,20 @@ INCLUDE "battle/moves/moves.asm"
INCLUDE "engine/evolve.asm"
+
SECTION "bank11", ROMX
INCLUDE "engine/fruit_trees.asm"
INCLUDE "battle/ai/move.asm"
-AnimateDexSearchSlowpoke: ; 441cf
- ld hl, .FrameIDs
- ld b, 25
-.loop
- ld a, [hli]
-
- ; Wrap around
- cp $fe
- jr nz, .ok
- ld hl, .FrameIDs
- ld a, [hli]
-.ok
-
- ld [wDexSearchSlowpokeFrame], a
- ld a, [hli]
- ld c, a
- push bc
- push hl
- call DoDexSearchSlowpokeFrame
- pop hl
- pop bc
- call DelayFrames
- dec b
- jr nz, .loop
- xor a
- ld [wDexSearchSlowpokeFrame], a
- call DoDexSearchSlowpokeFrame
- ld c, 32
- call DelayFrames
- ret
-
-.FrameIDs: ; 441fc
- ; frame ID, duration
- db 0, 7
- db 1, 7
- db 2, 7
- db 3, 7
- db 4, 7
- db -2
-
-DoDexSearchSlowpokeFrame: ; 44207
- ld a, [wDexSearchSlowpokeFrame]
- ld hl, .SpriteData
- ld de, Sprites
-.loop
- ld a, [hli]
- cp -1
- ret z
- ld [de], a
- inc de
- ld a, [hli]
- ld [de], a
- inc de
- ld a, [wDexSearchSlowpokeFrame]
- ld b, a
- add a
- add b
- add [hl]
- inc hl
- ld [de], a
- inc de
- ld a, [hli]
- ld [de], a
- inc de
- jr .loop
-
-.SpriteData: ; 44228
- dsprite 11, 0, 9, 0, $00, $00
- dsprite 11, 0, 10, 0, $01, $00
- dsprite 11, 0, 11, 0, $02, $00
- dsprite 12, 0, 9, 0, $10, $00
- dsprite 12, 0, 10, 0, $11, $00
- dsprite 12, 0, 11, 0, $12, $00
- dsprite 13, 0, 9, 0, $20, $00
- dsprite 13, 0, 10, 0, $21, $00
- dsprite 13, 0, 11, 0, $22, $00
- db -1
-
-DisplayDexEntry: ; 4424d
- call GetPokemonName
- hlcoord 9, 3
- call PlaceString ; mon species
- ld a, [wd265]
- ld b, a
- call GetDexEntryPointer
- ld a, b
- push af
- hlcoord 9, 5
- call FarString ; dex species
- ld h, b
- ld l, c
- push de
-; Print dex number
- hlcoord 2, 8
- ld a, $5c ; No
- ld [hli], a
- ld a, $5d ; .
- ld [hli], a
- ld de, wd265
- lb bc, PRINTNUM_LEADINGZEROS | 1, 3
- call PrintNum
-; Check to see if we caught it. Get out of here if we haven't.
- ld a, [wd265]
- dec a
- call CheckCaughtMon
- pop hl
- pop bc
- ret z
-; Get the height of the Pokemon.
- ld a, [CurPartySpecies]
- ld [CurSpecies], a
- inc hl
- ld a, b
- push af
- push hl
- call GetFarHalfword
- ld d, l
- ld e, h
- pop hl
- inc hl
- inc hl
- ld a, d
- or e
- jr z, .skip_height
- push hl
- push de
- ld hl, sp+$0
- ld d, h
- ld e, l
- hlcoord 12, 7
- lb bc, 2, PRINTNUM_MONEY | 4
- call PrintNum
- hlcoord 14, 7
- ld [hl], $5e ; ft symbol
- pop af
- pop hl
-
-.skip_height
- pop af
- push af
- inc hl
- push hl
- dec hl
- call GetFarHalfword
- ld d, l
- ld e, h
- ld a, e
- or d
- jr z, .skip_weight
- push de
- ld hl, sp+$0
- ld d, h
- ld e, l
- hlcoord 11, 9
- lb bc, 2, PRINTNUM_RIGHTALIGN | 5
- call PrintNum
- pop de
-
-.skip_weight
-; Page 1
- lb bc, 5, SCREEN_WIDTH - 2
- hlcoord 2, 11
- call ClearBox
- hlcoord 1, 10
- ld bc, SCREEN_WIDTH - 1
- ld a, $61 ; horizontal divider
- call ByteFill
- ; page number
- hlcoord 1, 9
- ld [hl], $55
- inc hl
- ld [hl], $55
- hlcoord 1, 10
- ld [hl], $56 ; P.
- inc hl
- ld [hl], $57 ; 1
- pop de
- inc de
- pop af
- hlcoord 2, 11
- push af
- call FarString
- pop bc
- ld a, [wPokedexStatus]
- or a
- ret z
-
-; Page 2
- push bc
- push de
- lb bc, 5, SCREEN_WIDTH - 2
- hlcoord 2, 11
- call ClearBox
- hlcoord 1, 10
- ld bc, SCREEN_WIDTH - 1
- ld a, $61
- call ByteFill
- ; page number
- hlcoord 1, 9
- ld [hl], $55
- inc hl
- ld [hl], $55
- hlcoord 1, 10
- ld [hl], $56 ; P.
- inc hl
- ld [hl], $58 ; 2
- pop de
- inc de
- pop af
- hlcoord 2, 11
- call FarString
- ret
-
-String_44331: ; 44331
- db "#@"
+INCLUDE "engine/pokedex_2.asm"
INCLUDE "data/pokedex/entry_pointers.asm"
INCLUDE "engine/mail.asm"
+
SECTION "Crystal Unique", ROMX
INCLUDE "engine/init_gender.asm"
@@ -2137,6 +1937,7 @@ Buena_ExitMenu: ; 4ae5e
ld [hOAMUpdate], a
ret
+
SECTION "bank13", ROMX
SwapTextboxPalettes:: ; 4c000
@@ -3486,6 +3287,7 @@ INCLUDE "misc/gbc_only.asm"
INCLUDE "event/poke_seer.asm"
+
SECTION "bank14", ROMX
INCLUDE "engine/party_menu.asm"
@@ -4613,10 +4415,12 @@ UnknownEggPic:: ; 53d9c
; Another egg pic. This is shifted up a few pixels.
INCBIN "gfx/unknown/unknown_egg.2bpp.lz"
+
SECTION "bank19", ROMX
INCLUDE "text/phone/extra.asm"
+
SECTION "bank20", ROMX
INCLUDE "engine/player_movement.asm"
@@ -4629,6 +4433,7 @@ INCLUDE "text/battle.asm"
INCLUDE "engine/debug.asm"
+
SECTION "bank21", ROMX
INCLUDE "engine/printer.asm"
@@ -4637,6 +4442,7 @@ INCLUDE "battle/anim_gfx.asm"
INCLUDE "event/halloffame.asm"
+
SECTION "bank22", ROMX
INCLUDE "event/kurt.asm"
@@ -4915,6 +4721,7 @@ INCLUDE "event/dratini.asm"
INCLUDE "event/battle_tower.asm"
INCLUDE "misc/mobile_22_2.asm"
+
SECTION "bank23", ROMX
Predef35: ; 8c000
@@ -4944,6 +4751,7 @@ INCLUDE "engine/sprites.asm"
INCLUDE "engine/mon_icons.asm"
+
SECTION "bank24", ROMX
INCLUDE "engine/phone.asm"
@@ -4953,11 +4761,13 @@ INCLUDE "engine/pokegear.asm"
INCLUDE "engine/fish.asm"
INCLUDE "engine/slot_machine.asm"
+
SECTION "Phone Engine", ROMX
INCLUDE "engine/more_phone_scripts.asm"
INCLUDE "engine/buena_phone_scripts.asm"
+
SECTION "Phone Text", ROMX
INCLUDE "text/phone/anthony_overworld.asm"
@@ -4978,6 +4788,7 @@ INCLUDE "text/phone/kenji_overworld.asm"
INCLUDE "text/phone/parry_overworld.asm"
INCLUDE "text/phone/erin_overworld.asm"
+
SECTION "bank2E", ROMX
INCLUDE "engine/events_3.asm"
@@ -4986,6 +4797,7 @@ INCLUDE "engine/radio.asm"
INCLUDE "gfx/mail.asm"
+
SECTION "bank2F", ROMX
INCLUDE "engine/std_scripts.asm"
@@ -5086,6 +4898,7 @@ LoadPoisonBGPals: ; cbcdd
TheEndGFX:: ; cbd2e
INCBIN "gfx/credits/theend.2bpp"
+
SECTION "bank33", ROMX
DisplayCaughtContestMonStats: ; cc000
@@ -5201,6 +5014,7 @@ INCLUDE "battle/anim_commands.asm"
INCLUDE "battle/anim_objects.asm"
+
SECTION "Pic Animations 1", ROMX
INCLUDE "gfx/pics/animation.asm"
@@ -5241,21 +5055,25 @@ INCLUDE "gfx/pics/bitmasks.asm"
INCLUDE "gfx/pics/unown_bitmask_pointers.asm"
INCLUDE "gfx/pics/unown_bitmasks.asm"
+
SECTION "Pic Animations 2", ROMX
INCLUDE "gfx/pics/frame_pointers.asm"
INCLUDE "gfx/pics/kanto_frames.asm"
+
SECTION "bank36", ROMX
FontInversed: INCBIN "gfx/font/font_inversed.1bpp"
+
SECTION "Pic Animations 3", ROMX
INCLUDE "gfx/pics/johto_frames.asm"
INCLUDE "gfx/pics/unown_frame_pointers.asm"
INCLUDE "gfx/pics/unown_frames.asm"
+
SECTION "bank38", ROMX
RotateUnownFrontpic: ; e0000
@@ -5383,6 +5201,7 @@ INCLUDE "engine/unown_puzzle.asm"
INCLUDE "engine/dummy_game.asm"
INCLUDE "engine/billspc.asm"
+
SECTION "bank39", ROMX
CopyrightGFX:: ; e4000
@@ -5391,6 +5210,7 @@ INCBIN "gfx/splash/copyright.2bpp"
INCLUDE "engine/options_menu.asm"
INCLUDE "engine/crystal_intro.asm"
+
SECTION "bank3E", ROMX
INCLUDE "gfx/font.asm"
@@ -5402,6 +5222,7 @@ INCLUDE "battle/hidden_power.asm"
INCLUDE "battle/misc.asm"
+
SECTION "bank3F", ROMX
INCLUDE "tilesets/animations.asm"
@@ -5410,10 +5231,12 @@ INCLUDE "engine/npctrade.asm"
INCLUDE "event/mom_phone.asm"
+
SECTION "bank40", ROMX
INCLUDE "misc/mobile_40.asm"
+
SECTION "bank41", ROMX
INCLUDE "misc/gfx_41.asm"
@@ -5443,15 +5266,18 @@ INCBIN "gfx/font/overworld.2bpp"
.space
INCBIN "gfx/font/space.2bpp"
+
SECTION "bank42", ROMX
INCLUDE "misc/mobile_42.asm"
+
SECTION "Intro Logo", ROMX
IntroLogoGFX: ; 109407
INCBIN "gfx/intro/logo.2bpp.lz"
+
SECTION "bank43", ROMX
INCLUDE "misc/unused_title.asm"
@@ -5461,23 +5287,28 @@ INCLUDE "engine/title.asm"
INCLUDE "misc/mobile_45.asm"
INCLUDE "misc/mobile_46.asm"
+
SECTION "bank47", ROMX
INCLUDE "misc/battle_tower_47.asm"
+
SECTION "bank5B", ROMX
INCLUDE "misc/mobile_5b.asm"
INCLUDE "engine/link_trade.asm"
+
SECTION "bank5C", ROMX
INCLUDE "misc/mobile_5c.asm"
+
SECTION "bank5D", ROMX
INCLUDE "text/phone/extra3.asm"
+
SECTION "bank5E", ROMX
_UpdateBattleHUDs:
@@ -5492,6 +5323,7 @@ _UpdateBattleHUDs:
INCLUDE "misc/mobile_5f.asm"
+
SECTION "Common Text 1", ROMX
INCLUDE "text/stdtext.asm"
@@ -5507,6 +5339,7 @@ INCLUDE "text/phone/wade_overworld.asm"
INCLUDE "text/phone/ralph_overworld.asm"
INCLUDE "text/phone/liz_overworld.asm"
+
SECTION "bank6D", ROMX
INCLUDE "text/phone/mom.asm"
@@ -5514,6 +5347,7 @@ INCLUDE "text/phone/bill.asm"
INCLUDE "text/phone/elm.asm"
INCLUDE "text/phone/trainers1.asm"
+
SECTION "bank72", ROMX
INCLUDE "items/item_names.asm"
@@ -5524,6 +5358,7 @@ INCLUDE "battle/move_names.asm"
INCLUDE "engine/landmarks.asm"
+
SECTION "bank77", ROMX
UnownFont: ; 1dc000
@@ -5537,6 +5372,7 @@ INCBIN "gfx/mobile/hp.1bpp"
MobileLvIcon: ; 1dc599
INCBIN "gfx/mobile/lv.1bpp"
+
SECTION "bank77_2", ROMX
Function1dd6a9: ; 1dd6a9
@@ -5968,14 +5804,17 @@ LeggiPostaInglese:
jr nz, .loop
ret
+
SECTION "bank7B", ROMX
INCLUDE "text/battle_tower.asm"
+
SECTION "bank7C", ROMX
INCLUDE "data/battle_tower_2.asm"
+
SECTION "bank7D", ROMX
db $cc, $6b, $1e ; XXX
@@ -6021,13 +5860,16 @@ Function1f5d9f: ; 1f5d9f
.unknown_data
INCBIN "unknown/1f5db4.bin"
+
SECTION "bank7E", ROMX
INCLUDE "engine/battle_tower.asm"
INCLUDE "engine/odd_eggs.asm"
+
SECTION "bank7F", ROMX
+
SECTION "stadium2", ROMX
IF DEF(CRYSTAL11)