英雄論壇

人間遊戲 遊戲人間
http://board.odyes.com/phpBB3/

阿呢…可進來看一下嗎？

http://board.odyes.com/phpBB3/viewtopic.php?f=71&t=89168

第 1 頁 (共 1 頁)

發表於 : 週日 3月 21, 2004 9:37 am
由 siven
J.C.J. 寫:寒~~~~

阿呢
阿泥
阿尼
阿妮


還有沒有其他的......... :twisted:
sorry都忘了您的要求...
最近真的比較忙..只能寫一些簡單的EZS來掛網
目前練馴獸~我會盡快把東西搞定的!
遇到我在玩的話要提醒我去做事喔...

發表於 : 週日 3月 21, 2004 2:08 am
由 Elaine
J.C.J. 寫:寒~~~~

阿呢
阿泥
阿尼
阿妮


還有沒有其他的......... :twisted:
他都應就沒關係ar~ :mrgreen:

發表於 : 週日 3月 21, 2004 1:22 am
由 J.C.J.
寒~~~~

阿呢
阿泥
阿尼
阿妮


還有沒有其他的......... :twisted:

發表於 : 週六 3月 20, 2004 9:59 pm
由 catsky
我決定了...阿尼
等我春假回高雄再請教你 :D
你有放春假嗎?

發表於 : 週四 3月 18, 2004 10:33 am
由 BK
siven 寫: 狀況一:
執行完甲之後會回到A
繼續goto (2222,3333)
end if
狀況二:
執行完甲之後並不會執行乙
要進入乙的話應該把進入條件寫在A
不知道有解答你的問題嗎?
那要狀況二如何寫入，才會讓他跳入乙呢？
阿泥教教我巴（舉個例） :lol: 謝謝阿泥哦 :ghost:

發表於 : 週四 3月 18, 2004 7:49 am
由 siven
BK 寫:再問一個關於return的使用法：
如果執行A程式call 甲副程式
但副程式結尾用return
那執行完時還會跳回A程式嗎？
例：
//A
應該是A:吧?
if str=100
goto (1111,2222)
call 甲
goto (2222,3333)
end if
//甲
pos1 drag all to pos2
應該是drag all from pos1 to pos2吧?
return
還有第二個情況下如
//A
if var1>100
goto (1111,2222)
call 甲
goto (2222,3333)
end if
//甲
pos1 drag all to pos2
return
var2=1
//乙
if var2=1
say help
end if
這樣跑到甲之後，會先跑到乙還是回到A？
狀況一:
執行完甲之後會回到A
繼續goto (2222,3333)
end if
狀況二:
執行完甲之後並不會執行乙
要進入乙的話應該把進入條件寫在A
不知道有解答你的問題嗎?

發表於 : 週四 3月 18, 2004 4:37 am
由 BK
再問一個關於return的使用法：
如果執行A程式call 甲副程式
但副程式結尾用return
那執行完時還會跳回A程式嗎？
例：
//A
if str=100
goto (1111,2222)
call 甲
goto (2222,3333)
end if
//甲
pos1 drag all to pos2
return
還有第二個情況下如
//A
if var1>100
goto (1111,2222)
call 甲
goto (2222,3333)
end if
//甲
pos1 drag all to pos2
return
var2=1
//乙
if var2=1
say help
end if
這樣跑到甲之後，會先跑到乙還是回到A？

發表於 : 週二 3月 16, 2004 4:22 pm
由 jeff_cheng1260
對我來說看了一下真是無字天書

看沒有

果然只有阿尼 ....能看得懂

發表於 : 週二 3月 16, 2004 3:44 pm
由 siven
BK 寫:想問些摸組問題…
fishing2: （這句是模組標題嗎？）沒錯...你要叫它副程式也行
pos1=XY2pos[461,347] （XY2pos我不懂哩）
將螢幕上座標[461,347]轉為EZS的座標
if color[35913900] = 8684676 （color是什麼指令？）
取EZS座標[35913900]點上的顏色是否為8684676
combat: （這是武裝的標題嗎？）
武裝的模組或是副程式
KeyString "Guard\n"（這是呼叫守衛嗎？KeyString是什麼指令？守衛為什麼要有d\n?）
這是呼叫警衛...防PK用的不過在ODY是違法的喔~\n是代替按下ENTER送出字串
可以用SAY代替
//=====Loot （這組主要作用是？拉物品嗎？）把腳邊的漁獲撿起來@Q@
loot:
drag all from 19333518 to 15794578
return （return是什麼指令？）看是誰呼叫副程式就回到哪裡去繼續執行
--------------------
home: （以下那句不明）
extvar[1]=GetColorPos[5938365,pos7,pos8]
取在POS7和POS8範圍內符合5938365顏色的第一個點
------------------
return（這是什麼指令？）
麻煩阿尼大大，指教了 :oops: :oops:
我EZ還是不太懂…給布丁教了些，只會簡單的 :lol:

