mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-03-21 17:45:52 -05:00
d94d75f8fc
Some checks failed
CI / build (push) Has been cancelled
* Add Katakana `リ`, `ヘ`, `ベ`, `ペ` in charmap and text strings * Format text strings, using macro where possible * Remove unused charmap entries, name `Function3036` * Charmap update and reorder, `TextAsmEnd`
84 lines
1.4 KiB
NASM
84 lines
1.4 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, [wBoxCount]
|
|
cp MONS_PER_BOX
|
|
jr nc, .fullbox
|
|
xor a
|
|
ld [wEnemySubStatus5], a
|
|
ld a, [wCurPartySpecies]
|
|
ld [wTempEnemyMonSpecies], a
|
|
callfar LoadEnemyMon
|
|
call RecievePokemon
|
|
predef SendMonIntoBox
|
|
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 TryAddMonToParty
|
|
scf
|
|
ret
|
|
|
|
RecievePokemon:
|
|
ld a, [wCurPartySpecies]
|
|
push af
|
|
ld [wNamedObjectIndexBuffer], a
|
|
dec a
|
|
ld c, a
|
|
ld hl, wPokedexCaught
|
|
ld b, SET_FLAG
|
|
predef SmallFarFlagAction
|
|
pop af
|
|
ld [wNamedObjectIndexBuffer], a
|
|
call GetPokemonName
|
|
ld hl, RecievePokemonText
|
|
jp PrintText
|
|
|
|
RecievePokemonText:
|
|
text "<PLAYER>は"
|
|
line "@"
|
|
text_from_ram wStringBuffer1
|
|
text "を てにいれた！@"
|
|
sound_dex_fanfare_50_79
|
|
text_end
|
|
|
|
BoxCantHoldText:
|
|
text "#を もちきれないので"
|
|
line "<PC>の ボックス@"
|
|
text_from_ram wStringBuffer2
|
|
text " に"
|
|
cont "@"
|
|
text_from_ram wBoxMonNicknames
|
|
text "を てんそうした！"
|
|
done
|
|
|
|
BoxFullText:
|
|
text "#を もちきれません！"
|
|
|
|
para "ボックスも いっぱいで"
|
|
line "てんそうできません！"
|
|
|
|
para "#センターなどで"
|
|
line "ボックスを かえてきて ください"
|
|
done
|