【EasyUO】腳本:伐木,問題:魔法飛怎麼改成騎士飛?


版主: GM Saga

回覆文章
頭像
Rena
究級玩家
究級玩家
文章: 5539
註冊時間: 週日 6月 16, 2002 4:33 pm

Re: 【EasyUO】伐木腳本 如何把魔法飛改成騎士飛?

文章 Rena » 週二 9月 02, 2014 6:37 pm

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

歡迎加入WOW公會

zqtanyuan
初級玩家
初級玩家
文章: 12
註冊時間: 週日 7月 15, 2012 6:50 pm

【EasyUO】腳本:伐木,問題:魔法飛怎麼改成騎士飛?

文章 zqtanyuan » 週二 6月 18, 2013 11:18 pm

腳本如下,怎麽把魔法傳送改為神聖之旅,在哪里改請注明一下,謝謝
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

回覆文章

回到「輔助軟體討論版」

誰在線上

正在瀏覽這個版面的使用者:沒有註冊會員 和 1 位訪客