英雄論壇

EVENT MACRO 15 31 魔法飛
EVENT MACRO 15 210 騎士飛

腳本如下，怎麽把魔法傳送改為神聖之旅，在哪里改請注明一下,謝謝
FINDITEM QWL C_ , #BACKPACKID
IF #FINDKIND <> 0
{
display ok
halt
}
SET %HOME #FINDID
;%MAKETOOLS
SET %MAKETOOLS ZQHNUPD
SET %ZBNNUMBER 0
LOOPZBN:
FINDITEM ZBN C_ , #BACKPACKID
IF #FINDKIND <> 0
{
ignoreitem reset
msg 一共找到 %ZBNNUMBER 本氟石书 $
GOTO MAIN
}
SET %ZBNNUMBER %ZBNNUMBER + 1
SET %WOODBOOK . %ZBNNUMBER #FINDID
ignoreitem #findid
GOTO LOOPZBN
;**************************
MAIN:
FOR %1 1 %ZBNNUMBER
{
SET !W %WOODBOOK . %1
MSG 现在开始第 %1 本氟石书 $
GOSUB BOOK_M
}
GOTO MAIN
;**************************
SUB BOOK_M
SET !PX 140
SET !PY 195
GOSUB BOOK_F
SET !PX 175
SET !PY 195
GOSUB BOOK_F
SET !PX 210
SET !PY 195
GOSUB BOOK_F
SET !PX 245
SET !PY 195
GOSUB BOOK_F
SET !PX 310
SET !PY 195
GOSUB BOOK_F
SET !PX 345
SET !PY 195
GOSUB BOOK_F
SET !PX 380
SET !PY 195
GOSUB BOOK_F
SET !PX 415
SET !PY 195
GOSUB BOOK_F
RETURN
;**************************
SUB BOOK_F
SET !PXX 138
SET !PYY 144
GOSUB BOOK_C
GOSUB WORK
SET !PXX 300
SET !PYY 144
GOSUB BOOK_C
GOSUB WORK
RETURN
;**************************
SUB BOOK_C
SET !CHARX #CHARPOSX
SET !CHARY #CHARPOSY
SET #LOBJECTID !W
BOOK:
EVENT MACRO 17
WAIT 10
IF #CONTSIZE <> 452_236
{
GOTO BOOK
}
SET !X #CONTPOSX + !PX
SET !Y #CONTPOSY + !PY
CLICK !X !Y F
WAIT 20
SET !XX #CONTPOSX + !PXX
SET !YY #CONTPOSY + !PYY
CLICK !XX !YY F
WAIT 60
IF W逓珗薲OO哊 in #sysmsg
RETURN
IF !CHARX = #CHARPOSX && !CHARY = #CHARPOSY
{
GOTO BOOK
}
RETURN
;**************************
SUB WORK
WORK1:
FINDITEM LSF_NSF_RMH_BSF_LPH_FSF C
IF #FINDKIND <> 0
{
GOSUB GOHOME
RETURN
}
FINDITEM LSF_NSF_RMH_BSF_LPH_FSF C_ , #CHARID
IF #FINDKIND <> 0
{
FINDITEM LSF_NSF_RMH_BSF_LPH_FSF C_ , #BACKPACKID
EXEVENT DRAG #FINDID
WAIT 10
EXEVENT DROPPD
WAIT 10
GOTO WORK1
}
WORK2:
SET #SYSMSG N/A
SET #LOBJECTID #FINDID
EVENT MACRO 17
TARGET
CLICK 380 213 F

;那东西太远了
IF Y`悊N in #SYSMSG
return
;你无法对它使用斧头
IF O(u in #SYSMSG && q誰 in #SYSMSG
return
;无法看见目标
IF !q誰w媺顅j in #SYSMSG
return
;这颗树上没有足够的木头可以砍下
IF g硩_Y剉(gPg颯錘 in #SYSMSG
return
;如果你要专注伐木的话，你必须装备斧头
IF 俌済`O亯\鑜剉O(g剉q in #SYSMSG
return
;无法看见目标
IF !q誰w媺顅j in #SYSMSG
return
;无法看见目标
IF !q誰w媺顅j in #SYSMSG
return

IF 購鮤h in #SYSMSG
{
RETURN
}
IF `O鄀誰鵞僛O(u4Y in #SYSMSG
{
RETURN
}
IF Target_cannot_be_seen. in #SYSMSG
{
RETURN
}
IF THERE'S_NOT_ENOUGH_WOOD_HERE_TO_HARVEST. in #SYSMSG
{
RETURN
}
IF You_can't_use_an_axe_on_that. in #SYSMSG
{
RETURN
}
IF 愼h9j in #SYSMSG
{
RETURN
}
IF `O!q誰 in #SYSMSG
{
RETURN
}
WAIT 50
SET !WX #MAXWEIGHT - 60
if #WEIGHT >= !WX || #WEIGHT >= 400
{
GOSUB GOHOME
RETURN
}
WORK3:
FINDITEM FXS_NWS_ZLK_YWS_XWS_BWR G_2
IF #FINDKIND = 1
{
EXEVENT DRAG #FINDID #findstack
EXEVENT DROPC #BACKPACKID
}
GOTO WORK1
;**************************
SUB GOHOME
SET !CHARX #CHARPOSX
SET !CHARY #CHARPOSY
SET #LTARGETID %HOME
SET #LTARGETKIND 1
GOHOME1:
EVENT MACRO 15 31
WAIT 40
TARGET
EVENT MACRO 22
WAIT 20
IF !CHARX = #CHARPOSX && !CHARY = #CHARPOSY
{
GOTO GOHOME1
}
SET #LOBJECTID %MAKETOOLS
EVENT MACRO 17
WAIT 20
GOHOME2:
FINDITEM FXS_NWS_ZLK_YWS_XWS_BWR C_ , #BACKPACKID
IF #FINDKIND = 0
{
EXEVENT DRAG #FINDID #FINDSTACK
EXEVENT DROPC %MAKETOOLS
WAIT 20
GOTO GOHOME2
}
GOHOME3:
FINDITEM LSF_NSF_RMH_BSF_LPH_FSF C_ , #BACKPACKID
IF #FINDKIND <> 0
{
FINDITEM LSF_NSF_RMH_BSF_LPH_FSF C_ , %MAKETOOLS
EXEVENT DRAG #FINDID
EXEVENT DROPC #BACKPACKID
}
RETURN