mirror of
https://github.com/pret/pokered.git
synced 2024-10-24 15:27:10 +00:00
100 lines
1.9 KiB
NASM
Executable file
100 lines
1.9 KiB
NASM
Executable file
PrintNotebookText:
|
|
call EnableAutoTextBoxDrawing
|
|
ld a, $1
|
|
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
|
|
ld a, [wHiddenObjectFunctionArgument]
|
|
jp PrintPredefTextID
|
|
|
|
TMNotebook:
|
|
TX_FAR TMNotebookText
|
|
TX_WAIT
|
|
db "@"
|
|
|
|
ViridianSchoolNotebook:
|
|
TX_ASM
|
|
ld hl, ViridianSchoolNotebookText1
|
|
call PrintText
|
|
call TurnPageSchoolNotebook
|
|
jr nz, .doneReading
|
|
ld hl, ViridianSchoolNotebookText2
|
|
call PrintText
|
|
call TurnPageSchoolNotebook
|
|
jr nz, .doneReading
|
|
ld hl, ViridianSchoolNotebookText3
|
|
call PrintText
|
|
call TurnPageSchoolNotebook
|
|
jr nz, .doneReading
|
|
ld hl, ViridianSchoolNotebookText4
|
|
call PrintText
|
|
ld hl, ViridianSchoolNotebookText5
|
|
call PrintText
|
|
.doneReading
|
|
jp TextScriptEnd
|
|
|
|
TurnPageSchoolNotebook:
|
|
ld hl, TurnPageText
|
|
call PrintText
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
ret
|
|
|
|
TurnPageText:
|
|
TX_FAR _TurnPageText
|
|
db "@"
|
|
|
|
ViridianSchoolNotebookText5:
|
|
TX_FAR _ViridianSchoolNotebookText5
|
|
TX_WAIT
|
|
db "@"
|
|
|
|
ViridianSchoolNotebookText1:
|
|
TX_FAR _ViridianSchoolNotebookText1
|
|
db "@"
|
|
|
|
ViridianSchoolNotebookText2:
|
|
TX_FAR _ViridianSchoolNotebookText2
|
|
db "@"
|
|
|
|
ViridianSchoolNotebookText3:
|
|
TX_FAR _ViridianSchoolNotebookText3
|
|
db "@"
|
|
|
|
ViridianSchoolNotebookText4:
|
|
TX_FAR _ViridianSchoolNotebookText4
|
|
db "@"
|
|
|
|
PrintFightingDojoText2:
|
|
call EnableAutoTextBoxDrawing
|
|
tx_pre_jump EnemiesOnEverySideText
|
|
|
|
EnemiesOnEverySideText:
|
|
TX_FAR _EnemiesOnEverySideText
|
|
db "@"
|
|
|
|
PrintFightingDojoText3:
|
|
call EnableAutoTextBoxDrawing
|
|
tx_pre_jump WhatGoesAroundComesAroundText
|
|
|
|
WhatGoesAroundComesAroundText:
|
|
TX_FAR _WhatGoesAroundComesAroundText
|
|
db "@"
|
|
|
|
PrintFightingDojoText:
|
|
call EnableAutoTextBoxDrawing
|
|
tx_pre_jump FightingDojoText
|
|
|
|
FightingDojoText:
|
|
TX_FAR _FightingDojoText
|
|
db "@"
|
|
|
|
PrintIndigoPlateauHQText:
|
|
ld a, [wSpriteStateData1 + 9]
|
|
cp SPRITE_FACING_UP
|
|
ret nz
|
|
call EnableAutoTextBoxDrawing
|
|
tx_pre_jump IndigoPlateauHQText
|
|
|
|
IndigoPlateauHQText:
|
|
TX_FAR _IndigoPlateauHQText
|
|
db "@"
|