mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-08-09 11:47:38 -05:00
8900eb7ad0
Regex patterns used:
; [0-9a-f]{1,5} \([0-9a-f]{1,2}:[0-9a-f]{1,4}\)
; [0-9a-f]{1,2}:[0-9a-f]{4}
; [0-9a-f]{4,5}
;[0-9a-f]{4,5}
;[0-9a-f]{1,2}:[0-9a-f]{1,4}
84 lines
1.3 KiB
NASM
84 lines
1.3 KiB
NASM
INCLUDE "constants.asm"
|
|
|
|
SECTION "engine/unknown_boxes.asm", ROMX
|
|
|
|
Function1130a:
|
|
ret
|
|
|
|
Function1130b:
|
|
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:
|
|
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:
|
|
text "<PLAYER>は"
|
|
line "@"
|
|
|
|
db $01, $26, $CD
|
|
|
|
text "を てにいれた！@"
|
|
|
|
db $0B, "@"
|
|
|
|
BoxCantHoldText:
|
|
text "#を もちきれないので"
|
|
line "<PC>の ボックス@"
|
|
db $01, $31, $CD
|
|
text " に"
|
|
cont "@"
|
|
db $01, $17, $DF
|
|
text "を てんそうした！"
|
|
done
|
|
|
|
BoxFullText:
|
|
text "#を もちきれません！"
|
|
para "ボックスも いっぱいで"
|
|
line "てんそうできません！"
|
|
para "#センターなどで"
|
|
line "ボックスを かえてきて ください"
|
|
done
|