const_def 2 ; object constants const VERMILIONGYM_SURGE const VERMILIONGYM_GENTLEMAN const VERMILIONGYM_ROCKER const VERMILIONGYM_SUPER_NERD const VERMILIONGYM_GYM_GUY VermilionGym_MapScripts: db 0 ; scene scripts db 0 ; callbacks VermilionGymSurgeScript: faceplayer opentext checkflag ENGINE_THUNDERBADGE iftrue .FightDone writetext LtSurgeIntroText waitbutton closetext winlosstext LtSurgeWinLossText, 0 loadtrainer LT_SURGE, LT_SURGE1 startbattle reloadmapafterbattle setevent EVENT_BEAT_LTSURGE setevent EVENT_BEAT_GENTLEMAN_GREGORY setevent EVENT_BEAT_GUITARIST_VINCENT setevent EVENT_BEAT_JUGGLER_HORTON opentext writetext ReceivedThunderBadgeText playsound SFX_GET_BADGE waitsfx setflag ENGINE_THUNDERBADGE writetext LtSurgeThunderBadgeText waitbutton closetext end .FightDone: writetext LtSurgeFightDoneText waitbutton closetext end TrainerGentlemanGregory: trainer GENTLEMAN, GREGORY, EVENT_BEAT_GENTLEMAN_GREGORY, GentlemanGregorySeenText, GentlemanGregoryBeatenText, 0, .Script .Script: endifjustbattled opentext writetext GentlemanGregoryAfterBattleText waitbutton closetext end TrainerGuitaristVincent: trainer GUITARIST, VINCENT, EVENT_BEAT_GUITARIST_VINCENT, GuitaristVincentSeenText, GuitaristVincentBeatenText, 0, .Script .Script: endifjustbattled opentext writetext GuitaristVincentAfterBattleText waitbutton closetext end TrainerJugglerHorton: trainer JUGGLER, HORTON, EVENT_BEAT_JUGGLER_HORTON, JugglerHortonSeenText, JugglerHortonBeatenText, 0, .Script .Script: endifjustbattled opentext writetext JugglerHortonAfterBattleText waitbutton closetext end VermilionGymGuyScript: faceplayer opentext checkevent EVENT_BEAT_LTSURGE iftrue .VermilionGymGuyWinScript writetext VermilionGymGuyText waitbutton closetext end .VermilionGymGuyWinScript: writetext VermilionGymGuyWinText waitbutton closetext end VermilionGymTrashCan: jumptext VermilionGymTrashCanText VermilionGymStatue: checkflag ENGINE_THUNDERBADGE iftrue .Beaten jumpstd gymstatue1 .Beaten: gettrainername STRING_BUFFER_4, LT_SURGE, LT_SURGE1 jumpstd gymstatue2 LtSurgeIntroText: text "SURGE: Hey, you" line "little tyke!" para "I have to hand it" line "to you. It may not" para "be very smart to" line "challenge me, but" cont "it takes guts!" para "When it comes to" line "electric #MON," cont "I'm number one!" para "I've never lost on" line "the battlefield." para "I'll zap you just" line "like I did my" cont "enemies in war!" done LtSurgeWinLossText: text "SURGE: Arrrgh!" line "You are strong!" para "OK, kid. You get" line "THUNDERBADGE!" done ReceivedThunderBadgeText: text " received" line "THUNDERBADGE." done LtSurgeThunderBadgeText: text "SURGE: THUNDER-" line "BADGE increases" cont "#MON's speed. " para "Consider it proof" line "that you defeated" para "me. You wear it" line "proudly, hear?" done LtSurgeFightDoneText: text "SURGE: Hey, kid!" line "Still slugging and" cont "chugging away?" para "My #MON and I" line "are still at it!" done GentlemanGregorySeenText: text "You're here to" line "defeat LT.SURGE?" para "Not if I can help" line "it!" done GentlemanGregoryBeatenText: text "Sorry I failed" line "you, LT.SURGE," cont "sir!" done GentlemanGregoryAfterBattleText: text "When I was still" line "in the army, LT." para "SURGE saved my" line "life." done GuitaristVincentSeenText: text "LT.SURGE recog-" line "nized my potential" para "with electric" line "#MON." para "Think you can beat" line "me?" done GuitaristVincentBeatenText: text "Ooh, how shocking!" done GuitaristVincentAfterBattleText: text "If the GYM's traps" line "were working, you" para "would have been" line "toast…" done JugglerHortonSeenText: text "I'm going to take" line "you down! Prepare" cont "to be shocked!" done JugglerHortonBeatenText: text "Gwaaah!" line "I was overpowered…" done JugglerHortonAfterBattleText: text "Don't get too com-" line "fortable about" para "beating me…" line "LT.SURGE is tough." done VermilionGymGuyText: text "Yo! CHAMP in" line "making!" para "You lucked out" line "this time." para "LT.SURGE is very" line "cautious. He has" para "traps set all over" line "the GYM." para "But--he-heh--the" line "traps aren't" cont "active right now." para "You'll have no" line "problem getting to" cont "LT.SURGE." done VermilionGymGuyWinText: text "Whew! That was an" line "electrifying bout!" para "It sure made me" line "nervous." done VermilionGymTrashCanText: text "Nope! Nothing here" line "but trash." done VermilionGym_MapEvents: db 0, 0 ; filler db 2 ; warp events warp_event 4, 17, VERMILION_CITY, 7 warp_event 5, 17, VERMILION_CITY, 7 db 0 ; coord events db 17 ; bg events bg_event 1, 7, BGEVENT_READ, VermilionGymTrashCan bg_event 3, 7, BGEVENT_READ, VermilionGymTrashCan bg_event 5, 7, BGEVENT_READ, VermilionGymTrashCan bg_event 7, 7, BGEVENT_READ, VermilionGymTrashCan bg_event 9, 7, BGEVENT_READ, VermilionGymTrashCan bg_event 1, 9, BGEVENT_READ, VermilionGymTrashCan bg_event 3, 9, BGEVENT_READ, VermilionGymTrashCan bg_event 5, 9, BGEVENT_READ, VermilionGymTrashCan bg_event 7, 9, BGEVENT_READ, VermilionGymTrashCan bg_event 9, 9, BGEVENT_READ, VermilionGymTrashCan bg_event 1, 11, BGEVENT_READ, VermilionGymTrashCan bg_event 3, 11, BGEVENT_READ, VermilionGymTrashCan bg_event 5, 11, BGEVENT_READ, VermilionGymTrashCan bg_event 7, 11, BGEVENT_READ, VermilionGymTrashCan bg_event 9, 11, BGEVENT_READ, VermilionGymTrashCan bg_event 3, 15, BGEVENT_READ, VermilionGymStatue bg_event 6, 15, BGEVENT_READ, VermilionGymStatue db 5 ; object events object_event 5, 2, SPRITE_SURGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, VermilionGymSurgeScript, -1 object_event 8, 8, SPRITE_GENTLEMAN, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 4, TrainerGentlemanGregory, -1 object_event 4, 7, SPRITE_ROCKER, SPRITEMOVEDATA_STANDING_DOWN, 3, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerGuitaristVincent, -1 object_event 0, 10, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 4, TrainerJugglerHorton, -1 object_event 7, 15, SPRITE_GYM_GUY, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 1, VermilionGymGuyScript, -1