diff options
author | Remy Oukaour <remy.oukaour@gmail.com> | 2017-12-15 21:22:26 -0500 |
---|---|---|
committer | Remy Oukaour <remy.oukaour@gmail.com> | 2017-12-15 21:22:26 -0500 |
commit | e44640b0088dad5856d7a6f60ad930779931b251 (patch) | |
tree | e7da6729222fc77db713a401df6fe962e32b00af /engine/selectmenu.asm | |
parent | 01bd8ac94cc11c086167a2a2d8e7b335f033deca (diff) |
Move more main.asm code into individual files
Diffstat (limited to 'engine/selectmenu.asm')
-rwxr-xr-x | engine/selectmenu.asm | 189 |
1 files changed, 0 insertions, 189 deletions
diff --git a/engine/selectmenu.asm b/engine/selectmenu.asm deleted file mode 100755 index 5d3b5ff0a..000000000 --- a/engine/selectmenu.asm +++ /dev/null @@ -1,189 +0,0 @@ -SelectMenu:: ; 13327 - - call CheckRegisteredItem - jr c, .NotRegistered - jp UseRegisteredItem - -.NotRegistered: - call OpenText - ld b, BANK(ItemMayBeRegisteredText) - ld hl, ItemMayBeRegisteredText - call MapTextbox - call WaitButton - jp CloseText -; 13340 - - -ItemMayBeRegisteredText: ; 13340 - text_jump UnknownText_0x1c1cf3 - db "@" -; 13345 - - -CheckRegisteredItem: ; 13345 - - ld a, [WhichRegisteredItem] - and a - jr z, .NoRegisteredItem - and REGISTERED_POCKET - rlca - rlca - ld hl, .Pockets - rst JumpTable - ret - -.Pockets: - dw .CheckItem - dw .CheckBall - dw .CheckKeyItem - dw .CheckTMHM - -.CheckItem: - ld hl, NumItems - call .CheckRegisteredNo - jr c, .NoRegisteredItem - inc hl - ld e, a - ld d, 0 - add hl, de - add hl, de - call .IsSameItem - jr c, .NoRegisteredItem - and a - ret - -.CheckKeyItem: - ld a, [RegisteredItem] - ld hl, KeyItems - ld de, 1 - call IsInArray - jr nc, .NoRegisteredItem - ld a, [RegisteredItem] - ld [CurItem], a - and a - ret - -.CheckBall: - ld hl, NumBalls - call .CheckRegisteredNo - jr nc, .NoRegisteredItem - inc hl - ld e, a - ld d, 0 - add hl, de - add hl, de - call .IsSameItem - jr c, .NoRegisteredItem - ret - -.CheckTMHM: - jr .NoRegisteredItem - -.NoRegisteredItem: - xor a - ld [WhichRegisteredItem], a - ld [RegisteredItem], a - scf - ret -; 133a6 - - -.CheckRegisteredNo: ; 133a6 - ld a, [WhichRegisteredItem] - and REGISTERED_NUMBER - dec a - cp [hl] - jr nc, .NotEnoughItems - ld [CurItemQuantity], a - and a - ret - -.NotEnoughItems: - scf - ret -; 133b6 - - -.IsSameItem: ; 133b6 - ld a, [RegisteredItem] - cp [hl] - jr nz, .NotSameItem - ld [CurItem], a - and a - ret - -.NotSameItem: - scf - ret -; 133c3 - - -UseRegisteredItem: ; 133c3 - - callba CheckItemMenu - ld a, [wItemAttributeParamBuffer] - ld hl, .SwitchTo - rst JumpTable - ret - -.SwitchTo: - dw .CantUse - dw .NoFunction - dw .NoFunction - dw .NoFunction - dw .Current - dw .Party - dw .Overworld -; 133df - -.NoFunction: ; 133df - call OpenText - call CantUseItem - call CloseText - and a - ret -; 133ea - -.Current: ; 133ea - call OpenText - call DoItemEffect - call CloseText - and a - ret -; 133f5 - -.Party: ; 133f5 - call RefreshScreen - call FadeToMenu - call DoItemEffect - call CloseSubmenu - call CloseText - and a - ret -; 13406 - -.Overworld: ; 13406 - call RefreshScreen - ld a, 1 - ld [wUsingItemWithSelect], a - call DoItemEffect - xor a - ld [wUsingItemWithSelect], a - ld a, [wItemEffectSucceeded] - cp 1 - jr nz, ._cantuse - scf - ld a, HMENURETURN_SCRIPT - ld [hMenuReturn], a - ret -; 13422 - -.CantUse: ; 13422 - call RefreshScreen - -._cantuse - call CantUseItem - call CloseText - and a - ret -; 1342d |