mirror of https://github.com/pret/pokecrystal.git
51 lines
733 B
NASM
51 lines
733 B
NASM
PhotoStudio:
|
|
ld hl, .WhichMonPhotoText
|
|
call PrintText
|
|
farcall SelectMonFromParty
|
|
jr c, .cancel
|
|
ld a, [wCurPartySpecies]
|
|
cp EGG
|
|
jr z, .egg
|
|
|
|
ld hl, .HoldStillText
|
|
call PrintText
|
|
call DisableSpriteUpdates
|
|
farcall PrintPartymon
|
|
call ReturnToMapWithSpeechTextbox
|
|
ldh a, [hPrinter]
|
|
and a
|
|
jr nz, .cancel
|
|
ld hl, .PrestoAllDoneText
|
|
jr .print_text
|
|
|
|
.cancel
|
|
ld hl, .NoPhotoText
|
|
jr .print_text
|
|
|
|
.egg
|
|
ld hl, .EggPhotoText
|
|
|
|
.print_text
|
|
call PrintText
|
|
ret
|
|
|
|
.WhichMonPhotoText:
|
|
text_far _WhichMonPhotoText
|
|
text_end
|
|
|
|
.HoldStillText:
|
|
text_far _HoldStillText
|
|
text_end
|
|
|
|
.PrestoAllDoneText:
|
|
text_far _PrestoAllDoneText
|
|
text_end
|
|
|
|
.NoPhotoText:
|
|
text_far _NoPhotoText
|
|
text_end
|
|
|
|
.EggPhotoText:
|
|
text_far _EggPhotoText
|
|
text_end
|