發表於 : 週二 3月 16, 2004 9:31 am
由 BK
BK 寫:想問些摸組問題…
fishing2: （這句是模組標題嗎？）
pos1=XY2pos[461,347] （XY2pos我不懂哩）
if color[35913900] = 8684676 （color是什麼指令？）
combat: （這是武裝的標題嗎？）
KeyString "Guard\n"（這是呼叫守衛嗎？KeyString是什麼指令？守衛為什麼要有d\n?）
//=====Loot （這組主要作用是？拉物品嗎？）
loot:
drag all from 19333518 to 15794578
return （return是什麼指令？）
--------------------
home: （以下那句不明）
extvar[1]=GetColorPos[5938365,pos7,pos8]
------------------
return（這是什麼指令？）
麻煩阿尼大大，指教了 :oops: :oops:
我EZ還是不太懂…給布丁教了些，只會簡單的 :lol:
扛一下 :oops:

發表於 : 週一 3月 15, 2004 1:41 am
由 BK
想問些摸組問題…
fishing2: （這句是模組標題嗎？）
pos1=XY2pos[461,347] （XY2pos我不懂哩）
if color[35913900] = 8684676 （color是什麼指令？）
combat: （這是武裝的標題嗎？）
KeyString "Guard\n"（這是呼叫守衛嗎？KeyString是什麼指令？守衛為什麼要有d\n?）
//=====Loot （這組主要作用是？拉物品嗎？）
loot:
drag all from 19333518 to 15794578
return （return是什麼指令？）
--------------------
home: （以下那句不明）
extvar[1]=GetColorPos[5938365,pos7,pos8]
------------------
return（這是什麼指令？）
麻煩阿尼大大，指教了 :oops: :oops:
我EZ還是不太懂…給布丁教了些，只會簡單的 :lol:

發表於 : 週日 3月 14, 2004 12:49 pm
由 siven
//不成熟的作品 不嫌棄的話就用吧~~
//請用32BIT全彩800*600遊戲視窗1024*768系統解析度~
//請騎馬在V城的橋上釣 可增加安全性
//相關的MACRO請自行發問~UOA必備!!
//"排列介面視窗..."的選項請勿勾選!!以及設定開關包包的熱鍵喔~
//晚點PO圖解吧~
//我只用兩個釣場掛一個禮拜就滿了
//應該很好掛~
//這就是我自己使用的版本!
//阿尼絕不藏私~請各位多多指教
//safe button仍然無法解決魚蓋住包包開關的問題 請多注意!!
extvar[2]=0
extvar[3]=0
extvar[9]=0
main:
//=====第一釣場
sendmacro(5)//去第一釣場
extvar[0]=0
if extvar[2]=1
goto 2907,642,16//北上中段
jump area2
end if
if extvar[2]=2
goto 2906,615,16//南下初段
jump area3
end if
if extvar[2]=3
goto 2906,630,16//南下中段
jump area4
end if
area1:
repeat 14
call f1
repeat 2
sendkey(33)
delay(500)
end repeat
end repeat
extvar[2]=1
area2:
repeat 14
call f1
repeat 2
sendkey(33)
delay(500)
end repeat
end repeat
extvar[2]=2
goto 2906,615,16
area3:
repeat 13
call f6
repeat 2
sendkey(35)
delay(500)
end repeat
end repeat
extvar[2]=3
area4:
repeat 13
call f6
repeat 2
sendkey(35)
delay(500)
end repeat
end repeat
extvar[2]=0
//=====第二釣場
fishing2:
sendmacro(6)//去第二釣場
extvar[0]=1
if extvar[3]=1
goto 2881,762,20//北上中段
jump area21
end if
if extvar[2]=2
goto 2906,615,16//南下初段
jump area3
end if
repeat 16
call f1
repeat 2
sendkey(33)
end repeat
end repeat
extvar[3]=1
goto 2881,762,20
area21:
repeat 17
call f6
repeat 2
sendkey(35)
end repeat
end repeat
extvar[3]=0

