;;ѧԺ  college.e-168.cn 2005-4-11
[@ִ]
{
#IF
#ACT
   LOADVALUE D1 "QuestDiary\\\ݿ.txt" [%USERNAME] []
#IF
large  D1 1
#SAY
ǰΪ{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12},:\\

ƶ (ʹ1): <1/@TelePortRootinxxxx(zuma,0,1ceng)> <2/@TelePortRootinxxxx(zuma,0,2ceng)> <3/@TelePortRootinxxxx(zuma,0,3ceng)> <4/@TelePortRootinxxxx(zuma,0,4ceng)> \
ƶʯ (ʹ1): <1/@TelePortRootinxxxx(shige,0,1ceng)> <2/@TelePortRootinxxxx(shige,0,2ceng)> <3/@TelePortRootinxxxx(shige,0,3ceng)> <4/@TelePortRootinxxxx(shige,0,4ceng)> \
ƶҹ (ʹ1): <1/@TelePortRootinxxxx(panniu,0,1ceng)> <2/@TelePortRootinxxxx(panniu,0,2ceng)> <3/@TelePortRootinxxxx(panniu,0,3ceng)> <4/@TelePortRootinxxxx(panniu,0,4ceng)> <5/@TelePortRootinxxxx(panniu,0,5ceng)>\
ƶҹʯ (ʹ1): <1/@TelePortRootinxxxx(panshi,0,1ceng)> <2/@TelePortRootinxxxx(panshi,0,2ceng)> <3/@TelePortRootinxxxx(panshi,0,3ceng)>\
ƶϿ (ʹ1): <1/@TelePortRootinxxxx(chiyue,0,11ceng)> <2/@TelePortRootinxxxx(chiyue,0,12ceng)> <3/@TelePortRootinxxxx(chiyue,0,13ceng)> \
ƶ (ʹ1): <1/@TelePortRootinxxxx(woma,0,1ceng)> <2/@TelePortRootinxxxx(woma,0,2ceng)>   \
ƶ涴Ѩ (ʹ1): <1/@TelePortRootinxxxx(banshou,0,1ceng)> <2/@TelePortRootinxxxx(banshou,0,2ceng)> \
ƶʧֶѨ (ʹ1): <1/@TelePortRootinxxxx(tianran,0,1ceng)> <2/@TelePortRootinxxxx(tianran,0,2ceng)> \
ƶϿɽ (ʹ1): <1/@TelePortRootinxxxx(bfei,0,1ceng)> <2/@TelePortRootinxxxx(bfei,0,2ceng)> \
ƶ鶴Ѩ (ʹ1): <1/@TelePortRootinxxxx(dkuang,0,1ceng)> <2/@TelePortRootinxxxx(dkuang,0,2ceng)> \
ƶ   (ʹ1): <1/@TelePortRootinxxxx(jueshan,0,1ceng)> <2/@TelePortRootinxxxx(jueshan,0,2ceng)> \
ƶ϶Ѩ (ʹ1): </@TelePortRootinxxxx(nanmayi,0,1ceng)> <ϲ/@TelePortRootinxxxx(nanmayi,0,2ceng)> </@TelePortRootinxxxx(beimayi,0,1ceng)> </@TelePortRootinxxxx(beimayi,0,2ceng)> \
ƶ   (ʹ1): <1/@TelePortRootinxxxx(wannian,0,1ceng)> <2/@TelePortRootinxxxx(wannian,0,2ceng)> \
ƶ   (ʹ1): <1/@TelePortRootinxxxx(dongmayi,0,1ceng)> <2/@TelePortRootinxxxx(dongmayi,0,2ceng)> \
ƶ ɳ Į (ʹ1): <1/@TelePortRootinxxxx(zhentian,0,1ceng)>  \
ƶŵַ (ʹ1): <1/@TelePortRootinxxxx(huoyi,0,1ceng)>  \
ƶѩԭ (ʹ1): <1/@TelePortRootinxxxx(xueyuan,0,1ceng)> <2/@TelePortRootinxxxx(xueyuan,0,2ceng)> <3/@TelePortRootinxxxx(xueyuan,0,3ceng)> <4/@TelePortRootinxxxx(xueyuan,0,4ceng)> <51/@TelePortRootinxxxx(xueyuan,0,51ceng)> <52/@TelePortRootinxxxx(xueyuan,0,52ceng)> <53/@TelePortRootinxxxx(xueyuan,0,53ceng)> <54/@TelePortRootinxxxx(xueyuan,0,54ceng)> <55/@TelePortRootinxxxx(xueyuan,0,55ceng)> <56/@TelePortRootinxxxx(xueyuan,0,56ceng)> <6/@TelePortRootinxxxx(xueyuan,0,6ceng)> <7/@TelePortRootinxxxx(xueyuan,0,7ceng)> \
ƶ (ʹ1): <ƶ/@shiwang> пʧ \
#ELSESAY
Ļֲѽ޷ƶܡ\

[@TelePortRootinxxxx()]
#DEFINE        A2{DESTINATION}       A2 
#DEFINE        D0{FARE}              D0 
#DEFINE        A1{POSITION}          A1 

#ACT
Mov            A2{DESTINATION}       %ARG(1)
Mov            D0{FARE}              %ARG(2)
Mov            A1{POSITION}          %ARG(3)


#IF
large  D1 0
#ACT
Goto           @xMoveRootinx 
#ELSESAY
Ļֲѽ޷ƶܡ\
<ʹ˵/@helpjf>\

[@xMoveRootinx]
;;-----------------------------------------------------------------------
#IF
large   D1  1
Equal          A2{DESTINATION}       "zuma" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1101 50 70
break

#IF
large   D1  1
Equal          A2{DESTINATION}       "zuma" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1102 37 25
break

#IF
Equal          A2{DESTINATION}       "zuma" 
Equal          A1{POSITION}          "3ceng"
#ACT
   DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1103 131 129
break

#IF
Equal          A2{DESTINATION}       "zuma" 
Equal          A1{POSITION}          "4ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1104 45 30
break

;;---------ʯ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "shige" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D701 34 210

#IF
Equal          A2{DESTINATION}       "shige" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D702 15 23

#IF
Equal          A2{DESTINATION}       "shige" 
Equal          A1{POSITION}          "3ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D703 10 29

#IF
Equal          A2{DESTINATION}       "shige" 
Equal          A1{POSITION}          "4ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D704 17 125

;;---------ҹ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "panniu" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1001  20 151

#IF
Equal          A2{DESTINATION}       "panniu" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1002  141 141

#IF
Equal          A2{DESTINATION}       "panniu" 
Equal          A1{POSITION}          "3ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D10032 35 64

#IF
Equal          A2{DESTINATION}       "panniu" 
Equal          A1{POSITION}          "4ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1004  106 94

#IF
Equal          A2{DESTINATION}       "panniu" 
Equal          A1{POSITION}          "5ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1005  105 216
;;---------ҹʯ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "panshi" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D601  128 172

#IF
Equal          A2{DESTINATION}       "panshi" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D602  281 61

#IF
Equal          A2{DESTINATION}       "panshi" 
Equal          A1{POSITION}          "3ceng"
#ACT
   DEC    D1  1
  SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D603   268 275
;;---------Ͽ-------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "chiyue" 
Equal          A1{POSITION}          "11ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D901 217 31

#IF
Equal          A2{DESTINATION}       "chiyue" 
Equal          A1{POSITION}          "12ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D902 332 18

#IF
Equal          A2{DESTINATION}       "chiyue" 
Equal          A1{POSITION}          "13ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D903  15 26
;;-----------------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "woma" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D501  366 372

#IF
Equal          A2{DESTINATION}       "woma" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
  SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D0502  108 358
;;---------涴Ѩ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "banshou" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
  SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D101 126 181

#IF
Equal          A2{DESTINATION}       "banshou" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D102 178 178
;;---------ʧ԰Ѩ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "tianran" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D111  126 181

#IF
Equal          A2{DESTINATION}       "tianran" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
  SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D112  183 88
;;---------Ͽɽ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "bfei" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
  SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D201   50 293

#IF
Equal          A2{DESTINATION}       "bfei" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D202  30 300
;;---------鶴Ѩ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "dkuang" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D301  93 246

#IF
Equal          A2{DESTINATION}       "dkuang" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D302  31 239
;;-----------------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "jueshan" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D801  154 247 

#IF
Equal          A2{DESTINATION}       "jueshan" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D802   21 31
;;---------  --------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "wannian" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
  SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1200  271 357

#IF
Equal          A2{DESTINATION}       "wannian" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D12013   40 38
;;---------϶Ѩ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "nanmayi" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D401 179 188

#IF
Equal          A2{DESTINATION}       "nanmayi" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D402 185 57

#IF
Equal          A2{DESTINATION}       "beimayi" 
Equal          A1{POSITION}          "1ceng"
#ACT
   DEC    D1  1
   SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D403  34 21

#IF
Equal          A2{DESTINATION}       "beimayi" 
Equal          A1{POSITION}          "2ceng"
#ACT
   DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D404  7 184
;;---------  --------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "dongmayi" 
Equal          A1{POSITION}          "1ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1301  122 115

#IF
Equal          A2{DESTINATION}       "dongmayi" 
Equal          A1{POSITION}          "2ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D13021   178 34 
;;--------- ɳ Į--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "zhentian" 
Equal          A1{POSITION}          "1ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2001  282 280
;;---------ŵַ--------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "huoyi" 
Equal          A1{POSITION}          "1ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D1501 38 148
;;---------ѩԭ-----------------------------------------------------------------
#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "1ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2101 278 71

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "2ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2102 172 103

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "3ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2103 42 250

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "4ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2104 262 72

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "51ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D21051 66 56

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "52ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D21052 32 68

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "53ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D21053 31 40

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "54ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D21054 25 53

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "55ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D21055 30 70

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "56ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D21056 30 70

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "6ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2106 25 37

#IF
Equal          A2{DESTINATION}       "xueyuan" 
Equal          A1{POSITION}          "7ceng"
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
    
mapmove  D2107 26 28

#ELSESAY
Ļֲѽ޷ƶܡ\
<˽ֵô/@helpjf>\
;;---------   --------------------------------------------------------------

[@shiwang]
#IF
large   D1  1
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  D1401  48 59
break

#IF
large   D1  0
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  0 
break

#IF
large   D1  0
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  D1401  48 59
break

#IF
large   D1  0
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  2 
break

#IF
large   D1  1
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  D1401  48 59
break

#IF
large   D1  0
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  3 
break

#IF
large   D1  1
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  D1401  48 59
break

#IF
large   D1  1
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  4 
break

#IF
large   D1  1
random 9
#ACT
DEC    D1  1
SaveValue "QuestDiary\\\ݿ.txt" [%USERNAME] [] %D1
 
mapmove  D1401  48 59
break
#ELSEACT
goto @shiwang

}
;;ѧԺ  college.e-168.cn 2005-4-11