文章
由 B仔 » 週四 7月 19, 2001 2:12 pm
範例六 裁縫 頭巾篇(賺錢版)
//pos1包包左上
//pos2包包右下
//pos3地上的布
//pos4身上放布的包包的位置
//pos5堆疊包包的位置
//pos6拖過去放的位置
drag 200 from pos3 to pos4
repeat 150
if user1>1
sendkey(f9)
delay(6000)
else
var1=0
while Var1<100 && GetColorPos[var7,pos1,pos2]!=-1
drag all from GetColorPos[var7,pos1,pos2] to pos5
var1=var1+1
wend
end if
end repeat
drag 200 from pos3 to pos4
repeat 150
if user1>1
sendkey(f9)
delay(6000)
else
var1=0
while Var1<100 && GetColorPos[var7,pos1,pos2]!=-1
drag all from GetColorPos[var7,pos1,pos2] to pos5
var1=var1+1
wend
end if
end repeat
drag 1 from pos5 to pos6 delay 200