ref: a129ba7b43b743efacf2926f4443b5f1d6305ef8
dir: /maps/EarlsPokemonAcademy.asm/
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, $6, 0, 0, -1, -1, 8 + PAL_OW_GREEN, 0, 0, AcademyEarl, EVENT_EARLS_ACADEMY_EARL person_event SPRITE_YOUNGSTER, 9, 6, $7, 0, 0, -1, -1, 8 + PAL_OW_RED, 0, 0, YoungsterScript_0x68a83, -1 person_event SPRITE_GAMEBOY_KID, 15, 7, $6, 0, 0, -1, -1, 0, 0, 0, GameboyKidScript_0x68a86, -1 person_event SPRITE_GAMEBOY_KID, 15, 8, $8, 0, 0, -1, -1, 8 + PAL_OW_RED, 0, 0, GameboyKidScript_0x68a91, -1 person_event SPRITE_YOUNGSTER, 11, 8, $7, 0, 0, -1, -1, 0, 0, 0, YoungsterScript_0x68a9c, -1 person_event SPRITE_POKEDEX, 8, 6, $1, 0, 0, -1, -1, 0, 0, 0, AcademyNotebook, -1