const_def 2 ; object constants const POKECOMCENTERADMINOFFICEMOBILE_SCIENTIST1 const POKECOMCENTERADMINOFFICEMOBILE_SCIENTIST2 const POKECOMCENTERADMINOFFICEMOBILE_SCIENTIST3 PokecomCenterAdminOfficeMobile_MapScripts: db 0 ; scene scripts db 0 ; callbacks PokecomCenterAdminOfficeMobileScientist1Script: jumptextfaceplayer PokecomCenterAdminOfficeMobileScientist1Text PokecomCenterAdminOfficeMobileScientist2Script: jumptextfaceplayer PokecomCenterAdminOfficeMobileScientist2Text PokecomCenterAdminOfficeMobileScientist3Script: jumptextfaceplayer PokecomCenterAdminOfficeMobileScientist3Text PokecomCenterAdminOfficeMobileComputer1: opentext writetext PokecomCenterAdminOfficeMobileComputer1Text waitbutton .loop: reloadmappart loadmenu .Computer1MenuHeader verticalmenu closewindow ifequal 1, .PokeComClub ifequal 2, .MobileCenter sjump .Quit .PokeComClub: opentext writetext PokecomCenterAdminOfficeMobileComputer1Text_PokeComClub waitbutton sjump .loop .MobileCenter: opentext writetext PokecomCenterAdminOfficeMobileComputer1Text_MobileCenter waitbutton sjump .loop .Quit: closetext end .Computer1MenuHeader: db MENU_BACKUP_TILES ; flags menu_coords 0, 0, 15, 8 dw .MenuData db 1 ; default option .MenuData: db STATICMENU_CURSOR ; flags db 3 ; items db "# つうしん クラブ@" ; # COM CLUB db "モバイルセンター@" ; MOBILE CENTER db "やめる@" ; QUIT PokecomCenterAdminOfficeMobileComputer2: opentext writetext PokecomCenterAdminOfficeMobileComputer2Text waitbutton .loop: reloadmappart loadmenu .Computer2MenuHeader verticalmenu closewindow ifequal 1, .UsePhone ifequal 2, .DontUsePhone sjump .Quit .UsePhone: opentext writetext PokecomCenterAdminOfficeMobileComputer2Text_UsePhone waitbutton sjump .loop .DontUsePhone: opentext writetext PokecomCenterAdminOfficeMobileComputer2Text_DontUsePhone waitbutton sjump .loop .Quit: closetext end .Computer2MenuHeader: db MENU_BACKUP_TILES ; flags menu_coords 0, 0, 15, 8 dw .MenuData db 1 ; default option .MenuData: db STATICMENU_CURSOR ; flags db 3 ; items db "でんわつかうとき@" ; Use phone db "でんわつながらないとき@" ; Don't use phone db "やめる@" ; QUIT PokecomCenterAdminOfficeMobileComputer3: jumptext PokecomCenterAdminOfficeMobileComputer3Text PokecomCenterAdminOfficeMobileScientist1Text: text "#COM CENTER and" line "MOBILE CENTER were" para "built to satisfy" line "demands for trades" para "and battles with" line "trainers far away" para "and with total" line "strangers." done PokecomCenterAdminOfficeMobileScientist2Text: text "When you linked" line "with someone by" para "mobile phone for" line "the first time," para "weren't you" line "impressed?" para "When my first try" line "worked, I was so" para "impressed that I" line "got the shakes!" done PokecomCenterAdminOfficeMobileScientist3Text: text "They were able to" line "build this huge" para "facility thanks to" line "advances in wire-" cont "less technology." done PokecomCenterAdminOfficeMobileComputer1Text: text "It's a notice" line "about where MOBILE" para "ADAPTERS are to be" line "used…" done PokecomCenterAdminOfficeMobileComputer1Text_PokeComClub: text "There's a #COM" line "CLUB upstairs in" para "any #MON" line "CENTER." para "There, you can" line "battle or trade" para "with a friend far" line "away by using a" cont "MOBILE ADAPTER." para "To link up, your" line "friend must have" para "the same kind of" line "MOBILE ADAPTER as" cont "you." done PokecomCenterAdminOfficeMobileComputer1Text_MobileCenter: text "To use the TRADE" line "CORNER or read the" para "#MON NEWS, you" line "need to phone the" cont "MOBILE CENTER." para "You must register" line "at the MOBILE" para "CENTER before" line "connecting there." done PokecomCenterAdminOfficeMobileComputer2Text: text "It's a notice" line "about using the" cont "phone…" done PokecomCenterAdminOfficeMobileComputer2Text_UsePhone: text "Please ensure that" line "your phone and" para "MOBILE ADAPTER are" line "properly linked." para "Please make sure" line "the wireless phone" cont "signal is strong." para "Don't touch or" line "hang up the phone" cont "while linking." done PokecomCenterAdminOfficeMobileComputer2Text_DontUsePhone: text "If the server is" line "busy, it may not" para "be possible to log" line "on." para "If so, please call" line "back later." para "If you are unable" line "to log on or don't" para "understand the" line "error messages," para "call a support" line "center or read the" cont "instructions." done PokecomCenterAdminOfficeMobileComputer3Text: text "The ADMINISTRATION" line "OFFICE received an" cont "e-mail. It says…" para "<……> <……> <……>" para "To the #COM" line "CENTER staff…" para "Wireless communi-" line "cation has enabled" para "#MON trainers" line "to interact across" para "the nation. Let's" line "keep working for" para "the day when all" line "the trainers in" para "the world can link" line "without barriers!" para "<……> <……> <……>" done PokecomCenterAdminOfficeMobile_MapEvents: db 0, 0 ; filler db 2 ; warp events warp_event 0, 31, GOLDENROD_POKECENTER_1F, 3 warp_event 1, 31, GOLDENROD_POKECENTER_1F, 3 db 0 ; coord events db 3 ; bg events bg_event 6, 26, BGEVENT_UP, PokecomCenterAdminOfficeMobileComputer1 bg_event 6, 28, BGEVENT_UP, PokecomCenterAdminOfficeMobileComputer2 bg_event 3, 26, BGEVENT_UP, PokecomCenterAdminOfficeMobileComputer3 db 3 ; object events object_event 4, 28, SPRITE_SCIENTIST, SPRITEMOVEDATA_WALK_UP_DOWN, 0, 1, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, PokecomCenterAdminOfficeMobileScientist1Script, -1 object_event 7, 27, SPRITE_SCIENTIST, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, PokecomCenterAdminOfficeMobileScientist2Script, -1 object_event 7, 29, SPRITE_SCIENTIST, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, PokecomCenterAdminOfficeMobileScientist3Script, -1