1 頁 (共 1 頁)

發表於 : 週五 10月 12, 2001 8:45 pm
Fabius
不用客氣啦..
對了..妳的QQ我重灌後就不見了....

如果妳還沒把我的qq弄不見的話就 send 一個訊息給我吧 ^^

發表於 : 週五 10月 12, 2001 7:28 am
Lady SORRY
thx
^^||
隨然我還是霧殺殺
這篇請留著讓我慢慢研究

發表於 : 週五 10月 12, 2001 6:16 am
Fabius
Sum: //標記Sum
sendmacro(11) //Recall到第一顆樹的macro
delay(5000)
var1=var1+1 //使用macro(11)的次數
if var1=15 //如果使用了15次
sendmacro(6) //就Mark Marco(11)的符石
delay(5000)
var1=0 //Mark後把使用次數歸0
end if

//第1顆樹
if nowx=3069 && nowy=118 //假如座標都正確
sendmacro(1) //砍木的 macro
delay(15000)
end if
On wght>400 Jump Set //假如身上重量達400就跳到 標記 Set //註一

//2
var3=0
While nowy>115 && nowx=3069
var3=var3+1 //步數計(可有可無)註二
SendKey(33) //按方向鍵
delay(500)
if var3=30 //假如原地空走30步
jump Sum //跳到標記 sum
end if
wend
if nowy=115 && nowx=3069 //假如座標正確
sendmacro(1) //砍木macro
delay(15000)
end if
On wght>400 Jump Set

//3
var3=0
While nowy>112 && nowx=3069
var3=var3+1
SendKey(33)
delay(500)
if var3=30
jump Sum
end if
wend
if nowy=112 && nowx=3069
sendmacro(1)
delay(15000)
end if
On wght>400 Jump Set
jump Sum

Set: //標記set
sendmacro(8) //mark目前所在地
delay(5500)

Ext: //標記ext
sendmacro(10) //recall回家的 macro
delay(5000)
var4=var4+1 //符石使用次數計

if var4>14 //超過14次就 mark
if nowx=3023 && nowy=119
sendmacro(7)
delay(5000)
var4=0 // mark完歸0
end if
if nowx!=3023 && nowy!=119 //如果不是在macro(10)的位置
jump Ext //跳到標記 ext
end if
end if
if nowx=3023 && nowy=119 //如果位置正確
var2=user1-2 //user1是身上的木頭總數
drag var2 from pos1 to pos2 delay 700 //拿取var2的木頭 放到門口的箱子
delay(1500)
end if
if nowx!=3023 && nowy!=119 //如果不是macro(10)的位置
jump Ext //再跳到macro(10)一次
end if

sendmacro(9) //跳到macro(8)的位置
delay(5500)
Resume //這是返回先前 on xxx jump xxx的指令


註一:
【動態條件跳躍指令】
On 條件 Jump 標記名
相關指令
Resume --返回jump點


sum:
var2=var2+1
on var1>3 jump ext //on jump指令後的每一行都會檢查是
var3=var3+1 //否條件成立,如成立則jump到標記處
var1=4 //jump標記後,即關閉檢查on jump的條件
var4=var4+1 //直到resume返回之前的程式執行位置
if var2>3 //ex:左列程式執行到var1=4時會觸動on jump
jump exit //而jump到ext:處,接著把var1設1,再resume
end if //回到var1=4的下一行....
jump sum
ext:
var1=1
resume
exit:
stop

註二:
由於有時座標會重疊會走空步也就是障礙物阻到變成 script失敗!
所以我設一個計步器~~免得因為被擋住而一個晚上都在原地發呆!!

發表於 : 週五 10月 12, 2001 6:12 am
Fabius
在 2001-10-12 05:41, Lady SORRY 寫了:
請問一下
在伐木程式中(ezs 1)預防走空步的指令為何
就是主機在記錄時他依然會走步
我記得你曾經提過
不過我忘了方法為何
麻煩你回答依下好嗎
感激不盡!!
設一個verx>30
例:(ezs1)
if varx>30
break
endif
超過30步就把他中斷
例:(ezs2)
if varx>30
jump 標記點
endif
其實上次我所說的是ezs2..那個我個人覺得用來砍樹不錯用..
ezs1在中斷後還是會再繼續往下一行執行(會有等待時間
ezs2就可以直接往回標記點再走
可以參考看看..

發表於 : 週五 10月 12, 2001 5:41 am
Lady SORRY
請問一下
在伐木程式中(ezs 1)預防走空步的指令為何
就是主機在記錄時他依然會走步
我記得你曾經提過
不過我忘了方法為何
麻煩你回答依下好嗎
感激不盡!!