[分享] 狼寨EZ分享專區

[purin]

對打ezs+uoa教學 (配合顏色值)

按這

by Fabius

[Fabius]

嗯 好啊~

戰鬥及 loot 這方面我還不會
有的話你 post給我看看
讓我研究一下!!
先謝囉

[DrunkMonkey]

不過…等能上線時大家一直試一下你的伐木程式吧！
我相信應該比手動好太多了

[DrunkMonkey]

有機會我貼那個ez給你研究一下好了…
剛剛去看了一下…那個ez是10倍以上之長！！
那個ez連和樹妖戰鬥、自動補血、loot、放木頭…一些雜七雜八的全寫了
看到有一點頭痛

[Fabius]

現在這個大概寫個100顆樹就夠你砍很久了吧@@

四年前我的寫那個最長寫到 2xx顆樹~
砍完剛好重生

手動較快或自動較快我想這見人見智~
不過 如果 marco及 script 寫的好 我想絕對比手動快吧!

[DrunkMonkey]

我之前看到一個比這個長3~5倍的伐木ez…
感覺伐木的都太長了…手動或許比較快吧

[Fabius]

我寫的伐木程式
用我 2001年寫的 加上參考最近別人寫的修改而成
還有幾點請注意
第一..因為我已經忘了符石書的用法 所以還是用以前的符石作底
會用符石書的自己修改
第二..ody當機加上我人困在公會屋，所以沒試過~
有興趣的試試看
有問題再問我

//主程式
//----------------------------------------------------
Sart:
On hits!=Str Jump Heal //假如血量不等於Str就跳到 標記 Heal

//第1顆樹
If nowx=X && nowy=Y //假如座標都正確 X及Y 請設定於標記 Sum中 recall 中符石的座標
Call LJ //呼叫伐木副程式
Else
Call Sum //座標位置錯誤呼叫歸位副程式
End If

If wght>400 //假如身上重量達400
Call Put //呼叫回家放木頭副程式
End If

//2
If Nowx=X && NowY=Y //假如是前一顆樹的座標
goto X,Y //到第二顆樹
Else //不是
Call Sum //座標位置錯誤呼叫歸位副程式
End If
Call LJ
If wght>400 //假如身上重量達400
Call Put //呼叫回家放木頭副程式
End If


.
.
.
.
.

Jump Sart
//---------------------------------------------------------

//回家放木頭木程式
Put:
sendmacro(d) //mark目前所在地 (第三顆符石)
delay(5500)
While NowX!=X && NowY!=Y //如果座標不等於回家符石的點
sendmacro(10) //recall回家的 macro (第一顆符石)
delay(6000) //依網路速度增減時間
var4=var4+1 //符石使用次數計
Wend
If var4>20 //超過20次就 mark 回家符石的點
sendmacro(7) //Mark 家
delay(6000)
var4=0 // mark完歸0
End If
If nowx=X && nowy=Y //如果站在家的位置正確
var2=user1-2 //user1是身上的木頭總數
drag var2 from pos1 to pos2 delay 700 //拿取var2的木頭 放到門口的箱子
delay(1500)
End if
If ExtVar[2]=1 //有補過血
SendMacro(f) //洗繃帶的Macro
Extvar[2]=0 //繃帶使用歸0
End If
If User2<200 //假如繃帶少於200
ExtVar[3]=200-User1 //少的繃帶數量
Drag ExtVar[3] From 14745910 To 9306576 //補足繃帶不足數
Delay 1000
SendMacro(e) // recall (第三顆符石)
Delay (6000)
Return

---------------------------------------------------------------------------
//歸位副程式

