pokecrystal/maps/Route34IlexForestGate.asm

155 lines
3.6 KiB
NASM

const_def 2 ; object constants
const ROUTE34ILEXFORESTGATE_TEACHER1
const ROUTE34ILEXFORESTGATE_BUTTERFREE
const ROUTE34ILEXFORESTGATE_LASS
const ROUTE34ILEXFORESTGATE_TEACHER2
Route34IlexForestGate_MapScripts:
db 0 ; scene scripts
db 1 ; callbacks
callback MAPCALLBACK_OBJECTS, .IsForestRestless
.IsForestRestless:
checkevent EVENT_FOREST_IS_RESTLESS
iffalse .Normal
disappear ROUTE34ILEXFORESTGATE_TEACHER1
appear ROUTE34ILEXFORESTGATE_TEACHER2
return
.Normal:
disappear ROUTE34ILEXFORESTGATE_TEACHER2
appear ROUTE34ILEXFORESTGATE_TEACHER1
return
UnknownScript_0x62d3d:
checkevent EVENT_FOREST_IS_RESTLESS
iffalse UnknownScript_0x62d62
showemote EMOTE_SHOCK, ROUTE34ILEXFORESTGATE_TEACHER2, 20
objectface ROUTE34ILEXFORESTGATE_TEACHER2, LEFT
objectface PLAYER, RIGHT
follow PLAYER, ROUTE34ILEXFORESTGATE_TEACHER2
applymovement PLAYER, MovementData_0x62d97
stopfollow
objectface PLAYER, DOWN
opentext
writetext UnknownText_0x62e41
waitbutton
closetext
applymovement ROUTE34ILEXFORESTGATE_TEACHER2, MovementData_0x62d9a
UnknownScript_0x62d62:
end
TeacherScript_0x62d63:
faceplayer
opentext
checkevent EVENT_FOREST_IS_RESTLESS
iftrue UnknownScript_0x62d84
checkevent EVENT_GOT_TM12_SWEET_SCENT
iftrue UnknownScript_0x62d7e
writetext UnknownText_0x62d9d
buttonsound
verbosegiveitem TM_SWEET_SCENT
iffalse UnknownScript_0x62d82
setevent EVENT_GOT_TM12_SWEET_SCENT
UnknownScript_0x62d7e:
writetext UnknownText_0x62df6
waitbutton
UnknownScript_0x62d82:
closetext
end
UnknownScript_0x62d84:
writetext UnknownText_0x62e41
buttonsound
closetext
end
IlexGateButterfree:
opentext
writetext UnknownText_0x62e83
cry BUTTERFREE
waitbutton
closetext
end
Route34IlexForestGateLassScript:
jumptextfaceplayer Route34IlexForestGateLassText
MovementData_0x62d97:
step UP
step UP
step_end
MovementData_0x62d9a:
step DOWN
step RIGHT
step_end
UnknownText_0x62d9d:
text "Oh, honey. You're"
line "making a #DEX?"
para "It must be hard if"
line "#MON won't"
para "appear. Try using"
line "this TM."
done
UnknownText_0x62df6:
text "It's SWEET SCENT."
para "Use it wherever"
line "#MON appear."
para "#MON will be"
line "enticed by it."
done
UnknownText_0x62e41:
text "Something's wrong"
line "in ILEX FOREST…"
para "You should stay"
line "away right now."
done
UnknownText_0x62e83:
text "BUTTERFREE: Freeh!"
done
Route34IlexForestGateLassText:
text "Did you see the"
line "shrine honoring"
cont "the protector?"
para "It watches over"
line "the FOREST from"
cont "across time."
para "I think that it"
line "must be a grass-"
cont "type #MON."
done
Route34IlexForestGate_MapEvents:
db 0, 0 ; filler
db 4 ; warp events
warp_event 4, 0, ROUTE_34, 1
warp_event 5, 0, ROUTE_34, 2
warp_event 4, 7, ILEX_FOREST, 1
warp_event 5, 7, ILEX_FOREST, 1
db 1 ; coord events
coord_event 4, 7, SCENE_DEFAULT, UnknownScript_0x62d3d
db 0 ; bg events
db 4 ; object events
object_event 9, 3, SPRITE_TEACHER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, TeacherScript_0x62d63, EVENT_ROUTE_34_ILEX_FOREST_GATE_TEACHER_BEHIND_COUNTER
object_event 9, 4, SPRITE_BUTTERFREE, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, IlexGateButterfree, -1
object_event 3, 4, SPRITE_LASS, SPRITEMOVEDATA_WALK_UP_DOWN, 0, 1, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, Route34IlexForestGateLassScript, EVENT_ROUTE_34_ILEX_FOREST_GATE_LASS
object_event 5, 7, SPRITE_TEACHER, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, TeacherScript_0x62d63, EVENT_ROUTE_34_ILEX_FOREST_GATE_TEACHER_IN_WALKWAY