jump main


f1://北
f2://東北
pos1=XY2pos[461,347]
repeat 10
sendmacro(9)//使用魚竿
left Click pos1
repeat 5
delay 1000
if Hits<str
call combat
end if
if color[35913900] = 8684676
break
end if
end repeat
call loot
if wght>400
call home
end if
pos1=pos1+65536*10+10
end repeat
pos1=pos1-10*10-(65536*10)*10
return
f3://東
f4://東南
f5://南
f6://西南
pos1=XY2pos[367,271]
repeat 8
sendmacro(9)//使用魚竿
left Click pos1
repeat 5
delay 1000
if Hits<str
call combat
end if
if color[35913900] = 8684676
break
end if
end repeat
call loot
if wght>400
call home
end if
pos1=pos1-65536*8-8
end repeat
pos1=pos1+10*8+(65536*10)*8
return
f7://西
f8://西北

//=====Combat
combat:
sendmacro(4)//武裝
sendkey(Alt+s)
delay(4000)
extvar[9]=0
while extvar[9]<3
if hits<30
KeyString "Guard\n"
delay(500)
sendkey(44)
end if
if hits<str
sendkey(Alt+s)
delay(4000)
extvar[9]=0
else
delay(4000)
extvar[9]=extvar[9]+1
end if
wend
return

//=====Loot
loot:
drag all from 19333518 to 15794578
return