Sum: //標記Sum
sendmacro(a) //Recall到第一顆樹的macro (第二顆符石)
delay(5000)
var1=var1+1 //使用macro(a)的次數
if var1>=20 //如果使用了20次
sendmacro(b) //就Mark Marco(a)的符石 (第二顆符石)
delay(5000)
var1=0 //Mark後把使用次數歸0
end if
Jump Sart //跳到主程式起點
//-----------------------------------------------------
//伐木副程式
LJ:
Repeat
Sendmacro(C) //砍木的 macro
delay(1000) //等待訊息出現
If Color[27983927]!=2166800 //該樹有木頭
WaitForWghtChange(15000) //重量改變後即停止等待
Else //如果沒有木頭
Break //中斷重複回圈
End If
End Repeat
Return //伐木副程式中止 回呼叫點
//-----------------------------------------------------------
//補血副程式
Heal:
Sendmacro(1) //UOA錄製使用盾牌、武器
Delay 500
ExtVar[2]=1 //補血標註，在存放物資的時候用到
While Hits<Str //如果血少於 Str就重複補血
Sendkey(Alt+77) //Bandage Self 的熱鍵，請自行設定
Delay 4000
If Hits=STR //如果血滿了
Break //中斷迴圈
End If
WEnd
Resume

[mimi5882124]

哇~ 好多喔~待我來研究研究~多謝各位前輩呀~有木工耶~喔耶

[BK]

再加一個「魔法+獸醫」（對動物放毒+補回）動物請卡好。
if mana=int //Mana滿時成立
delay (3000)
repeat 1 //連續用的次數
sendkey(f1) //使用F1請設獸醫
delay (500) //停留時間
sendkey(f5) //使用F5請設施毒
delay(4000)
sendkey(f1) //使用F1請設獸醫
delay(500)
end repeat
end if

if mana<int //Mana未滿時條件成立
sendkey(f3) //使用F3請設冥想
delay (2000) //停留時間
end if

[BK]

我把老本行都貼上來吧…有些沒附說明…要自行研究一下ㄛ！（舊版的小修改便可用）請配合UOA+EZS
======================（工藝）
if wght < 430
drag 800 from pos1 to pos2
delay 1000
sendkey(f5)
delay 3000
left click pos3
end if
sendkey(f5)
delay 3500
//pos1 鐵
//pos2 十格以外處
//pos3 人物
===============================（打馬）
//pos1為馬匹血條剩2/3時的點
//var1為pos1點的顏色值

If Color[Pos1]!=Var1
SendMacro(1) //uoa錄製幫馬補血的macro
Delay(5000)
End if

