小葉子請看.^_^.
版主: sobo、nono、哆啦A夢(doraemon)
-
- 高級玩家
- 文章: 396
- 註冊時間: 週三 8月 01, 2001 8:00 am
動物被release之後會不會記得原來的主人呢?
記得是release之後要再打一下會比較好
我的想法是要找一個地形讓我們可以射到牠
可是不會被牠打到
像是BS屋就可以把馬放最裏面的房間然後我們在第一個房間
利用escape的程式, 再加一個attacklast的macro
var1=0
repeat 20
var1=var1+1
sendkey(f1) //f1熱鍵是tame+last target
delay(10000) //間隔時間長短可自己調整
if vat1>20
break
end if
end repeat
say "Pick Horse relase!!"
Delay(1000)
sendkey(f2)//f2是attacklast
Delay(3000)
記得是release之後要再打一下會比較好
我的想法是要找一個地形讓我們可以射到牠
可是不會被牠打到
像是BS屋就可以把馬放最裏面的房間然後我們在第一個房間
利用escape的程式, 再加一個attacklast的macro
var1=0
repeat 20
var1=var1+1
sendkey(f1) //f1熱鍵是tame+last target
delay(10000) //間隔時間長短可自己調整
if vat1>20
break
end if
end repeat
say "Pick Horse relase!!"
Delay(1000)
sendkey(f2)//f2是attacklast
Delay(3000)
我不在家,就在咖啡館;不在咖啡館,就在去咖啡館的路上


-
- 中級玩家
- 文章: 282
- 註冊時間: 週四 7月 12, 2001 8:00 am
-
- 高級玩家
- 文章: 396
- 註冊時間: 週三 8月 01, 2001 8:00 am
-
- 高級玩家
- 文章: 396
- 註冊時間: 週三 8月 01, 2001 8:00 am
//Pos1設包包內木頭的位置
//Pos2設鐵箱的位置
//User1設木頭數量
//User2設斧頭數量, 用來判斷有沒有工具
//Var1初值設為0,表示第0條路線
//Var2, Var3計算用, 不用理
//Var4每一條伐木的起始位置
//Var5每一條伐木的終點位置
Var1=Var1%7
If Var1=0
Var4=2723
Var5=2704
End If
If Var1=1
Var4=2702
Var5=2659
End If
If Var1=2
Var4=2723
Var5=2685
End If
If Var1=3
Var4=2483
Var5=2458
End If
If Var1=4
Var4=2486
Var5=2431
End If
If Var1=5
Var4=2501
Var5=2419
End If
If Var1=6
Var4=2369
Var5=2332
End If
SendKey(144)//重新Count Resources
Delay(3000)
Var2=Var1+9//這裏用Macro9至15來Recall到伐木的位置
While NowY!=Var4
SendMacro(Var2)//Recall到伐木的位置
Delay(10000)
Wend
While NowY>Var5 //左下到右上
SendMacro(8)//砍下的Macro
WaitForWghtInc(16000)
Var2=NowY
Next11://用來走到下一顆樹, 每走三步一顆樹
SendKey(33)//往左上走
Delay(500)
Var3=Var2-NowY
Var3=Var3%3
On Var3!=0 Jump Next11
Wend
SendKey(35)//回頭, 改變方向左下
Delay(500)
While NowY<=Var4 //右上到左下
SendMacro(7)//砍上的Macro
WaitForWghtInc(16000)
On Wght>400 Jump GoHome//重量如果超過400就拿回家放
Var2=NowY
Next12:
SendKey(35)//往左下走
Delay(500)
Var3=NowY-Var2
Var3=Var3%3//一樣是每三步一顆樹
On Var3!=0 Jump Next12
Wend
GoHome:
SendKey(46)//放下斧頭, 以免太重掉到地上
Delay(500)
On User2=0 Jump GoHome//確認工具真的有放下來
If Bp<3
SendMarco(3)//沒藥了到M城發呆
Delay(8000)
Stop
End If
While NowY!=2796
SendMacro(4) //回家
Delay(8000)
Wend
Var1=Var1+1
If Var1=7
SendMacro(16)//最後一條砍完回家後重新Mark一下家裏的符石
Delay(5000)
End If
Home:
While NowY!=2792//走到屋子前放木頭
SendKey(33)
Delay(500)
Wend
DragWood:
Var2=User1-1
Drag Var2 From Pos1 to Pos2
//Pos2設鐵箱的位置
//User1設木頭數量
//User2設斧頭數量, 用來判斷有沒有工具
//Var1初值設為0,表示第0條路線
//Var2, Var3計算用, 不用理
//Var4每一條伐木的起始位置
//Var5每一條伐木的終點位置
Var1=Var1%7
If Var1=0
Var4=2723
Var5=2704
End If
If Var1=1
Var4=2702
Var5=2659
End If
If Var1=2
Var4=2723
Var5=2685
End If
If Var1=3
Var4=2483
Var5=2458
End If
If Var1=4
Var4=2486
Var5=2431
End If
If Var1=5
Var4=2501
Var5=2419
End If
If Var1=6
Var4=2369
Var5=2332
End If
SendKey(144)//重新Count Resources
Delay(3000)
Var2=Var1+9//這裏用Macro9至15來Recall到伐木的位置
While NowY!=Var4
SendMacro(Var2)//Recall到伐木的位置
Delay(10000)
Wend
While NowY>Var5 //左下到右上
SendMacro(8)//砍下的Macro
WaitForWghtInc(16000)
Var2=NowY
Next11://用來走到下一顆樹, 每走三步一顆樹
SendKey(33)//往左上走
Delay(500)
Var3=Var2-NowY
Var3=Var3%3
On Var3!=0 Jump Next11
Wend
SendKey(35)//回頭, 改變方向左下
Delay(500)
While NowY<=Var4 //右上到左下
SendMacro(7)//砍上的Macro
WaitForWghtInc(16000)
On Wght>400 Jump GoHome//重量如果超過400就拿回家放
Var2=NowY
Next12:
SendKey(35)//往左下走
Delay(500)
Var3=NowY-Var2
Var3=Var3%3//一樣是每三步一顆樹
On Var3!=0 Jump Next12
Wend
GoHome:
SendKey(46)//放下斧頭, 以免太重掉到地上
Delay(500)
On User2=0 Jump GoHome//確認工具真的有放下來
If Bp<3
SendMarco(3)//沒藥了到M城發呆
Delay(8000)
Stop
End If
While NowY!=2796
SendMacro(4) //回家
Delay(8000)
Wend
Var1=Var1+1
If Var1=7
SendMacro(16)//最後一條砍完回家後重新Mark一下家裏的符石
Delay(5000)
End If
Home:
While NowY!=2792//走到屋子前放木頭
SendKey(33)
Delay(500)
Wend
DragWood:
Var2=User1-1
Drag Var2 From Pos1 to Pos2
我不在家,就在咖啡館;不在咖啡館,就在去咖啡館的路上


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