//=====Go Home
home:
sendmacro(8)
goto 2035,44
extvar[20]=xy2pos[893,207]
//fish 1
extvar[1]=GetColorPos[5938365,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//fish 2
extvar[1]=GetColorPos[10845076,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//fish 3
extvar[1]=GetColorPos[8096933,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//fish 4
extvar[1]=GetColorPos[6519642,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//bondage
if User1<30
extvar[25]=30 - user1
drag extvar[25] from 17695187 to 15794578
end if
extvar[17] = getcolorpos[3228366,pos7,pos8]
drag all from extvar[17] to 15335860
if color[extvar[20]]=0
call sb
end if

call back
return

//=====Back to Fishing
back:
if extvar[0]=0
//sendmacro(5)//去第一釣場
jump main
end if
if extvar[0]=1
//sendmacro(6)//去第二釣場
jump fishing2
end if
if extvar[0]=2
sendmacro(5)//去第三釣場
end if
return

//=====re-open backpack
//=====safe button
sb:

extvar[21]=xy2pos[884,206]
extvar[22]=xy2pos[896,193]
extvar[23]=xy2pos[909,207]
extvar[24]=xy2pos[897,221]
sendkey(alt+85)
delay(1000)
sendkey(alt+73)
delay(1000)
//drag all from extvar[21] to 15335860
//delay(1500)
drag all from extvar[22] to 15335860
delay(1500)
//drag all from extvar[23] to 15335860
//delay(1500)
//drag all from extvar[24] to 15335860
//delay(1500)
return

發表於 : 週日 3月 14, 2004 12:44 pm
由 siven
//不成熟的作品 不嫌棄的話就用吧~~
//請用32BIT全彩800*600遊戲視窗1024*768系統解析度~
//請騎馬在V城的橋上釣 可增加安全性
//相關的MACRO請自行發問~UOA必備!!
//"排列介面視窗..."的選項請勿勾選!!以及設定開關包包的熱鍵喔~
//晚點PO圖解吧~
//我只用兩個釣場掛一個禮拜就滿了
//應該很好掛~
//這就是我自己使用的版本!
//阿尼絕不藏私~請各位多多指教
//safe button仍然無法解決魚蓋住包包開關的問題 請多注意!!
extvar[2]=0
extvar[3]=0
extvar[9]=0
main:
//=====第一釣場
sendmacro(5)//去第一釣場
extvar[0]=0
if extvar[2]=1
goto 2907,642,16//北上中段
jump area2
end if
if extvar[2]=2
goto 2906,615,16//南下初段
jump area3
end if
if extvar[2]=3
goto 2906,630,16//南下中段
jump area4
end if
area1:
repeat 14
call f1
repeat 2
sendkey(33)
delay(500)
end repeat
end repeat
extvar[2]=1
area2:
repeat 14
call f1
repeat 2
sendkey(33)
delay(500)
end repeat
end repeat
extvar[2]=2
goto 2906,615,16
area3:
repeat 13
call f6
repeat 2
sendkey(35)
delay(500)
end repeat
end repeat
extvar[2]=3
area4:
repeat 13
call f6
repeat 2
sendkey(35)
delay(500)
end repeat
end repeat
extvar[2]=0
//=====第二釣場
fishing2:
sendmacro(6)//去第二釣場
extvar[0]=1
if extvar[3]=1
goto 2881,762,20//北上中段
jump area21
end if
if extvar[2]=2
goto 2906,615,16//南下初段
jump area3
end if
repeat 16
call f1
repeat 2
sendkey(33)
end repeat
end repeat
extvar[3]=1
goto 2881,762,20
area21:
repeat 17
call f6
repeat 2
sendkey(35)
end repeat
end repeat
extvar[3]=0

jump main


f1://北
f2://東北
pos1=XY2pos[461,347]
repeat 10
sendmacro(9)//使用魚竿
left Click pos1
repeat 5
delay 1000
if Hits<str
call combat
end if
if color[35913900] = 8684676
break
end if
end repeat
call loot
if wght>400
call home
end if
pos1=pos1+65536*10+10
end repeat
pos1=pos1-10*10-(65536*10)*10
return
f3://東
f4://東南
f5://南
f6://西南
pos1=XY2pos[367,271]
repeat 8
sendmacro(9)//使用魚竿
left Click pos1
repeat 5
delay 1000
if Hits<str
call combat
end if
if color[35913900] = 8684676
break
end if
end repeat
call loot
if wght>400
call home
end if
pos1=pos1-65536*8-8
end repeat
pos1=pos1+10*8+(65536*10)*8
return
f7://西
f8://西北

//=====Combat
combat:
sendmacro(4)//武裝
sendkey(Alt+s)
delay(4000)
extvar[9]=0
while extvar[9]<3
if hits<30
KeyString "Guard\n"
delay(500)
sendkey(44)
end if
if hits<str
sendkey(Alt+s)
delay(4000)
extvar[9]=0
else
delay(4000)
extvar[9]=extvar[9]+1
end if
wend
return

//=====Loot
loot:
drag all from 19333518 to 15794578
return


//=====Go Home
home:
sendmacro(8)
goto 2035,44
extvar[20]=xy2pos[893,207]
//fish 1
extvar[1]=GetColorPos[5938365,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//fish 2
extvar[1]=GetColorPos[10845076,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//fish 3
extvar[1]=GetColorPos[8096933,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//fish 4
extvar[1]=GetColorPos[6519642,pos7,pos8]
drag all from extvar[1] to 15335860
delay(1000)
if color[extvar[20]]=0
call sb
end if

//bondage
if User1<30
extvar[25]=30 - user1
drag extvar[25] from 17695187 to 15794578
end if
extvar[17] = getcolorpos[3228366,pos7,pos8]
drag all from extvar[17] to 15335860
if color[extvar[20]]=0
call sb
end if

call back
return

//=====Back to Fishing
back:
if extvar[0]=0
//sendmacro(5)//去第一釣場
jump main
end if
if extvar[0]=1
//sendmacro(6)//去第二釣場
jump fishing2
end if
if extvar[0]=2
sendmacro(5)//去第三釣場
end if
return

//=====re-open backpack
//=====safe button
sb:

extvar[21]=xy2pos[884,206]
extvar[22]=xy2pos[896,193]
extvar[23]=xy2pos[909,207]
extvar[24]=xy2pos[897,221]
sendkey(alt+85)
delay(1000)
sendkey(alt+73)
delay(1000)
//drag all from extvar[21] to 15335860
//delay(1500)
drag all from extvar[22] to 15335860
delay(1500)
//drag all from extvar[23] to 15335860
//delay(1500)
//drag all from extvar[24] to 15335860
//delay(1500)
return

阿呢…可進來看一下嗎？

發表於 : 週日 3月 14, 2004 6:59 am
由 BK
聽說你有，自動釣魚也可以撿魚回去的EZS
可分享一下嗎？ :oops: 我自已設的，不會撿魚
所有顯示的時間為 UTC+08:00
第 1 頁 (共 1 頁)
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/