英雄論壇

想法二:
跟想法一差不多但是要多準備一些小袋子
1.每120隻小刀裝成一個袋子
2.裝了三袋就Recall去賣
3.回家打小刀
//User1=鐵磚數量
//User2=小刀數量
//Var1 Recall的次數, 剛開始設0
//Var2 裝小刀的袋子數量
//Var3 小刀的顏色
//Var5 小袋子的顏色
//Pos1 地上鐵磚的位置
//Pos2 自己的位置
//Pos3 主包包的左上角
//Pos4 主包包的右下角
//Pos5 小包包的位置
//Pos6 裝120隻小刀的位置1
//Pos7 裝120隻小刀的位置2
//Pos8 大箱子的位置, 放小袋子用
//把小刀加到sell agents
Drag 360 From Pos1 to Pos2
Delay(500)
While User1>10//數量請自行調整,鐵太少好像Macro會亂
SendMacro(2)//打小刀
Delay(5000)//不確定要Delay多少請自訂
Wend
Var4=GetColorPos[Var3,Pos3,Pos4]
While Var4!=-1
Drag 1 from Var4 to Pos5
Delay(500)
Var4=GetColorPos[Var3,Pos3,Pos4]
Wend
If Var2=0
Drag 1 from Pos5 to Pos6
Delay(500)
Var2=Var2+1
End If
If Var2=1
Drag 1 from Pos5 to Pos7
Delay(500)
Var2=Var2+1
End If
If Var2=2
Var2=0
Drag 1 from Pos5 to Pos2//把三個包包都放到身上
Delay(500)
Drag 1 from Pos6 to Pos2
Delay(500)
Drag 1 from Pos7 to Pos2
Delay(500)
SendKey(144)//重新計算小刀的數量
Delay(3000)
While NowX!=打鐵屋的X坐標
SendMacro(1)//Recall到打鐵屋
Delay(8000)
Wend
If Var1>14//每Recall 15次重新Mark一次
SendMacro(5)//Mark到打鐵屋的Rune
Delay(5000)
End If
While User2!=0//賣東西
say "vendor sell"
Delay(300)
Wend
While NowX!=家裏的X坐標
SendMacro(3)//Recall回家
Delay(8000)
Wend
If Var1>14
SendMacro(6)//每Recall 15次Mark一次回家的Rune
Delay(5000)
End If
SendMacro(4)//開門
Delay(500)
While NowX!=門的X坐標
SendKey(33)//這裏假設你是往左上方走
//請自行更改需要走的方向
Delay(500)
Wend
SendMacro(4)//關門
Delay(500)
Var1=Var1+1
Var6=GetColorPos[Var5,Pos3,Pos4]
While Var6!=-1
Drag 1 from Var6 to Pos8
Delay(500)
Wend
End If

這個方法寫著寫著...覺得好麻煩
變數都快用光了

想法一:
把鐵磚放在家裏地上
用Recall的方法, 每次搬一些去打鐵屋打
打完直接賣
1.拿鐵
2.Recall到打鐵屋
3.邊打邊賣
4.Recall回家->開門->進門->關門
5.重覆1的動作
我大概寫一下, 因為沒試過所以想用的人請自己改一下
//User1=鐵磚數量
//User2=小刀數量
//Var1 Recall的次數, 剛開始設0
//Pos1 地上鐵磚的位置
//Pos2 自己的位置
//把小刀加到sell agents
Drag 360 From Pos1 to Pos2
Delay(500)
While NowX!=打鐵屋的X坐標
SendMacro(1)//Recall到打鐵屋
Delay(8000)
Wend
If Var1>14//每Recall 15次重新Mark一次
SendMacro(5)//Mark到打鐵屋的Rune
Delay(5000)
End If
While User1>10//數量請自行調整,鐵太少好像Macro會亂
SendMacro(2)//打小刀
Delay(5000)//不確定要Delay多少請自訂
If User2>4
say "vendor sell"
Delay(500)
End If
Wend
say "vendor sell"//最後再賣一次
Delay(500)
While NowX!=家裏的X坐標
SendMacro(3)//Recall回家
Delay(8000)
Wend
If Var1>14
SendMacro(6)//每Recall 15次Mark一次回家的Rune
Delay(5000)
End If
SendMacro(4)//開門
Delay(500)
While NowX!=門的X坐標
SendKey(33)//這裏假設你是往左上方走
//請自行更改需要走的方向
Delay(500)
Wend
SendMacro(4)//關門
Delay(500)
Var1=Var1+1

我是邊想邊寫的完全沒有經過測試
測試過之後可以和我討論一下

_________________
我不在家，就在咖啡館；不在咖啡館，就在去咖啡館的路上

<font size=-1>[ 這篇文章被編輯過: 小葉子 在 2001-08-27 00:36 ]</font>

請問各位BS要怎麼練才不會被關!?
我想掛整晚打小刀可是又怕小刀太多被關
怎麼樣才能一邊打小刀一邊賣小刀?