mirror of https://github.com/pret/pokecrystal.git
127 lines
2.7 KiB
NASM
127 lines
2.7 KiB
NASM
const_value set 2
|
|
const VICTORYROADGATE_OFFICER
|
|
const VICTORYROADGATE_BLACK_BELT1
|
|
const VICTORYROADGATE_BLACK_BELT2
|
|
|
|
VictoryRoadGate_MapScriptHeader:
|
|
.MapTriggers:
|
|
db 2
|
|
maptrigger .DummyTrigger0
|
|
maptrigger .DummyTrigger1
|
|
|
|
.MapCallbacks:
|
|
db 0
|
|
|
|
.DummyTrigger0:
|
|
end
|
|
|
|
.DummyTrigger1:
|
|
end
|
|
|
|
VictoryRoadGateBadgeCheckTrigger:
|
|
spriteface PLAYER, LEFT
|
|
jump VictoryRoadGateBadgeCheckScript
|
|
|
|
VictoryRoadGateOfficerScript:
|
|
faceplayer
|
|
VictoryRoadGateBadgeCheckScript:
|
|
opentext
|
|
writetext VictoryRoadGateOfficerText
|
|
buttonsound
|
|
checkcode VAR_BADGES
|
|
if_greater_than 7, .AllEightBadges
|
|
writetext VictoryRoadGateNotEnoughBadgesText
|
|
waitbutton
|
|
closetext
|
|
applymovement PLAYER, VictoryRoadGateStepDownMovement
|
|
end
|
|
|
|
.AllEightBadges:
|
|
writetext VictoryRoadGateEightBadgesText
|
|
waitbutton
|
|
closetext
|
|
dotrigger $1
|
|
end
|
|
|
|
VictoryRoadGateLeftBlackBeltScript:
|
|
jumptextfaceplayer VictoryRoadGateLeftBlackBeltText
|
|
|
|
VictoryRoadGateRightBlackBeltScript:
|
|
jumptextfaceplayer VictoryRoadGateRightBlackBeltText
|
|
|
|
VictoryRoadGateStepDownMovement:
|
|
step DOWN
|
|
step_end
|
|
|
|
VictoryRoadGateOfficerText:
|
|
text "Only trainers who"
|
|
line "have proven them-"
|
|
cont "selves may pass."
|
|
done
|
|
|
|
VictoryRoadGateNotEnoughBadgesText:
|
|
text "You don't have all"
|
|
line "the GYM BADGES of"
|
|
cont "JOHTO."
|
|
|
|
para "I'm sorry, but I"
|
|
line "can't let you go"
|
|
cont "through."
|
|
done
|
|
|
|
VictoryRoadGateEightBadgesText:
|
|
text "Oh! The eight"
|
|
line "BADGES of JOHTO!"
|
|
|
|
para "Please, go right"
|
|
line "on through!"
|
|
done
|
|
|
|
VictoryRoadGateLeftBlackBeltText:
|
|
text "This way leads to"
|
|
line "MT.SILVER."
|
|
|
|
para "You'll see scary-"
|
|
line "strong #MON out"
|
|
cont "there."
|
|
done
|
|
|
|
VictoryRoadGateRightBlackBeltText:
|
|
text "Off to the #MON"
|
|
line "LEAGUE, are you?"
|
|
|
|
para "The ELITE FOUR are"
|
|
line "so strong it's"
|
|
|
|
para "scary, and they're"
|
|
line "ready for you!"
|
|
done
|
|
|
|
VictoryRoadGate_MapEventHeader:
|
|
; filler
|
|
db 0, 0
|
|
|
|
.Warps:
|
|
db 8
|
|
warp_def $7, $11, 1, ROUTE_22
|
|
warp_def $7, $12, 1, ROUTE_22
|
|
warp_def $11, $9, 1, ROUTE_26
|
|
warp_def $11, $a, 1, ROUTE_26
|
|
warp_def $0, $9, 1, VICTORY_ROAD
|
|
warp_def $0, $a, 1, VICTORY_ROAD
|
|
warp_def $7, $1, 2, ROUTE_28
|
|
warp_def $7, $2, 2, ROUTE_28
|
|
|
|
.XYTriggers:
|
|
db 1
|
|
xy_trigger 0, $b, $a, $0, VictoryRoadGateBadgeCheckTrigger, $0, $0
|
|
|
|
.Signposts:
|
|
db 0
|
|
|
|
.PersonEvents:
|
|
db 3
|
|
person_event SPRITE_OFFICER, 11, 8, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, VictoryRoadGateOfficerScript, -1
|
|
person_event SPRITE_BLACK_BELT, 5, 7, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, VictoryRoadGateLeftBlackBeltScript, EVENT_OPENED_MT_SILVER
|
|
person_event SPRITE_BLACK_BELT, 5, 12, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, VictoryRoadGateRightBlackBeltScript, EVENT_FOUGHT_SNORLAX
|