If Hits<70
SendMacro(2) //uoa錄製幫自己補血的macro
Delay(3000)
End if
=================================（木工）
if wght<60
drag 250 from pos1 to pos2
delay(1000)
var8=0
end if
if var7>250
drag all from pos3 to pos5
var7=0
end if
if user1>1
sendkey(f1)
delay(500)
drag 1 from pos4 to pos3
delay(500)
var7=var7+1
else
sendkey(f5)
delay(5500)
sendkey(f1)
delay(3000)
end if
//pos1 木頭
//pos2 主包包
//pos3 丟成品木箱
//pos4 手上成品位址
//pos5 丟放滿成品的木箱的鐵箱
//f1設uoa使用成品要轉成物件種類
//f5設uoa製成品
//uose1 設釣竿
===============================（打鐵）
if wght<60
drag 250 from pos1 to pos2
delay(1000)
var8=0
end if
if var7>250
drag 1 from pos3 to pos5
var7=0
end if
if var8=0
sendkey(f5)
delay(5000)
var8=1
end if
if var8=1
drag all from getcolorpos[var4,pos6,pos7] to pos3
delay(500)
drag all from getcolorpos[var4,pos6,pos7] to pos3
delay(2500)
var7=var7+1
var8=0
end if
//pos1 鐵磚
//pos2 主包包
//pos3 丟成品包包
//var4 成品色彩
//pos5 丟放滿包包的箱
//pos6 主包包左上
//pos7 主包包右下
=========================（馴獸）
if var1>31
SENDKEY(f5)//mark書
delay 9000
var1=0
else
repeat 14
SENDKEY(f2)//f2為訊獸的MACRO
delay 14000
say "all release"
delay 1000
end repeat
SENDKEY(f1)//設日光術
delay 8000
SENDKEY(f10)//RECALL到其中一間房間
delay 12000
var1=var1+1
repeat 14
SENDKEY(f2)//f2為訊獸的MACRO
delay 14000
say "all release"
delay 1000
end repeat
SENDKEY(f1)//設日光術
delay 12000
SENDKEY(f9)//RECALL到另一間房間
delay 8000
var1=var1+1
end if
====================================（偷窺+通靈）
repeat 80 //連續用的次數
sendkey(f7) //通用技能
delay(1000)
end repeat
sendkey(f6) //通靈
delay(4500)
sendkey(f6) //通靈
delay(4500)
sendkey(f6) //通靈
delay(4500)
sendkey(f6) //通靈
delay(4500)
==============================（涂毒）
sendkey(f7) //塗劍
delay (3500)
if user1=0
sendkey(f5) //取藥水
delay (500)
end if
if wght<150
drag 100 from pos1 to pos2
end if
//pos1 空瓶
//pos2 主包包
//user1 設毒藥水
==========================（裁縫）
if wght<60
drag 250 from pos1 to pos2
delay(1000)
var8=0
end if
if var7>250
drag 1 from pos3 to pos5
var7=0
end if
if var8=0
sendkey(f5)
delay(3500)
var8=1
end if
if var8=1
drag all from getcolorpos[var4,pos6,pos7] to pos3
delay(500)
drag all from getcolorpos[var4,pos6,pos7] to pos3
delay(500)
var7=var7+1
var8=0
end if
//pos1 布
//pos2 主包包(布)
//pos3 丟成品包包
//var4 成品色彩
//pos5 丟放滿包包的箱
//pos6 主包包左上
//pos7 主包包右下
========================（製弓「貼羽毛」）
if user1>2
drag user1-1 from pos3 to pos4
end if
if user2<=3
drag var2 from pos5 to pos6
end if
drag 1 from pos1 to pos2
sendmacro(2)
delay(3000)


//USER1設為身上紅箭數量
//USER2設為身上羽毛數量
//pos1為包包內箭桿的位置
//POS2為紙娃娃包包的位置
//POS3為主包包內紅箭堆的位置
//POS4為包包內紅箭堆的位置
//POS5為包包內羽毛的位置
//POS6為紙娃娃包包的位置
//MACRO(2)為自訂做紅箭的MACRO
//var2為一次拿多少羽毛到身上
=================================（磨藥+通靈）
sendkey(f5) //通用技能
delay (13000)
sendkey(f1) //丟藥水
delay (var1) //停留時間
sendkey(f1) //丟藥水
delay (var1) //停留時間
sendkey(f1) //丟藥水
delay (var1) //停留時間
var2=var2+1
if var2>15
repeat 5 //連續用的次數
sendkey(f6) //通靈
delay(4500)
end repeat
var2=0
end if
if wght<150
drag 600 from pos1 to pos2
var3=0
end if
//pos1 藥材
//pos2 主包包
==================================（製圖）
if wght<100
drag 200 from pos1 to pos2
delay(1000)
var8=0
end if
if var7>250
drag 1 from pos3 to pos5
var7=0
end if
if var8=0
sendkey(f1)
delay(4000)
var8=1
end if
if var8=1
drag all from getcolorpos[var4,pos6,pos7] to pos3
delay(500)
drag all from getcolorpos[var4,pos6,pos7] to pos3
delay(500)
var7=var7+1
var8=0
end if
//pos1 圖
//pos2 主包包
//pos3 丟成品包包
//var4 成品色彩
//pos5 丟放滿包包的箱
//pos6 主包包左上
//pos7 主包包右下
===============================（音樂總合）
//練音樂技能 [同時練音樂/挑撥/誘惑/息怒]

