pokecrystal-board/maps/RadioTower3F.asm
Scott Norton f74fd6903f - Renamed "Functiond283" to "GetPocketCapacity" and updated the pointers and constants to better reflect their hypothesized purposes.
- Using yenatch's version of the macro and constant handling, rewrote the tmhm bit array as a macro-defined environment.
2015-07-03 13:46:38 -04:00

464 lines
8.0 KiB
NASM

RadioTower3F_MapScriptHeader: ; 0x5e53e
; trigger count
db 0
; callback count
db 1
; callbacks
dbw 1, UnknownScript_0x5e543
; 0x5e543
UnknownScript_0x5e543: ; 0x5e543
checkevent EVENT_USED_THE_CARD_KEY_IN_THE_RADIO_TOWER
iftrue UnknownScript_0x5e54a
return
; 0x5e54a
UnknownScript_0x5e54a: ; 0x5e54a
changeblock $e, $2, $2a
changeblock $e, $4, $1
return
; 0x5e553
SuperNerdScript_0x5e553: ; 0x5e553
jumptextfaceplayer UnknownText_0x5e621
; 0x5e556
GymGuyScript_0x5e556: ; 0x5e556
faceplayer
loadfont
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue UnknownScript_0x5e564
writetext UnknownText_0x5e682
closetext
loadmovesprites
end
; 0x5e564
UnknownScript_0x5e564: ; 0x5e564
writetext UnknownText_0x5e6eb
closetext
loadmovesprites
end
; 0x5e56a
CooltrainerFScript_0x5e56a: ; 0x5e56a
faceplayer
loadfont
checkevent EVENT_GOT_SUNNY_DAY_FROM_RADIO_TOWER
iftrue UnknownScript_0x5e59d
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue UnknownScript_0x5e58a
checkevent EVENT_USED_THE_CARD_KEY_IN_THE_RADIO_TOWER
iftrue UnknownScript_0x5e584
writetext UnknownText_0x5e754
closetext
loadmovesprites
end
; 0x5e584
UnknownScript_0x5e584: ; 0x5e584
writetext UnknownText_0x5e7cb
closetext
loadmovesprites
end
; 0x5e58a
UnknownScript_0x5e58a: ; 0x5e58a
writetext UnknownText_0x5e7e2
keeptextopen
verbosegiveitem TM_SUNNY_DAY, 1
iffalse UnknownScript_0x5e5a1
writetext UnknownText_0x5e821
closetext
loadmovesprites
setevent EVENT_GOT_SUNNY_DAY_FROM_RADIO_TOWER
end
; 0x5e59d
UnknownScript_0x5e59d: ; 0x5e59d
writetext UnknownText_0x5e85c
closetext
UnknownScript_0x5e5a1: ; 0x5e5a1
loadmovesprites
end
; 0x5e5a3
TrainerGruntM7: ; 0x5e5a3
; bit/flag number
dw $4f7
; trainer group && trainer id
db GRUNTM, 7
; text when seen
dw GruntM7SeenText
; text when trainer beaten
dw GruntM7BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntM7Script
; 0x5e5af
GruntM7Script: ; 0x5e5af
talkaftercancel
loadfont
writetext UnknownText_0x5e8d0
closetext
loadmovesprites
end
; 0x5e5b7
TrainerGruntM8: ; 0x5e5b7
; bit/flag number
dw $4f8
; trainer group && trainer id
db GRUNTM, 8
; text when seen
dw GruntM8SeenText
; text when trainer beaten
dw GruntM8BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntM8Script
; 0x5e5c3
GruntM8Script: ; 0x5e5c3
talkaftercancel
loadfont
writetext UnknownText_0x5e944
closetext
loadmovesprites
end
; 0x5e5cb
TrainerGruntM9: ; 0x5e5cb
; bit/flag number
dw $4f9
; trainer group && trainer id
db GRUNTM, 9
; text when seen
dw GruntM9SeenText
; text when trainer beaten
dw GruntM9BeatenText
; script when lost
dw $0000
; script when talk again
dw GruntM9Script
; 0x5e5d7
GruntM9Script: ; 0x5e5d7
talkaftercancel
loadfont
writetext UnknownText_0x5e9d0
closetext
loadmovesprites
end
; 0x5e5df
TrainerScientistMarc: ; 0x5e5df
; bit/flag number
dw $4a2
; trainer group && trainer id
db SCIENTIST, MARC
; text when seen
dw ScientistMarcSeenText
; text when trainer beaten
dw ScientistMarcBeatenText
; script when lost
dw $0000
; script when talk again
dw ScientistMarcScript
; 0x5e5eb
ScientistMarcScript: ; 0x5e5eb
talkaftercancel
loadfont
writetext UnknownText_0x5ea61
closetext
loadmovesprites
end
; 0x5e5f3
MapRadioTower3FSignpost2Script:: ; 0x5e5f3
loadfont
writetext UnknownText_0x5eaa4
closetext
checkevent EVENT_USED_THE_CARD_KEY_IN_THE_RADIO_TOWER
iftrue UnknownScript_0x5e603
checkitem CARD_KEY
iftrue UnknownScript_0x5e605
UnknownScript_0x5e603: ; 0x5e603
loadmovesprites
end
; 0x5e605
UnknownScript_0x5e605: ; 0x5e605
writetext UnknownText_0x5eabc
closetext
setevent EVENT_USED_THE_CARD_KEY_IN_THE_RADIO_TOWER
playsound SFX_ENTER_DOOR
changeblock $e, $2, $2a
changeblock $e, $4, $1
reloadmappart
loadmovesprites
waitbutton
end
; 0x5e61b
MapRadioTower3FSignpost0Script: ; 0x5e61b
jumptext UnknownText_0x5ead6
; 0x5e61e
MapRadioTower3FSignpost1Script: ; 0x5e61e
jumptext UnknownText_0x5eae4
; 0x5e621
UnknownText_0x5e621: ; 0x5e621
text "We have recordings"
line "of the cries of"
para "all #MON that"
line "have been found."
para "We must have about"
line "200 kinds."
done
; 0x5e682
UnknownText_0x5e682: ; 0x5e682
text "To trainers, #-"
line "MON are their"
cont "beloved partners."
para "It's terrible how"
line "TEAM ROCKET is"
para "trying to control"
line "#MON."
done
; 0x5e6eb
UnknownText_0x5e6eb: ; 0x5e6eb
text "We run 24 hours a"
line "day to broadcast"
para "entertaining pro-"
line "grams."
para "I'll do my best to"
line "run around the"
cont "clock too!"
done
; 0x5e754
UnknownText_0x5e754: ; 0x5e754
text "The TEAM ROCKET"
line "boss has locked"
cont "himself in."
para "But the DIRECTOR"
line "can open it."
para "He's up on the"
line "fifth floor."
para "Please save him!"
done
; 0x5e7cb
UnknownText_0x5e7cb: ; 0x5e7cb
text "Is the DIRECTOR"
line "safe?"
done
; 0x5e7e2
UnknownText_0x5e7e2: ; 0x5e7e2
text "Thank you!"
line "You're my hero!"
para "This is a token of"
line "my appreciation."
done
; 0x5e821
UnknownText_0x5e821: ; 0x5e821
text "It's SUNNY DAY."
line "It powers up fire-"
cont "type moves for a"
cont "while."
done
; 0x5e85c
UnknownText_0x5e85c: ; 0x5e85c
text "You were simply"
line "marvelous!"
done
; 0x5e878
GruntM7SeenText: ; 0x5e878
text "I've been given"
line "strict orders."
para "I'm to crush any-"
line "one who challenges"
cont "TEAM ROCKET!"
done
; 0x5e8c8
GruntM7BeatenText: ; 0x5e8c8
text "What?!"
done
; 0x5e8d0
UnknownText_0x5e8d0: ; 0x5e8d0
text "I failed in my"
line "duties…"
para "I'll be docked pay"
line "for this…"
done
; 0x5e904
GruntM8SeenText: ; 0x5e904
text "It feels great"
line "ordering #MON"
cont "to commit crimes."
done
; 0x5e934
GruntM8BeatenText: ; 0x5e934
text "You're kidding!"
done
; 0x5e944
UnknownText_0x5e944: ; 0x5e944
text "I feel lousy over"
line "losing!"
para "Darn it! I hate"
line "useless #MON!"
done
; 0x5e97d
GruntM9SeenText: ; 0x5e97d
text "Why did the shut-"
line "ter open? Did you"
para "have something to"
line "do with this?"
done
; 0x5e9c2
GruntM9BeatenText: ; 0x5e9c2
text "I'm done for!"
done
; 0x5e9d0
UnknownText_0x5e9d0: ; 0x5e9d0
text "What?! You made it"
line "past our men in"
cont "the UNDERGROUND?"
para "How could you?"
done
; 0x5ea14
ScientistMarcSeenText: ; 0x5ea14
text "An unknown child"
line "wandering here?"
para "Who are you?"
done
; 0x5ea43
ScientistMarcBeatenText: ; 0x5ea43
text "Tch! I took you"
line "too lightly!"
done
; 0x5ea61
UnknownText_0x5ea61: ; 0x5ea61
text "Bwahahaha…"
para "I can transmit as"
line "strong a signal as"
cont "I need from here."
done
; 0x5eaa4
UnknownText_0x5eaa4: ; 0x5eaa4
text "It's the CARD KEY"
line "slot."
done
; 0x5eabc
UnknownText_0x5eabc: ; 0x5eabc
text "<PLAYER> inserted"
line "the CARD KEY."
done
; 0x5ead6
UnknownText_0x5ead6: ; 0x5ead6
text "3F PERSONNEL"
done
; 0x5eae4
UnknownText_0x5eae4: ; 0x5eae4
text "#MON MUSIC with"
line "Host DJ BEN"
done
; 0x5eb01
RadioTower3F_MapEventHeader: ; 0x5eb01
; filler
db 0, 0
; warps
db 3
warp_def $0, $0, 1, GROUP_RADIO_TOWER_2F, MAP_RADIO_TOWER_2F
warp_def $0, $7, 2, GROUP_RADIO_TOWER_4F, MAP_RADIO_TOWER_4F
warp_def $0, $11, 4, GROUP_RADIO_TOWER_4F, MAP_RADIO_TOWER_4F
; xy triggers
db 0
; signposts
db 3
signpost 0, 3, $0, MapRadioTower3FSignpost0Script
signpost 0, 9, $0, MapRadioTower3FSignpost1Script
signpost 2, 14, $1, MapRadioTower3FSignpost2Script
; people-events
db 7
person_event SPRITE_SUPER_NERD, 8, 11, $7, $0, 255, 255, $90, 0, SuperNerdScript_0x5e553, $06d0
person_event SPRITE_GYM_GUY, 8, 7, $a, $0, 255, 255, $80, 0, GymGuyScript_0x5e556, $ffff
person_event SPRITE_COOLTRAINER_F, 7, 15, $2, $11, 255, 255, $a0, 0, CooltrainerFScript_0x5e56a, $ffff
person_event SPRITE_ROCKET, 5, 9, $9, $0, 255, 255, $2, 2, TrainerGruntM7, $06ce
person_event SPRITE_ROCKET, 6, 10, $6, $0, 255, 255, $2, 3, TrainerGruntM8, $06ce
person_event SPRITE_ROCKET, 10, 20, $7, $0, 255, 255, $2, 3, TrainerGruntM9, $06ce
person_event SPRITE_SCIENTIST, 10, 13, $7, $0, 255, 255, $92, 5, TrainerScientistMarc, $06ce
; 0x5eb80