GXGamer 玩家論壇 -> 小林..馬害的掛網挖礦??

GXGamer Forum

競技場

說明

搜尋

會員

日曆

歡迎訪客 ( 登入 | 註冊 )

重寄認證電子郵件

GXGamer 玩家論壇 -> 遊戲討論區 -> UO討論區

小林..馬害的掛網挖礦??

追蹤主題 | 郵寄主題 | 列印主題

ferret	發表於： Aug 3 2004, 06:32 PM
-- 所屬群組： Members 發表總數： 38 會員編號： 4 註冊日期： 13-February 04	小林.. 你知道馬害如何掛網挖礦的嗎? 可以的話.. 能不能大概教我一下..

小林	發表於： Aug 3 2004, 07:46 PM
邊po文邊OGC導致陽萎所屬群組： Admin 發表總數： 1,961 會員編號： 3 註冊日期： 13-February 04	他的超級ezs兼razor的挖礦程式同樣的可以在ody使用..但是版本不一樣..ody的比較覆雜等他上來你可以問他看看 --------------------

Csikszentmihalyi	發表於： Aug 6 2004, 01:08 PM
Administrator 所屬群組： Admin 發表總數： 1,309 會員編號： 1 註冊日期： 11-February 04	這邊的挖礦程式比較容易, 我忘了要不要配合Razor, 可能不用喔... 等下週有空時再來寫個說明. -------------------- - Tough ain't Enough -

小林	發表於： Aug 7 2004, 02:10 AM
邊po文邊OGC導致陽萎所屬群組： Admin 發表總數： 1,961 會員編號： 3 註冊日期： 13-February 04	馬害蜜月比較要緊剩下的以後再來弄吧^^ --------------------

Csikszentmihalyi

發表於： Aug 9 2004, 12:03 AM

Administrator

所屬群組： Admin
發表總數： 1,309
會員編號： 1
註冊日期： 11-February 04

先把程式 PO 出來...

流程大致上是靠背包裡的符石書一點一點的 recall 挖礦,
然後不定時補充十字稿

CODE

[variable]
var1=
var2=1400
var3=3200
var4=6000
var5=
var6=8454680
var7=
var8=30
pos1=
pos2=3998143
pos3=11076171
pos4=
pos5=12124519
pos6=12976485
pos7=13697381
pos8=14549354
[script]

While 1=1
//1
ExtVar[1]=25952546
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//2
ExtVar[1]=25952546
ExtVar[2]=22675905
ExtVar[3]=15860027
Call Mining
Call Put

//3
ExtVar[1]=26083653
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//4
ExtVar[1]=26083653
ExtVar[2]=22675905
ExtVar[3]=15860027
Call Mining
Call Put

//5
ExtVar[1]=25952616
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//6
ExtVar[1]=25952616
ExtVar[2]=22675905
ExtVar[3]=15073621
Call Mining
Call Put

//7
ExtVar[1]=25952651
ExtVar[2]=22610208
ExtVar[3]=16843090
Call Mining
Call Put

//8
ExtVar[1]=25952651
ExtVar[2]=22675905
ExtVar[3]=16580909
Call Mining
Call Put

//9
ExtVar[1]=25756109
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//10
ExtVar[1]=25756109
ExtVar[2]=22675905
ExtVar[3]=15860027
Call Mining
Call Put

//11
ExtVar[1]=25887217
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//12
ExtVar[1]=25887217
ExtVar[2]=22675905
ExtVar[3]=15860027
Call Mining
Call Put

//13
ExtVar[1]=26018324
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//14
ExtVar[1]=26018324
ExtVar[2]=22675905
ExtVar[3]=15860027
Call Mining
Call Put

//15
ExtVar[1]=25887284
ExtVar[2]=22610208
ExtVar[3]=15860027
Call Mining
Call Put

//16
ExtVar[1]=25887284
ExtVar[2]=22675905
ExtVar[3]=15860027
Call Mining
Call Put

WEnd
Stop

Mining:
Double Left Click 9437745
Delay Var3
Left Click ExtVar[1]
Delay Var2
Left Click ExtVar[2]
Delay Var4

Double Left Click 10486221
Delay Var2
Left Click ExtVar[3]
Delay Var2
Double Left Click 10486221
Delay Var2
Left Click ExtVar[3]
Delay Var2
Call M2
Delay Var2
Return

M2:
ExtVar[10]=0
While ExtVar[10]<Var8
SendKey(f10)
Delay Var2
ExtVar[10]=ExtVar[10]+1
If Color[10486221]!=5799096
Break
End If
WEnd
Return

