mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-03-21 17:45:52 -05:00
fac958b280
- Indent with single tabs, not spaces - Colons after labels - Capitalize BANK, HIGH, and LOW - dbw BANK(X), X -> dba X
84 lines
1.4 KiB
NASM
84 lines
1.4 KiB
NASM
INCLUDE "constants.asm"
|
|
|
|
SECTION "engine/unknown_boxes.asm", ROMX
|
|
|
|
Function1130a: ; 04:530A
|
|
ret
|
|
|
|
Function1130b: ; 04:530B
|
|
ld a, [wPartyCount]
|
|
cp PARTY_LENGTH
|
|
jr c, .bigjump
|
|
ld a, [wBoxListLength]
|
|
cp $1E
|
|
jr nc, .fullbox
|
|
xor a
|
|
ld [wca44], a
|
|
ld a, [wMonDexIndex]
|
|
ld [wcdd7], a
|
|
callab AddPokemonToBox
|
|
call RecievePokemon
|
|
predef Functiondd5c
|
|
and $7F
|
|
add a, $F7
|
|
ld hl, wStringBuffer2
|
|
ld [hli], a
|
|
ld [hl], "@"
|
|
ld hl, BoxCantHoldText
|
|
call PrintText
|
|
scf
|
|
ret
|
|
.fullbox
|
|
ld hl, BoxFullText
|
|
call PrintText
|
|
and a
|
|
ret
|
|
.bigjump
|
|
call RecievePokemon
|
|
predef Functiond886
|
|
scf
|
|
ret
|
|
|
|
RecievePokemon: ; 04:5357
|
|
ld a, [wMonDexIndex]
|
|
push af
|
|
ld [wNamedObjectIndexBuffer], a
|
|
dec a
|
|
ld c, a
|
|
ld hl, wPokedexOwned
|
|
ld b, 01 ;SET_FLAG
|
|
predef SmallFarFlagAction
|
|
pop af
|
|
ld [wNamedObjectIndexBuffer], a
|
|
call GetPokemonName
|
|
ld hl, RecievePokemonText
|
|
jp PrintText
|
|
|
|
RecievePokemonText: ; 04:5377
|
|
text "<PLAYER>は"
|
|
line "@"
|
|
|
|
db $01, $26, $CD
|
|
|
|
text "を てにいれた！@"
|
|
|
|
db $0B, "@"
|
|
|
|
BoxCantHoldText: ; 04:538B
|
|
text "#を もちきれないので"
|
|
line "<PC>の ボックス@"
|
|
db $01, $31, $CD
|
|
text " に"
|
|
cont "@"
|
|
db $01, $17, $DF
|
|
text "を てんそうした！"
|
|
done
|
|
|
|
BoxFullText: ; 04:53B6
|
|
text "#を もちきれません！"
|
|
para "ボックスも いっぱいで"
|
|
line "てんそうできません！"
|
|
para "#センターなどで"
|
|
line "ボックスを かえてきて ください"
|
|
done
|