pokecrystal/maps/RadioTower2F.asm

798 lines
14 KiB
NASM

RadioTower2F_MapScriptHeader:
; trigger count
db 0
; callback count
db 0
UnknownScript_0x5d6fd:
end
SuperNerdScript_0x5d6fe:
jumptextfaceplayer UnknownText_0x5d924
TeacherScript_0x5d701:
faceplayer
loadfont
checkflag $0013
iftrue UnknownScript_0x5d70f
writetext UnknownText_0x5d956
closetext
loadmovesprites
end
UnknownScript_0x5d70f:
writetext UnknownText_0x5d983
closetext
loadmovesprites
end
JigglypuffScript_0x5d715:
loadfont
writetext UnknownText_0x5d9b6
cry JIGGLYPUFF
closetext
loadmovesprites
end
BlackBeltScript_0x5d71f:
jumptextfaceplayer UnknownText_0x5d9cb
BlackBeltScript_0x5d722:
jumptextfaceplayer UnknownText_0x5da44
TrainerGruntM4:
; bit/flag number
dw EVENT_BEAT_ROCKET_GRUNTM_4
; trainer group && trainer id
db GRUNTM, 4
; text when seen
dw GruntM4SeenText
; text when trainer beaten
dw GruntM4BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntM4Script
GruntM4Script:
talkaftercancel
loadfont
writetext UnknownText_0x5db07
closetext
loadmovesprites
end
TrainerGruntM5:
; bit/flag number
dw EVENT_BEAT_ROCKET_GRUNTM_5
; trainer group && trainer id
db GRUNTM, 5
; text when seen
dw GruntM5SeenText
; text when trainer beaten
dw GruntM5BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntM5Script
GruntM5Script:
talkaftercancel
loadfont
writetext UnknownText_0x5db99
closetext
loadmovesprites
end
TrainerGruntM6:
; bit/flag number
dw EVENT_BEAT_ROCKET_GRUNTM_6
; trainer group && trainer id
db GRUNTM, 6
; text when seen
dw GruntM6SeenText
; text when trainer beaten
dw GruntM6BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntM6Script
GruntM6Script:
talkaftercancel
loadfont
writetext UnknownText_0x5dc00
closetext
loadmovesprites
end
TrainerGruntF2:
; bit/flag number
dw EVENT_BEAT_ROCKET_GRUNTF_2
; trainer group && trainer id
db GRUNTF, 2
; text when seen
dw GruntF2SeenText
; text when trainer beaten
dw GruntF2BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntF2Script
GruntF2Script:
talkaftercancel
loadfont
writetext UnknownText_0x5dcd0
closetext
loadmovesprites
end
Buena:
faceplayer
loadfont
checkflag $0013
iftrue UnknownScript_0x5d865
checkevent EVENT_MET_BUENA
iffalse UnknownScript_0x5d800
checkflag $0060
iftrue UnknownScript_0x5d82f
checkcode VAR_HOUR
if_less_than $12, UnknownScript_0x5d893
checkflag $005f
iffalse UnknownScript_0x5d80a
checkitem BLUE_CARD
iffalse UnknownScript_0x5d86b
checkcode VAR_BLUECARDBALANCE
if_equal $1e, UnknownScript_0x5d87f
playmusic MUSIC_BUENAS_PASSWORD
writetext UnknownText_0x5de35
special Function4ae12
iffalse UnknownScript_0x5d81e
writetext UnknownText_0x5de84
closetext
loadmovesprites
spriteface $b, RIGHT
checkcode VAR_FACING
if_not_equal $3, UnknownScript_0x5d7be
applymovement $0, MovementData_0x5d921
UnknownScript_0x5d7be:
spriteface $0, RIGHT
loadfont
writetext UnknownText_0x5dedd
closetext
loadmovesprites
spriteface $b, DOWN
refreshscreen $0
special SpecialBuenasPassword
loadmovesprites
iffalse UnknownScript_0x5d845
loadfont
writetext UnknownText_0x5dfc1
closetext
loadmovesprites
checkcode VAR_BLUECARDBALANCE
addvar $1
writevarcode VAR_BLUECARDBALANCE
waitbutton
playsound SFX_TRANSACTION
setflag $0060
pause 20
spriteface $b, RIGHT
loadfont
writetext UnknownText_0x5e054
closetext
loadmovesprites
special Functionc48f
pause 20
special RestartMapMusic
checkcode VAR_BLUECARDBALANCE
if_equal $1e, UnknownScript_0x5d8a4
end
UnknownScript_0x5d800:
writetext UnknownText_0x5dcf4
keeptextopen
setevent EVENT_MET_BUENA
verbosegiveitem BLUE_CARD, 1
UnknownScript_0x5d80a:
writetext UnknownText_0x5de10
closetext
loadmovesprites
checkcellnum $25
iftrue UnknownScript_0x5d81a
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d81a:
spriteface $b, RIGHT
end
UnknownScript_0x5d81e:
writetext UnknownText_0x5df29
closetext
loadmovesprites
spriteface $b, RIGHT
special Functionc48f
pause 20
special RestartMapMusic
end
UnknownScript_0x5d82f:
writetext UnknownText_0x5df6c
closetext
loadmovesprites
checkcellnum $25
iftrue UnknownScript_0x5d83f
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d83f:
spriteface $b, RIGHT
pause 10
end
UnknownScript_0x5d845:
setflag $0060
loadfont
writetext UnknownText_0x5e01c
closetext
loadmovesprites
spriteface $b, RIGHT
pause 20
loadfont
writetext UnknownText_0x5e054
closetext
loadmovesprites
spriteface $b, RIGHT
special Functionc48f
pause 20
special RestartMapMusic
end
UnknownScript_0x5d865:
writetext UnknownText_0x5e0c2
closetext
loadmovesprites
end
UnknownScript_0x5d86b:
writetext UnknownText_0x5e192
closetext
loadmovesprites
checkcellnum $25
iftrue UnknownScript_0x5d87b
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d87b:
spriteface $b, RIGHT
end
UnknownScript_0x5d87f:
writetext UnknownText_0x5e0f1
closetext
loadmovesprites
checkcellnum $25
iftrue UnknownScript_0x5d88f
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d88f:
spriteface $b, RIGHT
end
UnknownScript_0x5d893:
writetext UnknownText_0x5e131
closetext
loadmovesprites
checkcellnum $25
iftrue UnknownScript_0x5d8a3
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d8a3:
end
UnknownScript_0x5d8a4:
checkcellnum $25
iftrue UnknownScript_0x5d8fe
pause 20
spriteface $b, DOWN
pause 15
spriteface $0, UP
pause 15
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
iftrue UnknownScript_0x5d8cc
showemote $0, $b, 15
setevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
setevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
loadfont
writetext UnknownText_0x5e1ee
jump UnknownScript_0x5d8d0
UnknownScript_0x5d8cc:
loadfont
writetext UnknownText_0x5e2bf
UnknownScript_0x5d8d0:
askforphonenumber $25
if_equal $1, UnknownScript_0x5d8f6
if_equal $2, UnknownScript_0x5d8ed
writetext UnknownText_0x5e2f3
playsound SFX_REGISTER_PHONE_NUMBER
waitbutton
keeptextopen
writetext UnknownText_0x5e310
closetext
loadmovesprites
spriteface $b, RIGHT
addcellnum $25
end
UnknownScript_0x5d8ed:
writetext UnknownText_0x5e33c
closetext
loadmovesprites
spriteface $b, RIGHT
end
UnknownScript_0x5d8f6:
writetext UnknownText_0x5e35e
closetext
loadmovesprites
spriteface $b, RIGHT
UnknownScript_0x5d8fe:
end
ReceptionistScript_0x5d8ff:
faceplayer
loadfont
checkitem BLUE_CARD
iffalse UnknownScript_0x5d90f
writetext UnknownText_0x5e392
keeptextopen
special SpecialBuenaPrize
loadmovesprites
end
UnknownScript_0x5d90f:
writetext UnknownText_0x5e3d8
keeptextopen
loadmovesprites
end
MapRadioTower2FSignpost0Script:
jumptext UnknownText_0x5e426
MapRadioTower2FSignpost1Script:
jumptext UnknownText_0x5e430
MapRadioTower2FSignpost5Script:
jumptext UnknownText_0x5e463
RadioTower2FBookshelf:
jumpstd magazinebookshelf
MovementData_0x5d921:
slow_step_down
slow_step_right
step_end
UnknownText_0x5d924:
text "You can listen to"
line "the radio any-"
cont "where. Tune in!"
done
UnknownText_0x5d956:
text "Lullabies on the"
line "radio may make"
cont "#MON sleep."
done
UnknownText_0x5d983:
text "Why would they"
line "want to take over"
cont "the RADIO TOWER?"
done
UnknownText_0x5d9b6:
text "JIGGLYPUFF:"
line "Jiggly…"
done
UnknownText_0x5d9cb:
text "Sorry. Authorized"
line "personnel only"
cont "beyond this point."
para "It wasn't that way"
line "before."
para "There's something"
line "wrong with the"
cont "DIRECTOR…"
done
UnknownText_0x5da44:
text "Feel free to look"
line "around anywhere."
para "The DIRECTOR is"
line "nice again, just"
cont "as he was before."
done
GruntM4SeenText:
text "Three years ago,"
line "TEAM ROCKET was"
cont "forced to disband."
para "But we're making a"
line "comeback here!"
done
GruntM4BeatenText:
text "Gwah! Don't get"
line "cute!"
done
UnknownText_0x5db07:
text "We won't let you"
line "ruin our plans"
cont "for our comeback!"
done
GruntM5SeenText:
text "We're TEAM ROCKET,"
line "the exploiters of"
cont "#MON!"
para "We love being"
line "evil! Scared?"
done
GruntM5BeatenText:
text "You think you're a"
line "hero?"
done
UnknownText_0x5db99:
text "We're not always"
line "evil. We just do"
cont "whatever we like."
done
GruntM6SeenText:
text "Hey, hey! Keep out"
line "of our way!"
done
GruntM6BeatenText:
text "Arggh. I give up."
done
UnknownText_0x5dc00:
text "Our EXECUTIVES are"
line "trying to take"
cont "this place over."
para "They have some big"
line "plan. I wonder"
cont "what that is?"
done
GruntF2SeenText:
text "Hahaha!"
para "How boring."
line "It was far too"
para "easy to take over"
line "this place!"
para "Come on, keep me"
line "amused!"
done
GruntF2BeatenText:
text "Wh-who are you?"
done
UnknownText_0x5dcd0:
text "You beat me, and"
line "I won't forget it!"
done
UnknownText_0x5dcf4:
text "BUENA: Hi! I'm"
line "BUENA!"
para "Do you know about"
line "a radio program"
cont "called PASSWORD?"
para "If you can tell me"
line "the password from"
para "the program, you"
line "will earn points."
para "Save up those"
line "points and trade"
para "them to that sweet"
line "young lady over"
para "there for some"
line "choice prizes!"
para "Here you go!"
para "It's your very own"
line "point card!"
done
UnknownText_0x5de10:
text "BUENA: Tune in to"
line "my PASSWORD SHOW!"
done
UnknownText_0x5de35:
text "BUENA: Hi!"
line "Did you tune in to"
cont "my radio show?"
para "Do you remember"
line "today's password?"
done
UnknownText_0x5de84:
text "BUENA: Oh, wow!"
line "Thank you!"
para "What was your name"
line "again?"
para "…<PLAY_G>, OK!"
para "Come on, <PLAY_G>."
line "Join the show."
done
UnknownText_0x5dedd:
text "BUENA: Everyone"
line "ready?"
para "I want to hear you"
line "shout out today's"
para "password for"
line "<PLAY_G>!"
done
UnknownText_0x5df29:
text "BUENA: Come back"
line "after you listen"
para "to my show, OK?"
line "Catch ya later!"
done
UnknownText_0x5df6c:
text "BUENA: Sorry…"
para "You get just one"
line "chance each day."
para "Come back tomorrow"
line "for another try!"
done
UnknownText_0x5dfc1:
text "BUENA: YIPPEE!"
line "That's right!"
para "You did tune in!"
line "I'm so happy!"
para "You earned one"
line "point! Congrats!"
done
UnknownText_0x5e01c:
text "BUENA: Aww…"
line "That's not it…"
para "Did you forget the"
line "password?"
done
UnknownText_0x5e054:
text "BUENA: Yup! Our"
line "contestant was"
para "<PLAY_G>."
line "Thanks for coming!"
para "I hope all you"
line "listeners will"
para "come too!"
line "I'll be waiting!"
done
UnknownText_0x5e0c2:
text "BUENA: Huh?"
line "Today's password?"
para "HELP, of course!"
done
UnknownText_0x5e0f1:
text "BUENA: Your BLUE"
line "CARD's full."
para "Trade it in for a"
line "fabulous prize!"
done
UnknownText_0x5e131:
text "BUENA: Tune in to"
line "PASSWORD every"
para "night from six to"
line "midnight!"
para "Tune in, then drop"
line "in for a visit!"
done
UnknownText_0x5e192:
text "BUENA: Oh? You"
line "forgot to bring"
cont "your BLUE CARD?"
para "I can't give you"
line "points if you"
cont "don't have it."
done
UnknownText_0x5e1ee:
text "BUENA: Oh! Your"
line "BLUE CARD reached"
para "30 points today!"
line "That's so wild!"
para "Hmm… There isn't a"
line "prize for hitting"
cont "30 points, but…"
para "You came by so"
line "often, <PLAY_G>."
para "I'll make you a"
line "special deal!"
para "How would you like"
line "my phone number?"
done
UnknownText_0x5e2bf:
text "BUENA: <PLAY_G>,"
line "do you want to"
para "register my phone"
line "number?"
done
UnknownText_0x5e2f3:
text "<PLAYER> registered"
line "BUENA's number."
done
UnknownText_0x5e310:
text "BUENA: I look"
line "forward to hearing"
cont "from you!"
done
UnknownText_0x5e33c:
text "BUENA: Aww… It's a"
line "special prize…"
done
UnknownText_0x5e35e:
text "BUENA: <PLAY_G>,"
line "your phone list"
para "has no room left"
line "for me…"
done
UnknownText_0x5e392:
text "You can cash in"
line "your saved points"
para "for a lovely prize"
line "of your choice!"
done
UnknownText_0x5e3d8:
text "You can't trade in"
line "points without"
cont "your BLUE CARD."
para "Don't forget your"
line "BLUE CARD!"
done
UnknownText_0x5e426:
text "2F SALES"
done
UnknownText_0x5e430:
text "PROF.OAK'S #MON"
line "TALK"
para "The Hottest Show"
line "on the Air!"
done
UnknownText_0x5e463:
text "Anywhere, Anytime"
line "#MON Radio"
done
RadioTower2F_MapEventHeader:
; filler
db 0, 0
; warps
db 2
warp_def $0, $0, 1, GROUP_RADIO_TOWER_3F, MAP_RADIO_TOWER_3F
warp_def $0, $f, 3, GROUP_RADIO_TOWER_1F, MAP_RADIO_TOWER_1F
; xy triggers
db 0
; signposts
db 6
signpost 0, 3, $0, MapRadioTower2FSignpost0Script
signpost 0, 5, $0, MapRadioTower2FSignpost1Script
signpost 1, 9, $0, RadioTower2FBookshelf
signpost 1, 10, $0, RadioTower2FBookshelf
signpost 1, 11, $0, RadioTower2FBookshelf
signpost 0, 13, $0, MapRadioTower2FSignpost5Script
; people-events
db 11
person_event SPRITE_SUPER_NERD, 10, 10, $8, $0, 255, 255, $a0, 0, SuperNerdScript_0x5d6fe, $06cf
person_event SPRITE_TEACHER, 6, 21, $5, $1, 255, 255, $80, 0, TeacherScript_0x5d701, $ffff
person_event SPRITE_ROCKET, 8, 5, $7, $0, 255, 255, $2, 3, TrainerGruntM4, $06ce
person_event SPRITE_ROCKET, 8, 12, $6, $0, 255, 255, $2, 3, TrainerGruntM5, $06ce
person_event SPRITE_ROCKET, 5, 8, $6, $0, 255, 255, $2, 2, TrainerGruntM6, $06ce
person_event SPRITE_ROCKET_GIRL, 9, 14, $7, $0, 255, 255, $82, 3, TrainerGruntF2, $06ce
person_event SPRITE_BLACK_BELT, 5, 4, $6, $0, 255, 255, $0, 0, BlackBeltScript_0x5d71f, $06d1
person_event SPRITE_BLACK_BELT, 5, 5, $6, $0, 255, 255, $0, 0, BlackBeltScript_0x5d722, $06d0
person_event SPRITE_JIGGLYPUFF, 5, 16, $16, $0, 255, 255, $0, 0, JigglypuffScript_0x5d715, $ffff
person_event SPRITE_BUENA, 9, 18, $9, $0, 255, 255, $80, 0, Buena, $ffff
person_event SPRITE_RECEPTIONIST, 11, 16, $9, $0, 255, 255, $a0, 0, ReceptionistScript_0x5d8ff, $06cf