Put:
Call GoHome
ExtVar[13]=0
While 1=1
ExtVar[12]=0

//Close & Open Backpack
If Color[1114569]!=3167352
Sendkey(Alt+85)
Delay Var2
Sendkey(Alt+73)
Delay Var3
End If

//Drag ores and rocks
//Bloodstone ores
ExtVar[0]=GetColorPos[1048616,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Ethereal ores //all black!!
ExtVar[0]=GetColorPos[1048576,6619593,8585795]
If ExtVar[0]!=-1
Call Put2
End If
//Mythral ores
ExtVar[0]=GetColorPos[7345168,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Phoenix ores
ExtVar[0]=GetColorPos[3189976,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Platinum ores
ExtVar[0]=GetColorPos[11578544,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Blackrock ores
ExtVar[0]=GetColorPos[2102296,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Glacial ores
ExtVar[0]=GetColorPos[14726216,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Divine ores
ExtVar[0]=GetColorPos[7881768,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If

//Elven ores
ExtVar[0]=GetColorPos[3161136,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Elven ores
ExtVar[0]=GetColorPos[1070104,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If

//Valorite ores
ExtVar[0]=GetColorPos[7363672,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Verite ores
ExtVar[0]=GetColorPos[3165256,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Agapite ores : color same with normal rocks, so call put3
ExtVar[0]=GetColorPos[8948912,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put3
End If
//Gold ores
ExtVar[0]=GetColorPos[2116696,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Bronze ores and rocks
ExtVar[0]=GetColorPos[4228264,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Copper ores and rocks
ExtVar[0]=GetColorPos[2106416,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Dull Copper ores
// ExtVar[0]=GetColorPos[8424600,Pos2,Pos3]
// If ExtVar[0]!=-1
// Call Put2
// End If
//Shadow ores and rocks
ExtVar[0]=GetColorPos[5784656,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Iron ores
ExtVar[0]=GetColorPos[3683400,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If

//Valorite rocks
ExtVar[0]=GetColorPos[7890008,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Verite rocks
ExtVar[0]=GetColorPos[6868160,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Agapite rocks
ExtVar[0]=GetColorPos[5790840,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Gold rocks
ExtVar[0]=GetColorPos[4766944,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put2
End If
//Iron rocks
ExtVar[0]=GetColorPos[7369856,Pos2,Pos3]
If ExtVar[0]!=-1
Call Put3
End If

//not found!
If ExtVar[12]=0
Break
End If

ExtVar[13]=ExtVar[13]+1
//stuck
If ExtVar[13]>15 Then
Left Click 12583231
Delay 500
Break
End If
WEnd

If Color[10486221]!=5799096
Double Left Click Pos8
Delay Var3
Drag all from 6554076 to 11272636
Delay Var2
End If

Sendkey(Alt+73)
Delay Var3
Return

Put2:
Drag All From ExtVar[0] to Pos7
Delay Var2
Sendkey(Alt+73)
Delay Var3
ExtVar[12]=1
Return

Put3:
ExtVar[13]=Rand[2]
If ExtVar[13]=0
Drag All From ExtVar[0] to Pos5
Else
Drag All From ExtVar[0] to Pos6
End If
Delay Var2
ExtVar[12]=1
Return

GoHome:
Sendkey(Alt+73)
Delay Var3
While Color[5571123]!=3167336
Drag All From 5571123 To 3015106
Delay Var2
Sendkey(Alt+85)
Delay Var2
Sendkey(Alt+73)
Delay Var3
WEnd

Double Left Click 5571123
Delay Var3
Left Click 25952616
Delay Var2
Left Click 22610208
Delay Var4
Return

--------------------

- Tough ain't Enough -

ferret	發表於： Aug 16 2004, 01:04 PM
-- 所屬群組： Members 發表總數： 38 會員編號： 4 註冊日期： 13-February 04	ETHEREAL 價值藍礦請問兩者有何差別啊? 等級是在哪裡呢?

Csikszentmihalyi	發表於： Aug 16 2004, 02:15 PM
Administrator 所屬群組： Admin 發表總數： 1,309 會員編號： 1 註冊日期： 11-February 04	價值藍礦應該是 Valorite, 等級差距自然不在話下, 我猜你要問的是 Mythral... Mythral 和 Ethreal 兩者以挖礦打鐵的技能來比較, 算是同等級的, 在 Blood 之下. 比較久之前這個等級是 Ethreal 純黑的礦, 後來發現純黑的物件好像會造成部分的人當機, 結果就改成了 Mythral 藍色的礦, 兩者屬性相同. 現在我還有一個純黑的油燈在屋內箱中, 不知道是不是唯一的 Ethreal 物件了... -------------------- - Tough ain't Enough -

ferret	發表於： Aug 16 2004, 02:22 PM
-- 所屬群組： Members 發表總數： 38 會員編號： 4 註冊日期： 13-February 04	馬害.. 我有經過小林看到BLACKNOVA的資料但裡面並沒有價值藍礦這個東西@@ 而且有時看玩家的紙娃娃裡面有時是寫價值藍礦有時寫 ETHEREAL 但顏色似乎是一樣價值藍礦是不是就是 ETHEREAL??

ferret

發表於： Aug 16 2004, 02:35 PM

所屬群組： Members
發表總數： 38
會員編號： 4
註冊日期： 13-February 04

CODE

ExtVar[10]=0
While ExtVar[10]<Var8
 SendKey(f10)
 Delay Var2
 ExtVar[10]=ExtVar[10]+1
  If Color[10486221]!=5799096
   Break
  End If
WEnd
Return

**************************************

 ExtVar[13]=ExtVar[13]+1
 //stuck
 If ExtVar[13]>15 Then
  Left Click 12583231
  Delay 500
  Break
 End If
WEnd

If Color[10486221]!=5799096
 Double Left Click Pos8
 Delay Var3
 Drag all from 6554076 to 11272636
 Delay Var2
End If

Sendkey(Alt+73)
Delay Var3
Return

**********************************

Put3:
ExtVar[13]=Rand[2]
If ExtVar[13]=0
 Drag All From ExtVar[0] to Pos5
Else
 Drag All From ExtVar[0] to Pos6
End If
Delay Var2
ExtVar[12]=1
Return

馬害..請問你前兩段(M2 , ExtVar[13])的內容是在做些甚麼事啊?

分析了很久@@..看不出在幹嘛..

第三段是在分石頭和礦石雜物嗎?

ferret

發表於： Aug 16 2004, 02:56 PM

所屬群組： Members
發表總數： 38
會員編號： 4
註冊日期： 13-February 04

CODE

call put

Left DbClick pos8
delay var8
Left Click 25952546
delay var8
Left Click 22610370
delay var8
call min
delay var8
call put

min:
var1=0
repeat var7
var2=0
repeat var7
var3=(var1-var2)*22
var4=(var1+var2-var7+1)*22
pos2 = pos1-X2Pos[var3]+Y2Pos[var4]
Left DbClick 5505886
delay(var8)
left click pos2
delay(var8)
var2=var2+1
end repeat
var1=var1+1
end repeat
Return

Put:
Call GoHome
While 1=1
ExtVar[12]=0
//Drag ores and rocks
//Bloodstone ores
ExtVar[0]=GetColorPos[1048616,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Ethereal ores //all black!!
ExtVar[0]=GetColorPos[1048576,pos3,pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Mythral ores
ExtVar[0]=GetColorPos[7345168,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Phoenix ores
ExtVar[0]=GetColorPos[2199246,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Platinum ores
ExtVar[0]=GetColorPos[15198183,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Blackrock ores
ExtVar[0]=GetColorPos[3223601,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Glacial ores
ExtVar[0]=GetColorPos[14067257,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Divine ores
ExtVar[0]=GetColorPos[10250512,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Jade ores
ExtVar[0]=GetColorPos[553240,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Elven ores
ExtVar[0]=GetColorPos[3161136,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Elven ores
ExtVar[0]=GetColorPos[1070104,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Valorite ores
ExtVar[0]=GetColorPos[7363672,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Verite ores
ExtVar[0]=GetColorPos[4888196,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Agapite ores : color same with normal rocks, so call put3
ExtVar[0]=GetColorPos[6515067,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put3
End If
//Gold ores
ExtVar[0]=GetColorPos[3245724,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Bronze ores and rocks
ExtVar[0]=GetColorPos[3238284,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Copper ores and rocks
ExtVar[0]=GetColorPos[7057094,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Dull Copper ores
// ExtVar[0]=GetColorPos[8689317,Pos3,Pos4]
// If ExtVar[0]!=-1
// Call Put2
// End If
//Shadow ores and rocks
ExtVar[0]=GetColorPos[5917010,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//Iron ores
ExtVar[0]=GetColorPos[10268374,Pos3,Pos4]
If ExtVar[0]!=-1
Call Put2
End If
//not found!
If ExtVar[12]=0
Break
End If
WEnd
Return

Put2:
sendkey(F12)
delay var8
Drag All From ExtVar[0] to Pos5
delay var8
ExtVar[12]=1
Return

GoHome:
Sendkey(F12)
Delay Var8
While Color[9306960]!=3223684
Drag All From 9306960 To 4916159
Delay Var8
Sendkey(F11)
Delay Var8
Sendkey(F12)
Delay Var8
WEnd
Left DbClick 9306960
delay var8
Left Click 25952546
delay var8
Left Click 22610370
delay var8
Return

以上是最近寫的簡單版..

一開始是呼叫put..

put 會先呼叫 gohome回家定位

再檢查身上的礦(祇有礦沒有石頭..我把石頭先除去了)

有的話移到箱子..

都沒有的話..就會脫離迴圈..

接著是點符石書..點八頁中的某一頁..某一地..

然後呼叫挖礦程石..先點十字鎬..挖礦範圍5x5..迴圈次數祇有一次..(考量重量負擔)..

當挖完返回主程式後..會再呼叫put回家整理..

至於挖礦的地點可以再增加..

不過這個程式還有個缺點..

到時會再增加個put3..

以便搬移十字鎬從箱子到背包..

但@@我還沒想到怎麼檢查背包裡十字鎬的數量..及每隻十字鎬剩餘的使用次數..

拜託大家幫忙想想 ^^|||

Csikszentmihalyi	發表於： Aug 16 2004, 04:14 PM
Administrator 所屬群組： Admin 發表總數： 1,309 會員編號： 1 註冊日期： 11-February 04	Q1: http://uo.blacknova.com/modules.php?name=C...showpage&pid=13 礦的種類可以參考Blacknova公佈的, 從上到下, 等級越來越高. UO內建標準的礦產是從 Iron 到 Valorite, 都有官方翻譯的中文名字, 其中 Valorite 就是價值藍礦. 你看到的應該也都是中文名稱, 看不到英文名稱. 從 Moonstone 起是 GM 後來加入的, 沒有中文名稱. 至於 Ethreal 你在這個表看不到, 因為現在已經沒有了, 以前這種礦是全黑的, 是在 Mythral 這個位置, 現在已改成了藍色, 並且改名為 Mythral. 之前這種礦改版時, GM 都有清掉喔... 不知道哪個玩家還有 Ethreal 製品呢? Q2: 第一段是挖礦囉, 這邊挖礦不用什麼 5x5, 因為和 Ody 不同, 這邊是 8x8 的一個區域, 然後挖其中一點即可清空此區域, 所以我都是 recall 後, 挖腳下的一點(山壁除外, 有某些方位要另外對準山壁才挖得到), 在執行這段之前會先點包包內的十字稿, 然後點要挖的點, 而這段主要是執行 F10 這個 UO 內建的熱鍵, 這個熱鍵是設定為: LastObject WaitForTarget LastTarget 這樣就可以囉... 第二段的 ExtVar[13] 是記數器, 這整段是要從背包把東西拖曳到箱子, 因為我不是用固定次數的迴圈, 我是在特定狀況下(沒拖曳到東西時)會離開迴圈, 但是這樣做法可能會產生無窮迴圈, 像是人物視窗剛好檔在背包上面時, 就有可能會一直拖東西卻不停止, 所以我設定是拖曳次數超過 15 次就中斷... 第三段是要拖曳石頭的, 因為石頭不能合併, 箱子容量又有限, 掛網一段時間後可能箱子都放滿了石頭, 所以這邊我取亂數, 隨機拖放到兩個箱子之一, 可以增加掛網時間. Q3: 我也沒做檢查十字稿數量或次數的, 我是看背包角落本來應該有十字稿的地方, 顏色是否正確, 不正確就是十字稿沒了, 然後就從箱子拖一隻到背包. -------------------- - Tough ain't Enough -

ferret	發表於： Aug 18 2004, 06:16 PM
-- 所屬群組： Members 發表總數： 38 會員編號： 4 註冊日期： 13-February 04	請問工會裡有那位還有M藍和血礦的礦點符石書嗎? 原本在小林家的那本聽說被人借走後就沒有了.. 如果誰有..麻煩借拷一下^^

Csikszentmihalyi	發表於： Aug 21 2004, 07:34 PM
Administrator 所屬群組： Admin 發表總數： 1,309 會員編號： 1 註冊日期： 11-February 04	剛剛看了一下, 有一本書名是 Platinum and above 的就是了, 因為高級礦點比較少, 所以通通放到同一本符石書裡... -------------------- - Tough ain't Enough -

0 位使用者正在閱讀本主題 (0 位訪客及 0 位匿名使用者)

0 位會員：

« 上一個主題 | UO討論區 | 下一個主題 »

[ Script Execution time: 0.0063 ] [ 14 queries used ] [ GZIP 啟用 ]