mirror of https://github.com/pret/pokecrystal.git
438 lines
8.7 KiB
NASM
438 lines
8.7 KiB
NASM
|
RadioTower5F_MapScriptHeader: ; 0x60000
|
||
|
; trigger count
|
||
|
db 3
|
||
|
|
||
|
; triggers
|
||
|
dw UnknownScript_0x6000e, $0000
|
||
|
dw UnknownScript_0x6000f, $0000
|
||
|
dw UnknownScript_0x60010, $0000
|
||
|
|
||
|
; callback count
|
||
|
db 0
|
||
|
; 0x6000e
|
||
|
|
||
|
UnknownScript_0x6000e: ; 0x6000e
|
||
|
end
|
||
|
; 0x6000f
|
||
|
|
||
|
UnknownScript_0x6000f: ; 0x6000f
|
||
|
end
|
||
|
; 0x60010
|
||
|
|
||
|
UnknownScript_0x60010: ; 0x60010
|
||
|
end
|
||
|
; 0x60011
|
||
|
|
||
|
UnknownScript_0x60011: ; 0x60011
|
||
|
spriteface $2, $1
|
||
|
showemote $0, $2, 15
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x60128
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
applymovement $2, MovementData_0x60109
|
||
|
playmusic $0039
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x60147
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
winlosstext UnknownText_0x60223, $0000
|
||
|
setlasttalked $2
|
||
|
loadtrainer EXECUTIVEM, 3
|
||
|
startbattle
|
||
|
returnafterbattle
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x60246
|
||
|
keeptextopen
|
||
|
verbosegiveitem BASEMENT_KEY, 1
|
||
|
loadmovesprites
|
||
|
dotrigger $1
|
||
|
setbit1 $0573
|
||
|
end
|
||
|
; 0x60046
|
||
|
|
||
|
UnknownScript_0x60046: ; 0x60046
|
||
|
faceplayer
|
||
|
loadfont
|
||
|
checkbit1 $0021
|
||
|
iftrue UnknownScript_0x60054
|
||
|
2writetext UnknownText_0x60246
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
end
|
||
|
; 0x60054
|
||
|
|
||
|
UnknownScript_0x60054: ; 0x60054
|
||
|
2writetext UnknownText_0x60824
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
end
|
||
|
; 0x6005a
|
||
|
|
||
|
TrainerExecutivef1: ; 0x6005a
|
||
|
; bit/flag number
|
||
|
dw $56f
|
||
|
|
||
|
; trainer group && trainer id
|
||
|
db EXECUTIVEF, 1
|
||
|
|
||
|
; text when seen
|
||
|
dw Executivef1SeenText
|
||
|
|
||
|
; text when trainer beaten
|
||
|
dw Executivef1BeatenText
|
||
|
|
||
|
; script when lost
|
||
|
dw $0000
|
||
|
|
||
|
; script when talk again
|
||
|
dw Executivef1Script
|
||
|
; 0x60066
|
||
|
|
||
|
Executivef1Script: ; 0x60066
|
||
|
talkaftercancel
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x60358
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
end
|
||
|
; 0x6006e
|
||
|
|
||
|
UnknownScript_0x6006e: ; 0x6006e
|
||
|
applymovement $0, MovementData_0x60125
|
||
|
playmusic $0039
|
||
|
spriteface $3, $3
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x603d1
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
winlosstext UnknownText_0x604f3, $0000
|
||
|
setlasttalked $3
|
||
|
loadtrainer EXECUTIVEM, 1
|
||
|
startbattle
|
||
|
returnafterbattle
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x6050e
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
special $0030
|
||
|
special $0033
|
||
|
disappear $3
|
||
|
disappear $4
|
||
|
pause 15
|
||
|
special $0032
|
||
|
setbit1 $0571
|
||
|
setbit1 $0021
|
||
|
clearbit2 $0013
|
||
|
setbit1 $06cc
|
||
|
setbit1 $06cd
|
||
|
setbit1 $06ce
|
||
|
clearbit1 $0736
|
||
|
clearbit2 $0017
|
||
|
clearbit1 $06cf
|
||
|
clearbit1 $06d0
|
||
|
setbit1 $06e3
|
||
|
clearbit1 $06e4
|
||
|
special $003c
|
||
|
disappear $2
|
||
|
moveperson $2, $c, $0
|
||
|
appear $2
|
||
|
applymovement $2, MovementData_0x6010f
|
||
|
spriteface $0, $3
|
||
|
loadfont
|
||
|
2writetext UnknownText_0x605b2
|
||
|
keeptextopen
|
||
|
verbosegiveitem CLEAR_BELL, 1
|
||
|
2writetext UnknownText_0x6062c
|
||
|
closetext
|
||
|
loadmovesprites
|
||
|
dotrigger $2
|
||
|
domaptrigger GROUP_ECRUTEAK_HOUSE, MAP_ECRUTEAK_HOUSE, $0
|
||
|
setbit1 $0078
|
||
|
setbit1 $0761
|
||
|
2jump UnknownScript_0x600f1
|
||
|
; 0x600f1
|
||
|
|
||
|
UnknownScript_0x600f1: ; 0x600f1
|
||
|
applymovement $2, MovementData_0x6011a
|
||
|
playsound $0023
|
||
|
disappear $2
|
||
|
end
|
||
|
; 0x600fb
|
||
|
|
||
|
UnknownScript_0x600fb: ; 0x600fb
|
||
|
jumptextfaceplayer UnknownText_0x608be
|
||
|
; 0x600fe
|
||
|
|
||
|
ItemFragment_0x600fe: ; 0x600fe
|
||
|
db ULTRA_BALL, 1
|
||
|
; 0x60100
|
||
|
|
||
|
MapRadioTower5FSignpost0Script: ; 0x60100
|
||
|
jumptext UnknownText_0x608e0
|
||
|
; 0x60103
|
||
|
|
||
|
MapRadioTower5FSignpost2Script: ; 0x60103
|
||
|
jumptext UnknownText_0x608f9
|
||
|
; 0x60106
|
||
|
|
||
|
MapRadioTower5FSignpost4Script: ; 0x60106
|
||
|
jumpstd $0003
|
||
|
; 0x60109
|
||
|
|
||
|
MovementData_0x60109: ; 0x60109
|
||
|
step_left
|
||
|
step_left
|
||
|
step_left
|
||
|
step_up
|
||
|
step_up
|
||
|
step_end
|
||
|
; 0x6010f
|
||
|
|
||
|
MovementData_0x6010f: ; 0x6010f
|
||
|
step_down
|
||
|
step_down
|
||
|
step_right
|
||
|
step_right
|
||
|
step_right
|
||
|
step_right
|
||
|
step_down
|
||
|
step_down
|
||
|
step_down
|
||
|
step_left
|
||
|
step_end
|
||
|
; 0x6011a
|
||
|
|
||
|
MovementData_0x6011a: ; 0x6011a
|
||
|
step_right
|
||
|
step_up
|
||
|
step_up
|
||
|
step_up
|
||
|
step_left
|
||
|
step_left
|
||
|
step_left
|
||
|
step_left
|
||
|
step_up
|
||
|
step_up
|
||
|
step_end
|
||
|
; 0x60125
|
||
|
|
||
|
MovementData_0x60125: ; 0x60125
|
||
|
step_left
|
||
|
step_left
|
||
|
step_end
|
||
|
; 0x60128
|
||
|
|
||
|
UnknownText_0x60128: ; 0x60128
|
||
|
db $0, "Y-you! You came to", $4f
|
||
|
db "rescue me?", $57
|
||
|
; 0x60147
|
||
|
|
||
|
UnknownText_0x60147: ; 0x60147
|
||
|
db $0, "Is that what you", $4f
|
||
|
db "were expecting?", $51
|
||
|
db "Wrong!", $4f
|
||
|
db "I'm an imposter!", $51
|
||
|
db "I pretended to be", $4f
|
||
|
db "the real thing to", $51
|
||
|
db "prepare for our", $4f
|
||
|
db "takeover.", $51
|
||
|
db "Do you want to", $4f
|
||
|
db "know where we hid", $55
|
||
|
db "the real DIRECTOR?", $51
|
||
|
db "Sure, I'll tell", $4f
|
||
|
db "you. But only if", $55
|
||
|
db "you can beat me!", $57
|
||
|
; 0x60223
|
||
|
|
||
|
UnknownText_0x60223: ; 0x60223
|
||
|
db $0, "OK, OK. I'll tell", $4f
|
||
|
db "you where he is.", $57
|
||
|
; 0x60246
|
||
|
|
||
|
UnknownText_0x60246: ; 0x60246
|
||
|
db $0, "We stashed the", $4f
|
||
|
db "real DIRECTOR in", $51
|
||
|
db "the UNDERGROUND", $4f
|
||
|
db "WAREHOUSE.", $51
|
||
|
db "It's at the far", $4f
|
||
|
db "end of the UNDER-", $55
|
||
|
db "GROUND.", $51
|
||
|
db "But I doubt you'll", $4f
|
||
|
db "get that far.", $57
|
||
|
; 0x602cb
|
||
|
|
||
|
Executivef1SeenText: ; 0x602cb
|
||
|
db $0, "Remember me from", $4f
|
||
|
db "the HIDEOUT in", $55
|
||
|
db "MAHOGANY TOWN?", $51
|
||
|
db "I lost then, but I", $4f
|
||
|
db "won't this time.", $57
|
||
|
; 0x6031e
|
||
|
|
||
|
Executivef1BeatenText: ; 0x6031e
|
||
|
db $0, "This can't be", $4f
|
||
|
db "happening!", $51
|
||
|
db "I fought hard, but", $4f
|
||
|
db "I still lost…", $57
|
||
|
; 0x60358
|
||
|
|
||
|
UnknownText_0x60358: ; 0x60358
|
||
|
db $0, $52, ", isn't it?", $51
|
||
|
db "A brat like you", $4f
|
||
|
db "won't appreciate", $51
|
||
|
db "the magnificence", $4f
|
||
|
db "of TEAM ROCKET.", $51
|
||
|
db "That's too bad.", $4f
|
||
|
db "I really admire", $55
|
||
|
db "your power.", $57
|
||
|
; 0x603d1
|
||
|
|
||
|
UnknownText_0x603d1: ; 0x603d1
|
||
|
db $0, "Oh? You managed to", $4f
|
||
|
db "get this far?", $51
|
||
|
db "You must be quite", $4f
|
||
|
db "the trainer.", $51
|
||
|
db "We intend to take", $4f
|
||
|
db "over this RADIO", $51
|
||
|
db "STATION and an-", $4f
|
||
|
db "nounce our come-", $55
|
||
|
db "back.", $51
|
||
|
db "That should bring", $4f
|
||
|
db "our boss GIOVANNI", $51
|
||
|
db "back from his solo", $4f
|
||
|
db "training.", $51
|
||
|
db "We are going to", $4f
|
||
|
db "regain our former", $55
|
||
|
db "glory.", $51
|
||
|
db "I won't allow you", $4f
|
||
|
db "to interfere with", $55
|
||
|
db "our plans.", $57
|
||
|
; 0x604f3
|
||
|
|
||
|
UnknownText_0x604f3: ; 0x604f3
|
||
|
db $0, "No! Forgive me,", $4f
|
||
|
db "GIOVANNI!", $57
|
||
|
; 0x6050e
|
||
|
|
||
|
UnknownText_0x6050e: ; 0x6050e
|
||
|
db $0, "How could this be?", $51
|
||
|
db "Our dreams have", $4f
|
||
|
db "come to naught.", $51
|
||
|
db "I wasn't up to the", $4f
|
||
|
db "task after all.", $51
|
||
|
db "Like GIOVANNI did", $4f
|
||
|
db "before me, I will", $51
|
||
|
db "disband TEAM", $4f
|
||
|
db "ROCKET here today.", $51
|
||
|
db "Farewell.", $57
|
||
|
; 0x605b2
|
||
|
|
||
|
UnknownText_0x605b2: ; 0x605b2
|
||
|
db $0, "DIRECTOR: ", $14, ",", $4f
|
||
|
db "thank you!", $51
|
||
|
db "Your courageous", $4f
|
||
|
db "actions have saved", $51
|
||
|
db "#MON nation-", $4f
|
||
|
db "wide.", $51
|
||
|
db "I know it's not", $4f
|
||
|
db "much, but please", $55
|
||
|
db "take this.", $57
|
||
|
; 0x6062c
|
||
|
|
||
|
UnknownText_0x6062c: ; 0x6062c
|
||
|
db $0, "There used to be a", $4f
|
||
|
db "tower right here", $55
|
||
|
db "in GOLDENROD CITY.", $51
|
||
|
db "But it was old and", $4f
|
||
|
db "creaky.", $51
|
||
|
db "So we replaced it", $4f
|
||
|
db "with our RADIO", $55
|
||
|
db "TOWER.", $51
|
||
|
db "We dug up that", $4f
|
||
|
db "bell during", $55
|
||
|
db "construction.", $51
|
||
|
db "I heard that all", $4f
|
||
|
db "sorts of #MON", $51
|
||
|
db "lived in GOLDENROD", $4f
|
||
|
db "in the past.", $51
|
||
|
db "Perhaps…", $51
|
||
|
db "That bell has some", $4f
|
||
|
db "connection to the", $51
|
||
|
db "TIN TOWER in", $4f
|
||
|
db "ECRUTEAK CITY…", $51
|
||
|
db "Ah!", $51
|
||
|
db "That reminds me…", $51
|
||
|
db "I overheard TEAM", $4f
|
||
|
db "ROCKET whispering.", $51
|
||
|
db "Apparently, some-", $4f
|
||
|
db "thing is going on", $55
|
||
|
db "at the TIN TOWER.", $51
|
||
|
db "I have no idea", $4f
|
||
|
db "what is happening,", $51
|
||
|
db "but you might look", $4f
|
||
|
db "into it.", $51
|
||
|
db "OK, I better go to", $4f
|
||
|
db "my OFFICE.", $57
|
||
|
; 0x60824
|
||
|
|
||
|
UnknownText_0x60824: ; 0x60824
|
||
|
db $0, "DIRECTOR: Hello,", $4f
|
||
|
db $14, "!", $51
|
||
|
db "You know, I love", $4f
|
||
|
db "#MON.", $51
|
||
|
db "I built this RADIO", $4f
|
||
|
db "TOWER so I could", $51
|
||
|
db "express my love", $4f
|
||
|
db "of #MON.", $51
|
||
|
db "It would be nice", $4f
|
||
|
db "if people enjoyed", $55
|
||
|
db "our programs.", $57
|
||
|
; 0x608be
|
||
|
|
||
|
UnknownText_0x608be: ; 0x608be
|
||
|
db $0, "BEN: Do you listen", $4f
|
||
|
db "to our music?", $57
|
||
|
; 0x608e0
|
||
|
|
||
|
UnknownText_0x608e0: ; 0x608e0
|
||
|
db $0, "5F DIRECTOR'S", $4f
|
||
|
db " OFFICE", $57
|
||
|
; 0x608f9
|
||
|
|
||
|
UnknownText_0x608f9: ; 0x608f9
|
||
|
db $0, "5F STUDIO 1", $57
|
||
|
; 0x60906
|
||
|
|
||
|
RadioTower5F_MapEventHeader: ; 0x60906
|
||
|
; filler
|
||
|
db 0, 0
|
||
|
|
||
|
; warps
|
||
|
db 2
|
||
|
warp_def $0, $0, 1, GROUP_RADIO_TOWER_4F, MAP_RADIO_TOWER_4F
|
||
|
warp_def $0, $c, 3, GROUP_RADIO_TOWER_4F, MAP_RADIO_TOWER_4F
|
||
|
|
||
|
; xy triggers
|
||
|
db 2
|
||
|
xy_trigger 0, $3, $0, $0, UnknownScript_0x60011, $0, $0
|
||
|
xy_trigger 1, $5, $10, $0, UnknownScript_0x6006e, $0, $0
|
||
|
|
||
|
; signposts
|
||
|
db 5
|
||
|
signpost 0, 3, $0, MapRadioTower5FSignpost0Script
|
||
|
signpost 0, 11, $0, MapRadioTower5FSignpost2Script
|
||
|
signpost 0, 15, $0, MapRadioTower5FSignpost2Script
|
||
|
signpost 1, 16, $0, MapRadioTower5FSignpost4Script
|
||
|
signpost 1, 17, $0, MapRadioTower5FSignpost4Script
|
||
|
|
||
|
; people-events
|
||
|
db 5
|
||
|
person_event $40, 10, 7, $3, $0, 255, 255, $0, 0, UnknownScript_0x60046, $ffff
|
||
|
person_event $35, 9, 17, $8, $0, 255, 255, $0, 0, ObjectEvent, $06ce
|
||
|
person_event $36, 6, 21, $8, $0, 255, 255, $82, 1, TrainerExecutivef1, $06ce
|
||
|
person_event $2c, 9, 17, $8, $0, 255, 255, $80, 0, UnknownScript_0x600fb, $06d0
|
||
|
person_event $54, 9, 12, $1, $0, 255, 255, $1, 0, ItemFragment_0x600fe, $07cd
|
||
|
; 0x60980
|
||
|
|