//-------------- cut here --------------------
//請先準備好兩隻動物放在家裡隔開
//用 uoa 錄好以下的 macro
//sendmacro(9)，A挑撥B
//sendmacro(11)，B挑撥A
//sendmacro(10)，息怒
//sendmacro(12)，誘惑A
//sendmacro(13)，誘惑B

pro:
sendmacro(9)
delay(4000)
sendmacro(10)
delay(4000)
sendmacro(11)
delay(4000)
sendmacro(10)
delay(4000)
sendmacro(12)
delay(4000)
sendmacro(13)
delay(4000)
jump pro
=======================（魔法+自動取藥）
if BP<200
drag 100 from pos1 to pos2
delay(1000)
end if
if MR<200
drag 100 from pos3 to pos2
delay(1000)
end if
if SS<200
drag 100 from pos5 to pos2
delay(1000)
end if
if INT=MANA
delay(3000)
sendkey(f5)
delay(4500)
end if
sendkey(f3)
delay(1000)

[purin]

掛網盾防繃帶兼捕被攻擊對象附加肚子餓吃東西和撐不住叫救命

// Macro 15錄吃東西
// Macro 9錄補自己
// Macro 7錄補對方
// Macro 使用前請先用繃帶補一次攻擊的目標

Var1=2900

SendKey(F7)
Delay(50)

If Hits < ((Str/5)*3)
Beep
End If

If Hits <= (Str/2)
Beep
delay(150)
Beep
End If

//新手將((Str/5)*4) 換為 (Str)
If Hits<((Str/5)*4)
SendMacro(9)
Delay(VAR1)
Else
SendMacro(7)
Delay(VAR1)
End If

If Hits < ((Str/5)*3)
Say "好痛"
Beep
delay(50)
End If

If Hits <= (Str/2)
Say "痛死了"
Beep
delay(50)
Beep
End If

If Hits < ((Str/5)*2)
Say "會死"
Beep
delay(50)
End If

If Var2 >200
Say "打我"
SendMacro(15)
Var2=0

by Dark Shenada

[purin]

練隱形或潛行夥偵測隱形兼肚子餓吃東西

// Macro15錄吃東西
// Macro16錄用技能

// Var2勿小於3750
Var2=3900

SendMacro(16)
Delay(var2)
If Var1 > 500
SendMacro(15)
Var1=0
End If
Var1=Var1+1

by Dark Shenada

[purin]

練魔法的EZS
---------------------------------------------
if mana=100
repeat 1
sendmacro(9)
delay (5000)
end repeat
end if

if mana<100
sendkey(f7)
delay (4000)
end if


------------------------------------直接貼上去

sendmacro(9)>>用uoa錄對自己下毒 可自己修改
sendkey(f7) >>設f7為冥想 可自己修改

ｂｙ taipeiwolf

[purin]

全自動熔礦(可通過系統Save)

While User1< 1
If Color[pos1]!=var1
drag 1 from pos1 to pos2
End if
Delay(500)
Wend
While User1> 0
SendMacro(1)
Delay(500)
Wend
If Wght>var2
drag var3 from pos5 to pos6
Delay(1000)
End If

/*User1=>把UOA的資源裡的自訂1 設成身上的鐵礦數量*/
/*pos1=>主礦堆的位置*/
/*pos2=>主包包中放要熔的礦的位置*/
/*pos5=>身上鐵磚的位置*/
/*pos6=>地上放鐵磚的位置*/
/*var1=>主礦堆的位置"未"放礦時的顏色*/
/*var2=>當負重超過多少時 拉身上的鐵磚到地上*/
/*var3=> 當負重超過var2時 拉多少鐵磚到地上*/
/*sendmacro(1)=>執行UOA的巨集1*/
/*UOA的巨集設定=>先拉一個鐵礦到包包 紀錄熔了那個鐵礦的動作 在command下面的Use Item按右鍵 點選Use Item Type*/


ｂｙ　Ｆａｌｌｅｎ

[purin]

大家把　自己ｅｚ的成果貼這分享＾＾

我先綜合之前貼了的在這～～