mirror of https://github.com/pret/pokecrystal.git
390 lines
8.3 KiB
NASM
390 lines
8.3 KiB
NASM
EarlsPokemonAcademy_MapScriptHeader: ; 0x68a5a
|
|
; trigger count
|
|
db 0
|
|
|
|
; callback count
|
|
db 0
|
|
; 0x68a5c
|
|
|
|
UnknownScript_0x68a5c: ; 0x68a5c
|
|
applymovement $2, MovementData_0x68b2d
|
|
faceplayer
|
|
loadfont
|
|
2writetext UnknownText_0x68b3b
|
|
yesorno
|
|
iffalse UnknownScript_0x68a70
|
|
2writetext UnknownText_0x68bbd
|
|
yesorno
|
|
iffalse UnknownScript_0x68a7d
|
|
UnknownScript_0x68a70: ; 0x68a70
|
|
2writetext UnknownText_0x68c51
|
|
yesorno
|
|
iffalse UnknownScript_0x68a7d
|
|
2writetext UnknownText_0x68c7b
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x68a7d
|
|
|
|
UnknownScript_0x68a7d: ; 0x68a7d
|
|
2writetext UnknownText_0x68d31
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x68a83
|
|
|
|
UnknownScript_0x68a83: ; 0x68a83
|
|
jumptextfaceplayer UnknownText_0x68d80
|
|
; 0x68a86
|
|
|
|
UnknownScript_0x68a86: ; 0x68a86
|
|
faceplayer
|
|
loadfont
|
|
2writetext UnknownText_0x68dda
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $4, $0
|
|
end
|
|
; 0x68a91
|
|
|
|
UnknownScript_0x68a91: ; 0x68a91
|
|
faceplayer
|
|
loadfont
|
|
2writetext UnknownText_0x68e07
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $5, $0
|
|
end
|
|
; 0x68a9c
|
|
|
|
UnknownScript_0x68a9c: ; 0x68a9c
|
|
jumptextfaceplayer UnknownText_0x68e39
|
|
; 0x68a9f
|
|
|
|
MapEarlsPokemonAcademySignpost3Script: ; 0x68a9f
|
|
loadfont
|
|
2writetext UnknownText_0x68eb2
|
|
UnknownScript_0x68aa3: ; 0x68aa3
|
|
loadmenudata $4ae1
|
|
interpretmenu
|
|
writebackup
|
|
if_equal $1, UnknownScript_0x68abe
|
|
if_equal $2, UnknownScript_0x68ac5
|
|
if_equal $3, UnknownScript_0x68acc
|
|
if_equal $4, UnknownScript_0x68ad3
|
|
if_equal $5, UnknownScript_0x68ada
|
|
loadmovesprites
|
|
end
|
|
; 0x68abe
|
|
|
|
UnknownScript_0x68abe: ; 0x68abe
|
|
2writetext UnknownText_0x68efe
|
|
closetext
|
|
2jump UnknownScript_0x68aa3
|
|
; 0x68ac5
|
|
|
|
UnknownScript_0x68ac5: ; 0x68ac5
|
|
2writetext UnknownText_0x68f80
|
|
closetext
|
|
2jump UnknownScript_0x68aa3
|
|
; 0x68acc
|
|
|
|
UnknownScript_0x68acc: ; 0x68acc
|
|
2writetext UnknownText_0x68fe2
|
|
closetext
|
|
2jump UnknownScript_0x68aa3
|
|
; 0x68ad3
|
|
|
|
UnknownScript_0x68ad3: ; 0x68ad3
|
|
2writetext UnknownText_0x69055
|
|
closetext
|
|
2jump UnknownScript_0x68aa3
|
|
; 0x68ada
|
|
|
|
UnknownScript_0x68ada: ; 0x68ada
|
|
2writetext UnknownText_0x690cb
|
|
closetext
|
|
2jump UnknownScript_0x68aa3
|
|
; 0x68ae1
|
|
|
|
; menu data
|
|
INCBIN "baserom.gbc",$68ae1,$2a
|
|
|
|
UnknownScript_0x68b0b: ; 0x68b0b
|
|
loadfont
|
|
2writetext UnknownText_0x69136
|
|
yesorno
|
|
iffalse UnknownScript_0x68b25
|
|
2writetext UnknownText_0x69197
|
|
yesorno
|
|
iffalse UnknownScript_0x68b25
|
|
2writetext UnknownText_0x69207
|
|
yesorno
|
|
iffalse UnknownScript_0x68b25
|
|
2writetext UnknownText_0x69287
|
|
closetext
|
|
UnknownScript_0x68b25: ; 0x68b25
|
|
loadmovesprites
|
|
end
|
|
; 0x68b27
|
|
|
|
UnknownScript_0x68b27: ; 0x68b27
|
|
jumptext UnknownText_0x69344
|
|
; 0x68b2a
|
|
|
|
MapEarlsPokemonAcademySignpost1Script: ; 0x68b2a
|
|
jumpstd $0001
|
|
; 0x68b2d
|
|
|
|
MovementData_0x68b2d: ; 0x68b2d
|
|
turn_head_down
|
|
turn_head_left
|
|
turn_head_up
|
|
turn_head_right
|
|
turn_head_down
|
|
turn_head_left
|
|
turn_head_up
|
|
turn_head_right
|
|
turn_head_down
|
|
turn_head_left
|
|
turn_head_up
|
|
turn_head_right
|
|
turn_head_down
|
|
step_end
|
|
; 0x68b3b
|
|
|
|
UnknownText_0x68b3b: ; 0x68b3b
|
|
db $0, "EARL, I am!", $51
|
|
db "Wonderful are", $4f
|
|
db "#MON, yes!", $51
|
|
db "Teach you I will", $4f
|
|
db "to be a better", $55
|
|
db "trainer!", $51
|
|
db "What you want to", $4f
|
|
db "know? Want to be", $55
|
|
db "a winner is you?", $57
|
|
; 0x68bbd
|
|
|
|
UnknownText_0x68bbd: ; 0x68bbd
|
|
db $0, "Good! Teach you,", $4f
|
|
db "I will!", $51
|
|
db "In battle, #MON", $4f
|
|
db "top on list jump", $55
|
|
db "out first!", $51
|
|
db "Change order in", $4f
|
|
db "list, make battle", $55
|
|
db "easy, maybe!", $51
|
|
db "More from me you", $4f
|
|
db "want to hear?", $57
|
|
; 0x68c51
|
|
|
|
UnknownText_0x68c51: ; 0x68c51
|
|
db $0, "So, want to know", $4f
|
|
db "how to raise", $55
|
|
db "#MON well?", $57
|
|
; 0x68c7b
|
|
|
|
UnknownText_0x68c7b: ; 0x68c7b
|
|
db $0, "Fine! Teach you,", $4f
|
|
db "I will!", $51
|
|
db "If #MON come", $4f
|
|
db "out in battle even", $51
|
|
db "briefly, some EXP.", $4f
|
|
db "Points it gets.", $51
|
|
db "At top of list put", $4f
|
|
db "weak #MON.", $51
|
|
db "Switch in battle", $4f
|
|
db "quick!", $51
|
|
db "This way, weak", $4f
|
|
db "#MON strong", $55
|
|
db "become!", $57
|
|
; 0x68d31
|
|
|
|
UnknownText_0x68d31: ; 0x68d31
|
|
db $0, "Oh! Smart student", $4f
|
|
db "you are! Nothing", $55
|
|
db "more do I teach!", $51
|
|
db "Good to #MON", $4f
|
|
db "you must be!", $57
|
|
; 0x68d80
|
|
|
|
UnknownText_0x68d80: ; 0x68d80
|
|
db $0, "I'm taking notes", $4f
|
|
db "of the teacher's", $55
|
|
db "lecture.", $51
|
|
db "I'd better copy", $4f
|
|
db "the stuff on the", $55
|
|
db "blackboard too.", $57
|
|
; 0x68dda
|
|
|
|
UnknownText_0x68dda: ; 0x68dda
|
|
db $0, "I traded my best", $4f
|
|
db "#MON to the", $55
|
|
db "guy beside me.", $57
|
|
; 0x68e07
|
|
|
|
UnknownText_0x68e07: ; 0x68e07
|
|
db $0, "Huh? The #MON I", $4f
|
|
db "just got is hold-", $55
|
|
db "ing something!", $57
|
|
; 0x68e39
|
|
|
|
UnknownText_0x68e39: ; 0x68e39
|
|
db $0, "A #MON holding", $4f
|
|
db "a BERRY will heal", $55
|
|
db "itself in battle.", $51
|
|
db "Many other items", $4f
|
|
db "can be held by", $55
|
|
db "#MON…", $51
|
|
db "It sure is tough", $4f
|
|
db "taking notes…", $57
|
|
; 0x68eb2
|
|
|
|
UnknownText_0x68eb2: ; 0x68eb2
|
|
db $0, "The blackboard", $4f
|
|
db "describes #MON", $51
|
|
db "status changes in", $4f
|
|
db "battle.", $57
|
|
; 0x68eeb
|
|
|
|
UnknownText_0x68eeb: ; 0x68eeb
|
|
db $0, "Read which topic?", $57
|
|
; 0x68efe
|
|
|
|
UnknownText_0x68efe: ; 0x68efe
|
|
db $0, "If poisoned, a", $4f
|
|
db "#MON steadily", $55
|
|
db "loses HP.", $51
|
|
db "Poison lingers", $4f
|
|
db "after the battle,", $51
|
|
db "and HP is lost as", $4f
|
|
db "you walk.", $51
|
|
db "To cure it, use an", $4f
|
|
db "ANTIDOTE.", $57
|
|
; 0x68f80
|
|
|
|
UnknownText_0x68f80: ; 0x68f80
|
|
db $0, "Paralysis reduces", $4f
|
|
db "speed and may", $55
|
|
db "prevent movement.", $51
|
|
db "It remains after", $4f
|
|
db "battle, so use", $55
|
|
db "a PARLYZ HEAL.", $57
|
|
; 0x68fe2
|
|
|
|
UnknownText_0x68fe2: ; 0x68fe2
|
|
db $0, "If asleep, your", $4f
|
|
db "#MON can't make", $55
|
|
db "a move.", $51
|
|
db "A sleeping #MON", $4f
|
|
db "doesn't wake up", $55
|
|
db "after battle.", $51
|
|
db "Wake it up with", $4f
|
|
db "an AWAKENING.", $57
|
|
; 0x69055
|
|
|
|
UnknownText_0x69055: ; 0x69055
|
|
db $0, "A burn steadily", $4f
|
|
db "consumes HP.", $51
|
|
db "It also reduces", $4f
|
|
db "attack power.", $51
|
|
db "A burn lingers", $4f
|
|
db "after battle.", $51
|
|
db "Use a BURN HEAL as", $4f
|
|
db "the cure.", $57
|
|
; 0x690cb
|
|
|
|
UnknownText_0x690cb: ; 0x690cb
|
|
db $0, "If your #MON is", $4f
|
|
db "frozen, it can't", $55
|
|
db "do a thing.", $51
|
|
db "It remains frozen", $4f
|
|
db "after battle.", $51
|
|
db "Thaw it out with", $4f
|
|
db "an ICE HEAL.", $57
|
|
; 0x69136
|
|
|
|
UnknownText_0x69136: ; 0x69136
|
|
db $0, "It's this kid's", $4f
|
|
db "notebook…", $51
|
|
db "Catch #MON", $4f
|
|
db "using # BALLS.", $51
|
|
db "Up to six can be", $4f
|
|
db "in your party.", $51
|
|
db "Keep reading?", $57
|
|
; 0x69197
|
|
|
|
UnknownText_0x69197: ; 0x69197
|
|
db $0, "Before throwing a", $4f
|
|
db "# BALL, weaken", $55
|
|
db "the target first.", $51
|
|
db "A poisoned or", $4f
|
|
db "burned #MON is", $55
|
|
db "easier to catch.", $51
|
|
db "Keep reading?", $57
|
|
; 0x69207
|
|
|
|
UnknownText_0x69207: ; 0x69207
|
|
db $0, "Some moves may", $4f
|
|
db "cause confusion.", $51
|
|
db "Confusion may make", $4f
|
|
db "a #MON attack", $55
|
|
db "itself.", $51
|
|
db "Leaving battle", $4f
|
|
db "clears up any", $55
|
|
db "confusion.", $51
|
|
db "Keep reading?", $57
|
|
; 0x69287
|
|
|
|
UnknownText_0x69287: ; 0x69287
|
|
db $0, "People who catch", $4f
|
|
db "and use #MON", $51
|
|
db "in battle are", $4f
|
|
db "#MON trainers.", $51
|
|
db "They are expected", $4f
|
|
db "to visit #MON", $51
|
|
db "GYMS and defeat", $4f
|
|
db "other trainers.", $51
|
|
db "The next page", $4f
|
|
db "is… Blank!", $51
|
|
db "Boy: E-he-he…", $51
|
|
db "I haven't written", $4f
|
|
db "anymore…", $57
|
|
; 0x69344
|
|
|
|
UnknownText_0x69344: ; 0x69344
|
|
db $0, "This super machine", $4f
|
|
db "prints data out as", $51
|
|
db "stickers!", $57
|
|
; 0x69375
|
|
|
|
EarlsPokemonAcademy_MapEventHeader: ; 0x69375
|
|
; filler
|
|
db 0, 0
|
|
|
|
; warps
|
|
db 2
|
|
warp_def $f, $3, 3, GROUP_VIOLET_CITY, MAP_VIOLET_CITY
|
|
warp_def $f, $4, 3, GROUP_VIOLET_CITY, MAP_VIOLET_CITY
|
|
|
|
; xy triggers
|
|
db 0
|
|
|
|
; signposts
|
|
db 4
|
|
signpost 1, 0, $0, MapEarlsPokemonAcademySignpost1Script
|
|
signpost 1, 1, $0, MapEarlsPokemonAcademySignpost1Script
|
|
signpost 0, 3, $0, MapEarlsPokemonAcademySignpost3Script
|
|
signpost 0, 4, $0, MapEarlsPokemonAcademySignpost3Script
|
|
|
|
; people-events
|
|
db 6
|
|
person_event $3a, 6, 8, $6, $0, 255, 255, $a0, 0, UnknownScript_0x68a5c, $06cb
|
|
person_event $27, 9, 6, $7, $0, 255, 255, $80, 0, UnknownScript_0x68a83, $ffff
|
|
person_event $3, 15, 7, $6, $0, 255, 255, $0, 0, UnknownScript_0x68a86, $ffff
|
|
person_event $3, 15, 8, $8, $0, 255, 255, $80, 0, UnknownScript_0x68a91, $ffff
|
|
person_event $27, 11, 8, $7, $0, 255, 255, $0, 0, UnknownScript_0x68a9c, $ffff
|
|
person_event $55, 8, 6, $1, $0, 255, 255, $0, 0, UnknownScript_0x68b0b, $ffff
|
|
; 0x693e7
|
|
|