mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-09-09 09:51:34 -07:00
432df825d4
Updated macros that rely on the GROUP_, MAP_ constants to use the map macro Added GROUP_NONE and MAP_NONE for the sake of compatibility with this new scheme Added new macro elevfloor to simplify the definition of elevators under this new scheme
434 lines
7.1 KiB
NASM
434 lines
7.1 KiB
NASM
EarlsPokemonAcademy_MapScriptHeader:
|
|
.MapTriggers:
|
|
db 0
|
|
|
|
.MapCallbacks:
|
|
db 0
|
|
|
|
AcademyEarl:
|
|
applymovement $2, MovementData_0x68b2d
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x68b3b
|
|
yesorno
|
|
iffalse .Part1
|
|
writetext UnknownText_0x68bbd
|
|
yesorno
|
|
iffalse .Done
|
|
.Part1
|
|
writetext UnknownText_0x68c51
|
|
yesorno
|
|
iffalse .Done
|
|
writetext UnknownText_0x68c7b
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
.Done
|
|
writetext UnknownText_0x68d31
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
YoungsterScript_0x68a83:
|
|
jumptextfaceplayer UnknownText_0x68d80
|
|
|
|
GameboyKidScript_0x68a86:
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x68dda
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $4, DOWN
|
|
end
|
|
|
|
GameboyKidScript_0x68a91:
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x68e07
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $5, DOWN
|
|
end
|
|
|
|
YoungsterScript_0x68a9c:
|
|
jumptextfaceplayer UnknownText_0x68e39
|
|
|
|
AcademyBlackboard:
|
|
loadfont
|
|
writetext AcademyBlackboardText
|
|
.Loop
|
|
loadmenudata .MenuHeader
|
|
interpretmenu
|
|
writebackup
|
|
if_equal $1, .Poison
|
|
if_equal $2, .Paralysis
|
|
if_equal $3, .Sleep
|
|
if_equal $4, .Burn
|
|
if_equal $5, .Freeze
|
|
loadmovesprites
|
|
end
|
|
|
|
.Poison
|
|
writetext AcademyPoisonText
|
|
closetext
|
|
jump .Loop
|
|
|
|
.Paralysis
|
|
writetext AcademyParalysisText
|
|
closetext
|
|
jump .Loop
|
|
|
|
.Sleep
|
|
writetext AcademySleepText
|
|
closetext
|
|
jump .Loop
|
|
|
|
.Burn
|
|
writetext AcademyBurnText
|
|
closetext
|
|
jump .Loop
|
|
|
|
.Freeze:
|
|
writetext AcademyFreezeText
|
|
closetext
|
|
jump .Loop
|
|
|
|
.MenuHeader
|
|
db $40 ; flags
|
|
db 00, 00 ; start coords
|
|
db 08, 11 ; end coords
|
|
dw .Data
|
|
db 1 ; default option
|
|
|
|
.Data
|
|
db $80 ; flags
|
|
dn 3, 2 ; rows, columns
|
|
db 5 ; spacing
|
|
dbw BANK(.Text), .Text
|
|
dbw $1a, $0000
|
|
|
|
.Text
|
|
db "PSN@"
|
|
db "PAR@"
|
|
db "SLP@"
|
|
db "BRN@"
|
|
db "FRZ@"
|
|
db "QUIT@"
|
|
|
|
AcademyNotebook:
|
|
loadfont
|
|
writetext AcademyNotebookText
|
|
yesorno
|
|
iffalse .Done
|
|
writetext AcademyNotebookText1
|
|
yesorno
|
|
iffalse .Done
|
|
writetext AcademyNotebookText2
|
|
yesorno
|
|
iffalse .Done
|
|
writetext AcademyNotebookText3
|
|
closetext
|
|
.Done
|
|
loadmovesprites
|
|
end
|
|
|
|
AcademyStickerMachine:
|
|
; unused
|
|
jumptext AcademyStickerMachineText
|
|
|
|
AcademyBookshelf:
|
|
jumpstd difficultbookshelf
|
|
|
|
MovementData_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
|
|
|
|
UnknownText_0x68b3b:
|
|
text "EARL, I am!"
|
|
|
|
para "Wonderful are"
|
|
line "#MON, yes!"
|
|
|
|
para "Teach you I will"
|
|
line "to be a better"
|
|
cont "trainer!"
|
|
|
|
para "What you want to"
|
|
line "know? Want to be"
|
|
cont "a winner is you?"
|
|
done
|
|
|
|
UnknownText_0x68bbd:
|
|
text "Good! Teach you,"
|
|
line "I will!"
|
|
|
|
para "In battle, #MON"
|
|
line "top on list jump"
|
|
cont "out first!"
|
|
|
|
para "Change order in"
|
|
line "list, make battle"
|
|
cont "easy, maybe!"
|
|
|
|
para "More from me you"
|
|
line "want to hear?"
|
|
done
|
|
|
|
UnknownText_0x68c51:
|
|
text "So, want to know"
|
|
line "how to raise"
|
|
cont "#MON well?"
|
|
done
|
|
|
|
UnknownText_0x68c7b:
|
|
text "Fine! Teach you,"
|
|
line "I will!"
|
|
|
|
para "If #MON come"
|
|
line "out in battle even"
|
|
|
|
para "briefly, some EXP."
|
|
line "Points it gets."
|
|
|
|
para "At top of list put"
|
|
line "weak #MON."
|
|
|
|
para "Switch in battle"
|
|
line "quick!"
|
|
|
|
para "This way, weak"
|
|
line "#MON strong"
|
|
cont "become!"
|
|
done
|
|
|
|
UnknownText_0x68d31:
|
|
text "Oh! Smart student"
|
|
line "you are! Nothing"
|
|
cont "more do I teach!"
|
|
|
|
para "Good to #MON"
|
|
line "you must be!"
|
|
done
|
|
|
|
UnknownText_0x68d80:
|
|
text "I'm taking notes"
|
|
line "of the teacher's"
|
|
cont "lecture."
|
|
|
|
para "I'd better copy"
|
|
line "the stuff on the"
|
|
cont "blackboard too."
|
|
done
|
|
|
|
UnknownText_0x68dda:
|
|
text "I traded my best"
|
|
line "#MON to the"
|
|
cont "guy beside me."
|
|
done
|
|
|
|
UnknownText_0x68e07:
|
|
text "Huh? The #MON I"
|
|
line "just got is hold-"
|
|
cont "ing something!"
|
|
done
|
|
|
|
UnknownText_0x68e39:
|
|
text "A #MON holding"
|
|
line "a BERRY will heal"
|
|
cont "itself in battle."
|
|
|
|
para "Many other items"
|
|
line "can be held by"
|
|
cont "#MON…"
|
|
|
|
para "It sure is tough"
|
|
line "taking notes…"
|
|
done
|
|
|
|
AcademyBlackboardText:
|
|
text "The blackboard"
|
|
line "describes #MON"
|
|
|
|
para "status changes in"
|
|
line "battle."
|
|
done
|
|
|
|
AcademyBlackboardText2:
|
|
; unused
|
|
text "Read which topic?"
|
|
done
|
|
|
|
AcademyPoisonText:
|
|
text "If poisoned, a"
|
|
line "#MON steadily"
|
|
cont "loses HP."
|
|
|
|
para "Poison lingers"
|
|
line "after the battle,"
|
|
|
|
para "and HP is lost as"
|
|
line "you walk."
|
|
|
|
para "To cure it, use an"
|
|
line "ANTIDOTE."
|
|
done
|
|
|
|
AcademyParalysisText:
|
|
text "Paralysis reduces"
|
|
line "speed and may"
|
|
cont "prevent movement."
|
|
|
|
para "It remains after"
|
|
line "battle, so use"
|
|
cont "a PARLYZ HEAL."
|
|
done
|
|
|
|
AcademySleepText:
|
|
text "If asleep, your"
|
|
line "#MON can't make"
|
|
cont "a move."
|
|
|
|
para "A sleeping #MON"
|
|
line "doesn't wake up"
|
|
cont "after battle."
|
|
|
|
para "Wake it up with"
|
|
line "an AWAKENING."
|
|
done
|
|
|
|
AcademyBurnText:
|
|
text "A burn steadily"
|
|
line "consumes HP."
|
|
|
|
para "It also reduces"
|
|
line "attack power."
|
|
|
|
para "A burn lingers"
|
|
line "after battle."
|
|
|
|
para "Use a BURN HEAL as"
|
|
line "the cure."
|
|
done
|
|
|
|
AcademyFreezeText:
|
|
text "If your #MON is"
|
|
line "frozen, it can't"
|
|
cont "do a thing."
|
|
|
|
para "It remains frozen"
|
|
line "after battle."
|
|
|
|
para "Thaw it out with"
|
|
line "an ICE HEAL."
|
|
done
|
|
|
|
AcademyNotebookText:
|
|
text "It's this kid's"
|
|
line "notebook…"
|
|
|
|
para "Catch #MON"
|
|
line "using # BALLS."
|
|
|
|
para "Up to six can be"
|
|
line "in your party."
|
|
|
|
para "Keep reading?"
|
|
done
|
|
|
|
AcademyNotebookText1:
|
|
text "Before throwing a"
|
|
line "# BALL, weaken"
|
|
cont "the target first."
|
|
|
|
para "A poisoned or"
|
|
line "burned #MON is"
|
|
cont "easier to catch."
|
|
|
|
para "Keep reading?"
|
|
done
|
|
|
|
AcademyNotebookText2:
|
|
text "Some moves may"
|
|
line "cause confusion."
|
|
|
|
para "Confusion may make"
|
|
line "a #MON attack"
|
|
cont "itself."
|
|
|
|
para "Leaving battle"
|
|
line "clears up any"
|
|
cont "confusion."
|
|
|
|
para "Keep reading?"
|
|
done
|
|
|
|
AcademyNotebookText3:
|
|
text "People who catch"
|
|
line "and use #MON"
|
|
|
|
para "in battle are"
|
|
line "#MON trainers."
|
|
|
|
para "They are expected"
|
|
line "to visit #MON"
|
|
|
|
para "GYMS and defeat"
|
|
line "other trainers."
|
|
|
|
para "The next page"
|
|
line "is… Blank!"
|
|
|
|
para "Boy: E-he-he…"
|
|
|
|
para "I haven't written"
|
|
line "anymore…"
|
|
done
|
|
|
|
AcademyStickerMachineText:
|
|
text "This super machine"
|
|
line "prints data out as"
|
|
|
|
para "stickers!"
|
|
done
|
|
|
|
EarlsPokemonAcademy_MapEventHeader:
|
|
; filler
|
|
db 0, 0
|
|
|
|
.Warps:
|
|
db 2
|
|
warp_def $f, $3, 3, VIOLET_CITY
|
|
warp_def $f, $4, 3, VIOLET_CITY
|
|
|
|
.XYTriggers:
|
|
db 0
|
|
|
|
.Signposts:
|
|
db 4
|
|
signpost 1, 0, SIGNPOST_READ, AcademyBookshelf
|
|
signpost 1, 1, SIGNPOST_READ, AcademyBookshelf
|
|
signpost 0, 3, SIGNPOST_READ, AcademyBlackboard
|
|
signpost 0, 4, SIGNPOST_READ, AcademyBlackboard
|
|
|
|
.PersonEvents:
|
|
db 6
|
|
person_event SPRITE_FISHER, 6, 8, OW_UP | $2, $0, -1, -1, (PAL_OW_GREEN << 4) | $80, 0, AcademyEarl, EVENT_EARLS_ACADEMY_EARL
|
|
person_event SPRITE_YOUNGSTER, 9, 6, OW_UP | $3, $0, -1, -1, (PAL_OW_RED << 4) | $80, 0, YoungsterScript_0x68a83, -1
|
|
person_event SPRITE_GAMEBOY_KID, 15, 7, OW_UP | $2, $0, -1, -1, $0, 0, GameboyKidScript_0x68a86, -1
|
|
person_event SPRITE_GAMEBOY_KID, 15, 8, OW_LEFT | $0, $0, -1, -1, (PAL_OW_RED << 4) | $80, 0, GameboyKidScript_0x68a91, -1
|
|
person_event SPRITE_YOUNGSTER, 11, 8, OW_UP | $3, $0, -1, -1, $0, 0, YoungsterScript_0x68a9c, -1
|
|
person_event SPRITE_POKEDEX, 8, 6, OW_DOWN | $1, $0, -1, -1, $0, 0, AcademyNotebook, -1
|