mirror of https://github.com/pret/pokecrystal.git
458 lines
9.1 KiB
NASM
458 lines
9.1 KiB
NASM
Route35NationalParkgate_MapScriptHeader: ; 0x6a189
|
|
; trigger count
|
|
db 3
|
|
|
|
; triggers
|
|
dw UnknownScript_0x6a19d, $0000
|
|
dw UnknownScript_0x6a19e, $0000
|
|
dw UnknownScript_0x6a19f, $0000
|
|
|
|
; callback count
|
|
db 2
|
|
|
|
; callbacks
|
|
|
|
dbw 5, UnknownScript_0x6a1a3
|
|
|
|
dbw 2, UnknownScript_0x6a1af
|
|
; 0x6a19d
|
|
|
|
UnknownScript_0x6a19d: ; 0x6a19d
|
|
end
|
|
; 0x6a19e
|
|
|
|
UnknownScript_0x6a19e: ; 0x6a19e
|
|
end
|
|
; 0x6a19f
|
|
|
|
UnknownScript_0x6a19f: ; 0x6a19f
|
|
priorityjump UnknownScript_0x6a1d1
|
|
end
|
|
; 0x6a1a3
|
|
|
|
UnknownScript_0x6a1a3: ; 0x6a1a3
|
|
checkbit2 $0011
|
|
iftrue UnknownScript_0x6a1ac
|
|
dotrigger $0
|
|
return
|
|
; 0x6a1ac
|
|
|
|
UnknownScript_0x6a1ac: ; 0x6a1ac
|
|
dotrigger $2
|
|
return
|
|
; 0x6a1af
|
|
|
|
UnknownScript_0x6a1af: ; 0x6a1af
|
|
checkcode $b
|
|
if_equal TUESDAY, UnknownScript_0x6a1ca
|
|
if_equal THURSDAY, UnknownScript_0x6a1ca
|
|
if_equal SATURDAY, UnknownScript_0x6a1ca
|
|
checkbit2 $0011
|
|
iftrue UnknownScript_0x6a1ac
|
|
disappear $2
|
|
appear $3
|
|
appear $4
|
|
return
|
|
; 0x6a1ca
|
|
|
|
UnknownScript_0x6a1ca: ; 0x6a1ca
|
|
appear $2
|
|
disappear $3
|
|
disappear $4
|
|
return
|
|
; 0x6a1d1
|
|
|
|
UnknownScript_0x6a1d1: ; 0x6a1d1
|
|
applymovement $0, MovementData_0x6a2e2
|
|
spriteface $2, $3
|
|
loadfont
|
|
checkcode $11
|
|
addvar $1
|
|
RAM2MEM $0
|
|
2writetext UnknownText_0x6a79a
|
|
yesorno
|
|
iffalse UnknownScript_0x6a1ee
|
|
2writetext UnknownText_0x6a7db
|
|
closetext
|
|
loadmovesprites
|
|
jumpstd $0016
|
|
; 0x6a1ee
|
|
|
|
UnknownScript_0x6a1ee: ; 0x6a1ee
|
|
2writetext UnknownText_0x6a823
|
|
closetext
|
|
loadmovesprites
|
|
2call UnknownScript_0x6a261
|
|
playsound $001f
|
|
special $002e
|
|
waitbutton
|
|
warpfacing $1, GROUP_NATIONAL_PARK_BUG_CONTEST, MAP_NATIONAL_PARK_BUG_CONTEST, $a, $2f
|
|
end
|
|
; 0x6a204
|
|
|
|
OfficerScript_0x6a204: ; 0x6a204
|
|
checkcode $b
|
|
if_equal SUNDAY, UnknownScript_0x6a2c7
|
|
if_equal MONDAY, UnknownScript_0x6a2c7
|
|
if_equal WEDNESDAY, UnknownScript_0x6a2c7
|
|
if_equal FRIDAY, UnknownScript_0x6a2c7
|
|
faceplayer
|
|
loadfont
|
|
checkbit2 $0051
|
|
iftrue UnknownScript_0x6a2c1
|
|
2call UnknownScript_0x6a2de
|
|
2writetext UnknownText_0x6a2eb
|
|
yesorno
|
|
iffalse UnknownScript_0x6a2a3
|
|
checkcode $1
|
|
if_less_than $1, UnknownScript_0x6a271
|
|
special $0016
|
|
clearbit1 $0308
|
|
UnknownScript_0x6a234: ; 0x6a234
|
|
setbit2 $0011
|
|
special $003c
|
|
2writetext UnknownText_0x6a39d
|
|
keeptextopen
|
|
2writetext UnknownText_0x6a3c7
|
|
playsound $0001
|
|
waitbutton
|
|
2writetext UnknownText_0x6a3e2
|
|
closetext
|
|
loadmovesprites
|
|
special $0018
|
|
2call UnknownScript_0x6a261
|
|
playsound $001f
|
|
special $002e
|
|
waitbutton
|
|
special $0047
|
|
warpfacing $1, GROUP_NATIONAL_PARK_BUG_CONTEST, MAP_NATIONAL_PARK_BUG_CONTEST, $a, $2f
|
|
end
|
|
; 0x6a261
|
|
|
|
UnknownScript_0x6a261: ; 0x6a261
|
|
checkcode $9
|
|
if_equal $2, UnknownScript_0x6a26c
|
|
applymovement $0, MovementData_0x6a2e5
|
|
end
|
|
; 0x6a26c
|
|
|
|
UnknownScript_0x6a26c: ; 0x6a26c
|
|
applymovement $0, MovementData_0x6a2e9
|
|
end
|
|
; 0x6a271
|
|
|
|
UnknownScript_0x6a271: ; 0x6a271
|
|
checkcode $1
|
|
if_greater_than $6, $627d
|
|
checkcode $10
|
|
if_equal $0, UnknownScript_0x6a2b5
|
|
special $005a
|
|
if_equal $1, UnknownScript_0x6a2bb
|
|
2writetext UnknownText_0x6a4c6
|
|
yesorno
|
|
iffalse UnknownScript_0x6a2a9
|
|
special $0016
|
|
iftrue UnknownScript_0x6a2af
|
|
setbit1 $0308
|
|
2writetext UnknownText_0x6a537
|
|
keeptextopen
|
|
2writetext UnknownText_0x6a56b
|
|
playsound $000c
|
|
waitbutton
|
|
keeptextopen
|
|
2jump UnknownScript_0x6a234
|
|
; 0x6a2a3
|
|
|
|
UnknownScript_0x6a2a3: ; 0x6a2a3
|
|
2writetext UnknownText_0x6a5dc
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2a9
|
|
|
|
UnknownScript_0x6a2a9: ; 0x6a2a9
|
|
2writetext UnknownText_0x6a597
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2af
|
|
|
|
UnknownScript_0x6a2af: ; 0x6a2af
|
|
2writetext UnknownText_0x6a608
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2b5
|
|
|
|
UnknownScript_0x6a2b5: ; 0x6a2b5
|
|
2writetext UnknownText_0x6a67c
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2bb
|
|
|
|
UnknownScript_0x6a2bb: ; 0x6a2bb
|
|
2writetext UnknownText_0x6a71f
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2c1
|
|
|
|
UnknownScript_0x6a2c1: ; 0x6a2c1
|
|
2writetext UnknownText_0x6a84f
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2c7
|
|
|
|
UnknownScript_0x6a2c7: ; 0x6a2c7
|
|
jumptextfaceplayer UnknownText_0x6a894
|
|
; 0x6a2ca
|
|
|
|
OfficerScript_0x6a2ca: ; 0x6a2ca
|
|
faceplayer
|
|
loadfont
|
|
checkbit2 $0051
|
|
iftrue UnknownScript_0x6a2c1
|
|
2writetext UnknownText_0x6a894
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x6a2d8
|
|
|
|
YoungsterScript_0x6a2d8: ; 0x6a2d8
|
|
jumptextfaceplayer UnknownText_0x6a8d8
|
|
; 0x6a2db
|
|
|
|
MapRoute36NationalParkgateSignpost0Script: ; 0x6a2db
|
|
jumptext UnknownText_0x6a90e
|
|
; 0x6a2de
|
|
|
|
UnknownScript_0x6a2de: ; 0x6a2de
|
|
jumpstd $0015
|
|
end
|
|
; 0x6a2e2
|
|
|
|
MovementData_0x6a2e2: ; 0x6a2e2
|
|
step_down
|
|
turn_head_left
|
|
step_end
|
|
; 0x6a2e5
|
|
|
|
MovementData_0x6a2e5: ; 0x6a2e5
|
|
step_right
|
|
step_up
|
|
step_up
|
|
step_end
|
|
; 0x6a2e9
|
|
|
|
MovementData_0x6a2e9: ; 0x6a2e9
|
|
step_up
|
|
step_end
|
|
; 0x6a2eb
|
|
|
|
UnknownText_0x6a2eb: ; 0x6a2eb
|
|
db $0, "Today's @"
|
|
text_from_ram $d099
|
|
db $0, ".", $4f
|
|
db "That means the", $51
|
|
db "Bug-Catching Con-", $4f
|
|
db "test is on today.", $51
|
|
db "The rules are sim-", $4f
|
|
db "ple.", $51
|
|
db "Using one of your", $4f
|
|
db "#MON, catch a", $51
|
|
db "bug #MON to be", $4f
|
|
db "judged.", $51
|
|
db "Would you like to", $4f
|
|
db "give it a try?", $57
|
|
; 0x6a39d
|
|
|
|
UnknownText_0x6a39d: ; 0x6a39d
|
|
db $0, "Here are the PARK", $4f
|
|
db "BALLS for the", $55
|
|
db "Contest.", $57
|
|
; 0x6a3c7
|
|
|
|
UnknownText_0x6a3c7: ; 0x6a3c7
|
|
db $0, $52, " received", $4f
|
|
db "20 PARK BALLS.", $57
|
|
; 0x6a3e2
|
|
|
|
UnknownText_0x6a3e2: ; 0x6a3e2
|
|
db $0, "The person who", $4f
|
|
db "gets the strong-", $55
|
|
db "est bug #MON", $55
|
|
db "is the winner.", $51
|
|
db "You have 20", $4f
|
|
db "minutes.", $51
|
|
db "If you run out of", $4f
|
|
db "PARK BALLS, you're", $55
|
|
db "done.", $51
|
|
db "You can keep the", $4f
|
|
db "last #MON you", $55
|
|
db "catch as your own.", $51
|
|
db "Go out and catch", $4f
|
|
db "the strongest bug", $51
|
|
db "#MON you can", $4f
|
|
db "find!", $57
|
|
; 0x6a4c6
|
|
|
|
UnknownText_0x6a4c6: ; 0x6a4c6
|
|
db $0, "Uh-oh…", $51
|
|
db "You have more than", $4f
|
|
db "one #MON.", $51
|
|
db "You'll have to use", $4f
|
|
db "@"
|
|
text_from_ram $d099
|
|
db $0, ", the", $51
|
|
db "first #MON in", $4f
|
|
db "your party.", $51
|
|
db "Is that OK with", $4f
|
|
db "you?", $57
|
|
; 0x6a537
|
|
|
|
UnknownText_0x6a537: ; 0x6a537
|
|
db $0, "Fine, we'll hold", $4f
|
|
db "your other #MON", $55
|
|
db "while you compete.", $57
|
|
; 0x6a56b
|
|
|
|
UnknownText_0x6a56b: ; 0x6a56b
|
|
db $0, $52, "'s #MON", $4f
|
|
db "were left with the", $55
|
|
db "CONTEST HELPER.", $57
|
|
; 0x6a597
|
|
|
|
UnknownText_0x6a597: ; 0x6a597
|
|
db $0, "Please choose the", $4f
|
|
db "#MON to be used", $51
|
|
db "in the Contest,", $4f
|
|
db "then come see me.", $57
|
|
; 0x6a5dc
|
|
|
|
UnknownText_0x6a5dc: ; 0x6a5dc
|
|
db $0, "OK. We hope you'll", $4f
|
|
db "take part in the", $55
|
|
db "future.", $57
|
|
; 0x6a608
|
|
|
|
UnknownText_0x6a608: ; 0x6a608
|
|
db $0, "Uh-oh…", $4f
|
|
db "The first #MON", $51
|
|
db "in your party", $4f
|
|
db "can't battle.", $51
|
|
db "Please switch it", $4f
|
|
db "with the #MON", $51
|
|
db "you want to use,", $4f
|
|
db "then come see me.", $57
|
|
; 0x6a67c
|
|
|
|
UnknownText_0x6a67c: ; 0x6a67c
|
|
db $0, "Uh-oh…", $4f
|
|
db "Both your party", $51
|
|
db "and your PC BOX", $4f
|
|
db "are full.", $51
|
|
db "You have no room", $4f
|
|
db "to put the bug", $55
|
|
db "#MON you catch.", $51
|
|
db "Please make room", $4f
|
|
db "in your party or", $51
|
|
db "your PC BOX, then", $4f
|
|
db "come see me.", $57
|
|
; 0x6a71f
|
|
|
|
UnknownText_0x6a71f: ; 0x6a71f
|
|
db $0, "Uh-oh…", $4f
|
|
db "You have an EGG as", $51
|
|
db "the first #MON", $4f
|
|
db "in your party.", $51
|
|
db "Please switch it", $4f
|
|
db "with the #MON", $51
|
|
db "you want to use,", $4f
|
|
db "then come see me.", $57
|
|
; 0x6a79a
|
|
|
|
UnknownText_0x6a79a: ; 0x6a79a
|
|
db $0, "You still have @"
|
|
text_from_ram $d099
|
|
db $0, $4f
|
|
db "minute(s) left.", $51
|
|
db "Do you want to", $4f
|
|
db "finish now?", $57
|
|
; 0x6a7db
|
|
|
|
UnknownText_0x6a7db: ; 0x6a7db
|
|
db $0, "OK. Please wait at", $4f
|
|
db "the North Gate for", $51
|
|
db "the announcement", $4f
|
|
db "of the winners.", $57
|
|
; 0x6a823
|
|
|
|
UnknownText_0x6a823: ; 0x6a823
|
|
db $0, "OK. Please get", $4f
|
|
db "back outside and", $55
|
|
db "finish up.", $57
|
|
; 0x6a84f
|
|
|
|
UnknownText_0x6a84f: ; 0x6a84f
|
|
db $0, "Today's Contest is", $4f
|
|
db "over. We hope you", $51
|
|
db "will participate", $4f
|
|
db "in the future.", $57
|
|
; 0x6a894
|
|
|
|
UnknownText_0x6a894: ; 0x6a894
|
|
db $0, "We hold Contests", $4f
|
|
db "regularly in the", $51
|
|
db "PARK. You should", $4f
|
|
db "give it a shot.", $57
|
|
; 0x6a8d8
|
|
|
|
UnknownText_0x6a8d8: ; 0x6a8d8
|
|
db $0, "When is the next", $4f
|
|
db "Bug-Catching Con-", $55
|
|
db "test going to be?", $57
|
|
; 0x6a90e
|
|
|
|
UnknownText_0x6a90e: ; 0x6a90e
|
|
db $0, "The Bug-Catching", $4f
|
|
db "Contest is held on", $51
|
|
db "Tuesday, Thursday", $4f
|
|
db "and Saturday.", $51
|
|
db "Not only do you", $4f
|
|
db "earn a prize just", $51
|
|
db "for participating,", $4f
|
|
db "you also get to", $51
|
|
db "keep the bug", $4f
|
|
db "#MON you may", $51
|
|
db "have at the end of", $4f
|
|
db "the contest.", $57
|
|
; 0x6a9d2
|
|
|
|
Route35NationalParkgate_MapEventHeader: ; 0x6a9d2
|
|
; filler
|
|
db 0, 0
|
|
|
|
; warps
|
|
db 4
|
|
warp_def $0, $3, 3, GROUP_NATIONAL_PARK, MAP_NATIONAL_PARK
|
|
warp_def $0, $4, 4, GROUP_NATIONAL_PARK, MAP_NATIONAL_PARK
|
|
warp_def $7, $3, 3, GROUP_ROUTE_35, MAP_ROUTE_35
|
|
warp_def $7, $4, 3, GROUP_ROUTE_35, MAP_ROUTE_35
|
|
|
|
; xy triggers
|
|
db 0
|
|
|
|
; signposts
|
|
db 1
|
|
signpost 0, 5, $0, MapRoute36NationalParkgateSignpost0Script
|
|
|
|
; people-events
|
|
db 3
|
|
person_event SPRITE_OFFICER, 5, 6, $6, $0, 255, 255, $a0, 0, OfficerScript_0x6a204, $0745
|
|
person_event SPRITE_YOUNGSTER, 9, 10, $2, $11, 255, 255, $80, 0, YoungsterScript_0x6a2d8, $0734
|
|
person_event SPRITE_OFFICER, 7, 4, $9, $0, 255, 255, $a0, 0, OfficerScript_0x6a2ca, $0746
|
|
; 0x6aa18
|
|
|