#org $begin
lock
faceplayer
checkflag 0x200
if B_TRUE goto $Desert
checkflag 0x201
if B_TRUE goto $LostForest
checkflag 0x202
if B_TRUE goto $NextTown
message $hi
boxset 6
release
end
#org $hi
message $hi 1 = Hi v/h01. Do you have a ticket? No? Come back when you do, okay?
#org $NextTown
checkflag 0x204
if B_TRUE goto $goback1
message $hi1
boxset 5
compare LASTRESULT 1
if 2 goto $Stay
message $ok
boxset 6
setflag 0x204
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 3 1 0
release
end
#org $hi1
message $hi1 1 = Hi v/h01./n I see you have a ticket./n Would you like to go to the next town?
#org $ok
message $ok 1 = Okay then. Lets go!
#org $move
applymovement $move ; 0x00 0x60 0xFE
#org $move1
applymovement $move1 ; 0x10 0x60 0xFE
#org $Stay
message $ok1
boxset 6
release
end
#org $ok1
message $ok1 1 = Ok then v/h01./n Tell me when your ready to go.
#org $goback1
message $ask
boxset 5
compare LASTRESULT 1
if 2 goto $ok4
message $ok5
boxset 6
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 3 1 0
release
end
#org $ask
message $ok4 1 = So do you want to go to the next town?
#org $ok5
message $ok5 1 = Lets go!
#org $ok4
message $no
boxset 5
if B_TRUE goto $repeat
message $done
release
end
#org $no
message $no 1 = Your sure you don't want to go somewhere?
#org $done
message $done 1 = Ok, v/h01. Tell me when you want to go somewhere.
#org $repeat
checkflag 0x200
if B_TRUE goto $Desert
checkflag 0x201
if B_TRUE goto 0x203
checkflag 0x202
if B_TRUE goto $NextTown
release
end
#org $LostForest
checkflag 0x203
if B_TRUE goto $goback
message $hi2
boxset 5
compare LASTRESULT 1
if 2 goto $goback1
message $ok2
boxset 6
setflag 0x203
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 1 0 0
release
end
#org $hi2
message $hi2 1 = Oh, hi v/h01... Wait you have that ticket?! Wow! Your the first person to have that ticket... Well then are you ready to go?
#org $ok2
message $ok2 1 = Ok then. Lets go!
#org $goback
message $goback2
boxset 5
compare LASTRESULT 1
if 2 goto $goback1
message $ok3
boxset 6
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 1 0 0
release
end
#org $goback2
message $goback2 1 = Would you like to go back to Lost Forest, v/h01?
#org $ok3
message $ok3 1 = Ok, v/h01./n Lets go to Lost Forest!
#org $Desert
checkflag 0x205
if B_TRUE goto $goback3
checkflag 0x201
if B_TRUE goto $gotogoback
message $desert1
boxset 5
compare LASTRESULT 1
if 2 goto $goback1
message $going
boxset 6
setflag 0x205
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 1 0 0
release
end
#org $desert1
message $desert1 1 = You have all of the tickets don't you?/n v/h01, that's amazing!/n So, do you want to/n go to your next destination?
#org $going
message $going 1 = Ok then. This trip is going to be awhile,/n so you should probably sleep./n From what I hear, there are some powerful trainers out there./n Be careful.
#org $goback3
checkflag 0x201
if B_TRUE goto $gotogoback
message $desert3
boxset 5
compare LASTRESULT 1
if 2 goto $goback1
message $going2
boxset 6
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 3 19 0
release
end
#org $desert3
message $desert3 1 = So do you want to back to the Desert?
#org $going2
message $going2 1 = Ok, let's go!
#org $gotogoback
checkflag 0x206
if B_TRUE goto $gotogoback1
message $desert2
boxset 5
compare LASTRESULT 1
if 2 goto $goback
message $going1
boxset 6
setflag 0x206
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 3 19 0
release
end
#org $desert2
message $desert2 1 = You have all of the tickets don't you?/n v/h01, that's amazing!/n So, do you want to/n go to your next destination?
#org $going1
message $going1 1 = Ok then. This trip is going to be awhile,/n so you should probably sleep./n From what I hear, there are some powerful trainers out there./n Be careful.
#org $gotogoback1
message $desert4
boxset 5
compare LASTRESULT 1
if 2 goto $goback
message $going3
boxset 6
applymovement 0x3 $move
applymovement 0xFF $move1
pausemove 0
warp 3 19 0
release
end
#org $desert4
message $desert4 1 = So, do you want to go back to the Desert?
#org $going3
message $going3 1 = Ok then, lets go!