pokecrystal-board/maps/RadioTower1F.asm
2015-10-16 13:35:43 -04:00

493 lines
8.8 KiB
NASM

RadioTower1F_MapScriptHeader:
.MapTriggers:
db 0
.MapCallbacks:
db 0
ReceptionistScript_0x5cd29:
faceplayer
loadfont
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue UnknownScript_0x5cd37
writetext UnknownText_0x5ce77
closetext
loadmovesprites
end
UnknownScript_0x5cd37:
writetext UnknownText_0x5ce81
closetext
loadmovesprites
end
GentlemanScript_0x5cd3d:
faceplayer
loadfont
writetext UnknownText_0x5ceba
keeptextopen
special Special_CheckLuckyNumberShowFlag
iffalse .skip
special Special_ResetLuckyNumberShowFlag
.skip:
special Special_PrintTodaysLuckyNumber
checkflag ENGINE_LUCKY_NUMBER_SHOW
iftrue .GameOver
writetext UnknownText_0x5cf3a
keeptextopen
loadmovesprites
applymovement $6, MovementData_0x5ce71
loadfont
writetext UnknownText_0x5cf5a
keeptextopen
waitbutton
writetext UnknownText_0x5cf79
playsound SFX_DEX_FANFARE_20_49
waitbutton
keeptextopen
special Special_CheckForLuckyNumberWinners
loadmovesprites
applymovement $6, MovementData_0x5ce74
loadfont
if_equal 1, .FirstPlace
if_equal 2, .SecondPlace
if_equal 3, .ThirdPlace
jump .NoPrize
.GameOver
writetext UnknownText_0x5cf7e
closetext
loadmovesprites
end
.FirstPlace
writetext UnknownText_0x5cfb5
playsound SFX_1ST_PLACE
waitbutton
keeptextopen
giveitem MASTER_BALL, 1
iffalse .BagFull
itemnotify
setflag ENGINE_LUCKY_NUMBER_SHOW
jump .GameOver
.SecondPlace
writetext UnknownText_0x5d023
playsound SFX_2ND_PLACE
waitbutton
keeptextopen
giveitem EXP_SHARE, 1
iffalse .BagFull
itemnotify
setflag ENGINE_LUCKY_NUMBER_SHOW
jump .GameOver
.ThirdPlace
writetext UnknownText_0x5d076
playsound SFX_3RD_PLACE
waitbutton
keeptextopen
giveitem PP_UP, 1
iffalse .BagFull
itemnotify
setflag ENGINE_LUCKY_NUMBER_SHOW
jump .GameOver
.NoPrize
writetext UnknownText_0x5d0c0
closetext
loadmovesprites
end
.BagFull:
writetext UnknownText_0x5d0e6
closetext
loadmovesprites
end
CooltrainerFScript_0x5cdd5:
faceplayer
loadfont
checkflag ENGINE_RADIO_CARD
iftrue UnknownScript_0x5ce2d
writetext UnknownText_0x5d12d
yesorno
iffalse UnknownScript_0x5ce4b
writetext UnknownText_0x5d1f2
yesorno
iffalse UnknownScript_0x5ce42
playsound SFX_ELEVATOR_END
waitbutton
writetext UnknownText_0x5d231
yesorno
iffalse UnknownScript_0x5ce42
playsound SFX_ELEVATOR_END
waitbutton
writetext UnknownText_0x5d282
yesorno
iftrue UnknownScript_0x5ce42
playsound SFX_ELEVATOR_END
waitbutton
writetext UnknownText_0x5d2bc
yesorno
iffalse UnknownScript_0x5ce42
playsound SFX_ELEVATOR_END
waitbutton
writetext UnknownText_0x5d30e
yesorno
iftrue UnknownScript_0x5ce42
playsound SFX_ELEVATOR_END
waitbutton
writetext UnknownText_0x5d37b
keeptextopen
stringtotext RadioCardText, $1
scall UnknownScript_0x5ce3e
writetext UnknownText_0x5d3c0
keeptextopen
setflag ENGINE_RADIO_CARD
UnknownScript_0x5ce2d:
writetext UnknownText_0x5d3e5
closetext
loadmovesprites
end
RadioCardText:
db "RADIO CARD@"
UnknownScript_0x5ce3e:
jumpstd receiveitem
end
UnknownScript_0x5ce42:
playsound SFX_WRONG
writetext UnknownText_0x5d409
closetext
loadmovesprites
end
UnknownScript_0x5ce4b:
writetext UnknownText_0x5d443
closetext
loadmovesprites
end
LassScript_0x5ce51:
jumptextfaceplayer UnknownText_0x5d476
YoungsterScript_0x5ce54:
jumptextfaceplayer UnknownText_0x5d4ac
TrainerGruntM3:
trainer EVENT_BEAT_ROCKET_GRUNTM_3, GRUNTM, 3, GruntM3SeenText, GruntM3BeatenText, $0000, GruntM3Script
GruntM3Script:
talkaftercancel
loadfont
writetext UnknownText_0x5d5a2
closetext
loadmovesprites
end
MapRadioTower1FSignpost0Script:
jumptext UnknownText_0x5d5e7
MapRadioTower1FSignpost1Script:
jumptext UnknownText_0x5d631
MovementData_0x5ce71:
step_right
turn_head_up
step_end
MovementData_0x5ce74:
step_left
turn_head_up
step_end
UnknownText_0x5ce77:
text "Welcome!"
done
UnknownText_0x5ce81:
text "Hello. I'm sorry,"
line "but we're not"
cont "offering any tours"
cont "today."
done
UnknownText_0x5ceba:
text "Hi, are you here"
line "for the LUCKY NUM-"
cont "BER SHOW?"
para "Want me to check"
line "the ID numbers of"
cont "your #MON?"
para "If you get lucky,"
line "you win a prize."
done
UnknownText_0x5cf3a:
text "This week's ID"
line "number is @"
text_from_ram StringBuffer3
text "."
done
UnknownText_0x5cf5a:
text "Let's see if you"
line "have a match."
done
UnknownText_0x5cf79:
text $56
line $56
done
UnknownText_0x5cf7e:
text "Please come back"
line "next week for the"
cont "next LUCKY NUMBER."
done
UnknownText_0x5cfb5:
text "Wow! You have a"
line "perfect match of"
cont "all five numbers!"
para "We have a grand"
line "prize winner!"
para "You have won a"
line "MASTER BALL!"
done
UnknownText_0x5d023:
text "Hey! You've"
line "matched the last"
cont "three numbers!"
para "You've won second"
line "prize, an EXP."
cont "SHARE!"
done
UnknownText_0x5d076:
text "Ooh, you've"
line "matched the last"
cont "two numbers."
para "You've won third"
line "prize, a PP UP."
done
UnknownText_0x5d0c0:
text "Nope, none of your"
line "ID numbers match."
done
UnknownText_0x5d0e6:
text "You've got no room"
line "for your prize."
para "Make room and come"
line "back right away."
done
UnknownText_0x5d12d:
text "We have a special"
line "quiz campaign on"
cont "right now."
para "Answer five ques-"
line "tions correctly to"
cont "win a RADIO CARD."
para "Slide it into your"
line "#GEAR to play"
para "the radio anytime,"
line "anywhere."
para "Would you like to"
line "take the quiz?"
done
UnknownText_0x5d1f2:
text "Question 1:"
para "Is there a #MON"
line "that appears only"
cont "in the morning?"
done
UnknownText_0x5d231:
text "Correct!"
line "Question 2:"
para "Is this statement"
line "correct?"
para "You can't buy a"
line "BERRY at a MART."
done
UnknownText_0x5d282:
text "Bull's-eye!"
line "Question 3:"
para "Does HM01 contain"
line "the move FLASH?"
done
UnknownText_0x5d2bc:
text "So far so good!"
line "Question 4:"
para "Is FALKNER the"
line "VIOLET GYM LEADER"
para "who uses bird"
line "#MON?"
done
UnknownText_0x5d30e:
text "Wow! Right again!"
line "Here's the final"
cont "question:"
para "Do GOLDENROD GAME"
line "CORNER's slots"
para "have CHARMANDER"
line "on their reels?"
done
UnknownText_0x5d37b:
text "Bingo! You got it!"
line "Congratulations!"
para "Here's your prize,"
line "a RADIO CARD!"
done
UnknownText_0x5d3c0:
text "<PLAYER>'s #GEAR"
line "can now double as"
cont "a radio!"
done
UnknownText_0x5d3e5:
text "Please tune in to"
line "our radio shows."
done
UnknownText_0x5d409:
text "Oh, dear."
line "Sorry, but you"
para "got it wrong."
line "Please try again!"
done
UnknownText_0x5d443:
text "Oh. I see. Please"
line "see me if you"
cont "change your mind."
done
UnknownText_0x5d476:
text "BEN is a fabulous"
line "DJ."
para "His sweet voice"
line "makes me melt!"
done
UnknownText_0x5d4ac:
text "I love MARY, from"
line "#MON TALK."
para "I only know what"
line "she sounds like,"
cont "though."
done
GruntM3SeenText:
text "We've finally"
line "taken over the"
cont "RADIO TOWER!"
para "Now everyone will"
line "get to experience"
para "the true terror of"
line "TEAM ROCKET!"
para "We'll show you"
line "how scary we are!"
done
GruntM3BeatenText:
text "Too strong! We"
line "must watch you…"
done
UnknownText_0x5d5a2:
text "You're too strong."
para "Our plan could be"
line "ruined. I must"
cont "warn the others…"
done
UnknownText_0x5d5e7:
text "1F RECEPTION"
line "2F SALES"
para "3F PERSONNEL"
line "4F PRODUCTION"
para "5F DIRECTOR'S"
line " OFFICE"
done
UnknownText_0x5d631:
text "LUCKY CHANNEL!"
para "Win with #MON"
line "ID numbers!"
para "Trade your #MON"
line "to collect differ-"
cont "ent ID numbers!"
done
RadioTower1F_MapEventHeader:
; filler
db 0, 0
.Warps:
db 3
warp_def $7, $2, 11, GOLDENROD_CITY
warp_def $7, $3, 11, GOLDENROD_CITY
warp_def $0, $f, 2, RADIO_TOWER_2F
.XYTriggers:
db 0
.Signposts:
db 2
signpost 0, 3, SIGNPOST_READ, MapRadioTower1FSignpost0Script
signpost 0, 13, SIGNPOST_READ, MapRadioTower1FSignpost1Script
.PersonEvents:
db 6
person_event SPRITE_RECEPTIONIST, 10, 9, $8, 0, 0, -1, -1, 8 + PAL_OW_RED, 0, 0, ReceptionistScript_0x5cd29, -1
person_event SPRITE_LASS, 8, 20, $8, 0, 0, -1, -1, 8 + PAL_OW_RED, 0, 0, LassScript_0x5ce51, EVENT_GOLDENROD_CITY_CIVILIANS
person_event SPRITE_YOUNGSTER, 8, 19, $9, 0, 0, -1, -1, 8 + PAL_OW_BLUE, 0, 0, YoungsterScript_0x5ce54, EVENT_GOLDENROD_CITY_CIVILIANS
person_event SPRITE_ROCKET, 5, 18, $6, 0, 0, -1, -1, 0, 2, 3, TrainerGruntM3, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
person_event SPRITE_GENTLEMAN, 10, 12, $7, 0, 0, -1, -1, 8 + PAL_OW_BLUE, 0, 0, GentlemanScript_0x5cd3d, EVENT_GOLDENROD_CITY_CIVILIANS
person_event SPRITE_COOLTRAINER_F, 10, 16, $7, 0, 0, -1, -1, 8 + PAL_OW_GREEN, 0, 0, CooltrainerFScript_0x5cdd5, EVENT_GOLDENROD_CITY_CIVILIANS