;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@main]
#IF
checkpkpoint 2
#ACT
Delaygoto [Local] 1 @Main_Move

#SAY
Excellent, another one caught!\

#ELSEACT
goto @main_0
break

[@Main_Move]
#IF
#ACT
Mapmove 6 33 159
break

[@main_0]
#IF
#SAY
Hi, My name is {FCOLOR/10}<$NPCNAME>{FCOLOR/12}, Where would you like to go?\\
#IF
#SAY
____________{FCOLOR/13}<[ Bichon ]/@MovingNow(0,139,262)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Old Bichon ]/@MovingNow(10,310,265)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Phantom Forest ]/@MovingNow(1,139,207)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Prajna ]/@MovingNow(2,193,157)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Sabuk ]/@MovingNow(3,51,222)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Numa ]/@MovingNow(4,201,151)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Samak ]/@MovingNow(5,63,197)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ PK Island ]/@MovingNow(6,33,159)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Snow Fields ]/@MovingNow(8,208,112)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Ice Plain ]/@MovingNow(D008,167,187)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
____________{FCOLOR/13}<[ Serpent Hill ]/@MovingNow(D1601,70,274)> 5,000 Gold{FCOLOR/12}\
#IF
#SAY
\
<[ Exit ]/@exit>\


[@MovingNow()]
#IF
;checkgold 5000
#ACT
Mov   A1   %ARG(1)
Mov   D1   %ARG(2)
Mov   D2   %ARG(3)
take Gold 5000
;Give TownTeleport 1
Mapmove %A1 %D1 %D2

#SAY
Moving....\

#ELSESAY
You do not have enough money!\
<[ Exit ]/@exit>\

#ELSEACT
Break

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;