Subject:  戰士掛戰技ez~ (轉截) |
Author:
bb
|
[
Next Thread |
Previous Thread |
Next Message |
Previous Message
]
Date Posted: 12:07:08 10/13/02 Sun
Author Host/IP: imsbbcf01c.netvigator.com/203.198.24.1
//備註欄: 此程式是您在2002年09月27日22時30分下載的.
//備註欄: 此程式必須使用EZScript 2.1.1.1或以上版本.
//原作者: 明日嘉
//更新者: 明日嘉 dr-rkai-skill-fight-food.ezs (已通過龍族v1.00版測試)
//檔案類別: 龍族 - 戰技修練 (傳統系戰士專用) 終極版 (聖皇智能程序第6A版 - 2002.09.23)
//程式更新: 2002.09.24 // 變數內容: 2002.09.23
//下載網址: http://ROYALKNIGHT.ORG (請定期檢查更新)
//程式設定: 在開啟龍族後, 按一下[更新], 選取龍族的標題(DragonRaja Online)
//程式設定: 在[其它]項目裡選取(滑鼠鎖定),(動態抓點及顏色),(DRP??.DLL模組)
//
//Pos1=戰技娃娃的位置/可有可無 (Ctrl+Alt+1抓點)
//
//這程式可以讓一名沒修練治病魔法的玩家在修練戰技同時當在體力耗盡時也
//能夠利用物品欄的食物補充在修練時消耗的體力直到吃光物品欄的食物為止.
//
//1.必須要配合滑鼠左鍵連點程式, 建議使用開始鍵為F1, 停止鍵為F2的連點. (建議使用DRrun或Jola等連點工具)
//2.請先裝備修練用的武器, 把所有視窗關閉, 把戰技娃娃的位置設定在Pos1.
//3.由於肚子餓時會停止動作, 建議執行前準備一些較高級的食物放在物品欄,
//4.若要補充體力, 請在腰帶的第五格放一件食物樣本, 有藥箱請放在第一格.
//5.在執行程式前, 請先確認鍵盤的CAPSLOCK鍵及所有中文輸入法是否已關閉.
//6.按ALT+PAUSE執行, 再按則停止. 執行後程式將會叫您按著SHIFT鍵開始的.
//
//**若果連點開關按鍵不符合, 請在下面的KeyPress(F1和F2)自行修改按鍵吧.
//**若需要使用藥水箱, 請把藥水箱放在腰帶的第1格並設定ExtVar[8]的參數.
//**若需要在沒體力時吃食物, 請在腰帶的第五格放一件較高級的食物來抓色,
//**若需要在沒魔力時喝藍水, 請在腰帶的第四格放一支半數級的藍水來抓色,
//**若需要在沒生命時喝紅水, 請在腰帶的第三格放一支半數級的紅水來抓色.
//**在Var4可以看到掛網時的死亡次數, 每次重新啟動程式將會由零開始計算.
//程式初始化參數設定 - (修改以下部份內容將會影響程式中相關的說明, 非必要時不要亂改)
RKAIDRInit:
MoveFlag = 1
MouseMove 19661200
//那一個位置的顏色改變了才定義為死亡？ (預設: 39059486 = 生命力最低點)
ExtVar[0] = 39059486
//那一個位置的顏色改變了才喝紅藥水呢？ (預設: 36438046 = 生命力 50%)
ExtVar[1] = 36438046
//那一個位置的顏色改變了才喝藍藥水呢？ (預設: 36438786 = 魔力 10%)
ExtVar[2] = 38273794
//那一個位置的顏色改變了才進食食物呢？ (預設: 34930757 = 體力 2%)
ExtVar[3] = 34930757
//紅藥水樣本您放在腰帶中的第幾格？ (預設: 3)
ExtVar[4] = 3
//藍藥水樣本您放在腰帶中的第幾格？ (預設: 4)
ExtVar[5] = 4
//食物的樣本您放在腰帶中的第幾格？ (預設: 5)
ExtVar[6] = 5
//藥水箱您放在腰帶中的第幾格？ (預設: 1)
ExtVar[7] = 1
//藥水箱裡您放了的是什麼東西？ (預設: 3) 紅水(1) 藍水(2) 食物(3)
ExtVar[8] = 3
//腰帶起始點
ExtVar[20] = 37683641
//初期顏色記錄 - 死亡判斷點
ExtVar[30] = Color[ExtVar[0]]
//初期顏色記錄 - 生命判斷點
ExtVar[31] = Color[ExtVar[1]]
//初期顏色記錄 - 魔力判斷點
ExtVar[32] = Color[ExtVar[2]]
//初期顏色記錄 - 體力判斷點
ExtVar[33] = Color[ExtVar[3]]
//初期顏色記錄 - 紅水顏色點
ExtVar[34] = Color[ExtVar[20] + (33 * ExtVar[4])]
//初期顏色記錄 - 藍水顏色點
ExtVar[35] = Color[ExtVar[20] + (33 * ExtVar[5])]
//初期顏色記錄 - 食物顏色點
ExtVar[36] = Color[ExtVar[20] + (33 * ExtVar[6])]
//初期顏色記錄 - 藥箱顏色點
ExtVar[37] = Color[ExtVar[20] + (33 * ExtVar[7])]
//初期顏色記錄 - 藥箱物品顏色點
ExtVar[38] = Color[30802648]
//初期顏色記錄 - 裝備工具顏色點
ExtVar[39] = Color[ExtVar[9]]
//暫存顏色記錄 - 死亡判斷點 *** 未有真正用途
ExtVar[40] = Color[ExtVar[0]]
//暫存顏色記錄 - 生命判斷點
ExtVar[41] = Color[ExtVar[1]]
//暫存顏色記錄 - 魔力判斷點 *** 未有真正用途
ExtVar[42] = Color[ExtVar[2]]
//呼叫視窗的重試次數(重試多少次數)
ExtVar[47] = 50
//呼叫視窗的失敗次數(自動累績次數)
ExtVar[48] = 0
//連點狀態記錄
ExtVar[49] = 0
KeyString "\n\n"
If Pos1 <= 0
KeyString "Please Set Pos1!"
Stop
End If
Call RKAIDRShift
//死亡狀態判斷
On Color[ExtVar[0]] != ExtVar[30] Jump RKDRSkillDead
RKDRSkill:
KeyDown(16)
Call RKAIDR
Call RKAIDRSetBattle
Call RKAIDRCheckCure
Call RKAIDRItemClose
Call RKDRSkillWork
Jump RKDRSkill
//純戰鬥技能訓練 20020923
RKDRSkillWork:
If Pos1 >= 1
KeyDown(16)
MouseMove Pos1
ExtVar[49] = 1
KeyPress(F1)
While Color[ExtVar[3]] = ExtVar[33] && ExtVar[49] = 1
If Color[ExtVar[1]] != ExtVar[31] && ((Color[ExtVar[20] + (33 * ExtVar[7])] > 0 && ExtVar[8]=1) || (Color[ExtVar[20] + (33 * ExtVar[4])] > 0))
ExtVar[49] = 0
ElseIf (Color[11075656]=0 && Color[11075867]=0) || (Color[6553896]=0 && Color[11141592]=0) || (Color[2687467]=0 && Color[12255837]=0)
ExtVar[49] = 0
ElseIf Color[9175185]=0 && Color[29688458]=0
ExtVar[49] = 0
ElseIf (Color[8913037]=0 && Color[29033106]=0) || (Color[5963784]=0 && Color[28181270]=0)
ExtVar[49] = 0
Else
LClick Pos1
End If
Wend
ExtVar[49] = 0
KeyPress(F2)
KeyDown(16)
End If
Return
//聖皇公用程序: 戰技用暫停動作判斷 20020923 (參數佔用0,30,49)
//程序解說: 如果死亡判斷點 ExtVar[0] 與初期的 ExtVar[30] 顏色有異，就停上所有動作及按F2停止連點並大叫救命。
//必要參數: ExtVar[0] = 死亡判斷位置
//必要參數: ExtVar[30] = Color[ExtVar[0]]
//補充說明: KeyPress(F2) 是按 F2 把連點停止直到被救，若您非 F2 停止連點請自行修改停止熱鍵。
//使用方法: On Color[ExtVar[0]] != ExtVar[30] Jump RKDRSkillDead
RKDRSkillDead:
ExtVar[49] = 0
KeyPress(F2)
KeyPress(F2)
KeyPress(27)
KeyPress(27)
KeyPress(123)
KeyPress(123)
Var4 = Var4 + 1
KeyString "\n\n"
Delay(500)
While Color[ExtVar[0]] != ExtVar[30]
KeyString "@@ Please Help Me!"
KeyString "\n"
Delay(3000)
Wend
KeyString "^^ Thanks For Help!"
KeyString "\n"
KeyDown(16)
Delay(500)
Call RKAIDRSetBattle
Delay(500)
Resume
//聖皇公用程序: 等待 SHIFT 鍵 20020924
//程序解說: 等待按下鍵盤的 SHIFT 鍵才繼續進行程式。
RKAIDRShift:
KeyString "\n\n"
KeyString "Hold the [SHIFT] key to continue... "
While Waitkey != 16
Wend
KeyString "Okay!\n\n"
Return
//聖皇公用程序: 襲擊照相 20020911 (參數佔用1, 31, 41)
//程序解說: 如果生命判斷點與初期的 ExtVar[31] 及上一次撿查時的 ExtVar[41] 生命力有異就照相大叫救命或說聲謝謝幫忙。
//必要參數: ExtVar[1] = 生命判斷位置
//必要參數: ExtVar[31] = Color[ExtVar[1]]
//使用方法: Call RKAIDRCheckPK
RKAIDRCheckPK:
If Color[ExtVar[1]] != ExtVar[31] && Color[ExtVar[1]] != ExtVar[41]
KeyPress(27)
KeyPress(27)
KeyPress(123)
KeyPress(123)
KeyString "\n\n"
KeyString "@@ PK? Please Help Me!"
KeyString "\n"
ElseIf Color[ExtVar[1]] = ExtVar[31] && Color[ExtVar[1]] != ExtVar[41]
KeyString "\n\n"
KeyString "^^ Thanks For Help!"
KeyString "\n"
End If
ExtVar[41] = Color[ExtVar[1]]
Return
//聖皇公用程序: 檢查裝備 20020911 (參數佔用9, 39, 43-44)
//程序解說: 打開物品欄撿查 ExtVar[9] 位置的顏色是否與初期設定的 ExtVar[39] 一樣，如果不同就打開物品欄尋找符合的物品並裝備。
//必要參數: ExtVar[9] = 工具判斷位置
//必要參數: ExtVar[39] = Color[ExtVar[9]]
//使用方法: Call RKAIDRCheckTool
RKAIDRCheckTool:
ExtVar[44] = 1
If ExtVar[9] >= 1 && ExtVar[39] >= 1
Call RKAIDRItemOpen
If Color[ExtVar[9]] != ExtVar[39]
KeyString "\n\n"
KeyString "@@ I Need Tools! (Broken)"
KeyString "\n"
If ExtVar[39] != 0
ExtVar[43] = ExtVar[39]
Call RKAIDRItemUse
End If
End If
Call RKAIDRItemClose
End If
Return
//聖皇公用程序: 檢查狀況 20020922 (參數佔用1-8, 20, 31-37, 43-45)
//必要參數: ExtVar[1至8] = 狀態判斷點
//必要參數: ExtVar[20] = 腰帶第一格座標 - 33
//使用方法: Call RKAIDRCheckCure
RKAIDRCheckCure:
ExtVar[44] = 0
If ((Color[ExtVar[1]] != ExtVar[31] && ExtVar[8] = 1) || (Color[ExtVar[2]] != ExtVar[32] && ExtVar[8] = 2) || (Color[ExtVar[3]] != ExtVar[33] && ExtVar[8] = 3)) && ExtVar[37] >= 1 && ExtVar[7] >= 1
ExtVar[45] = ExtVar[20] + (33 * ExtVar[7])
//使用物品
MouseMove ExtVar[45]
Repeat 2
Right Down ExtVar[45]
Delay(100)
Right Up ExtVar[45]
Delay(50)
End Repeat
KeyDown(16)
End If
If Color[ExtVar[1]] >= 1 && ExtVar[31] >= 1 && Color[ExtVar[1]] != ExtVar[31]
KeyString "\n\n"
KeyString "@@ I Need Heal~ Thanks! (HP)"
KeyString "\n"
If ExtVar[34] > 0
ExtVar[43] = ExtVar[34]
Call RKAIDRItemUse
End If
ElseIf Color[ExtVar[2]] >= 1 && ExtVar[32] >= 1 && Color[ExtVar[2]] != ExtVar[32]
KeyString "\n\n"
KeyString "@@ I Need Mana~ Thanks! (MP)"
KeyString "\n"
If ExtVar[35] > 0
ExtVar[43] = ExtVar[35]
Call RKAIDRItemUse
End If
ElseIf Color[ExtVar[3]] >= 1 && ExtVar[33] >= 1 && Color[ExtVar[3]] != ExtVar[33]
KeyString "\n\n"
KeyString "@@ I Need Cure~ Thanks! (Hungry)"
KeyString "\n"
If ExtVar[36] > 0
ExtVar[43] = ExtVar[36]
Call RKAIDRItemUse
End If
End If
Return
//聖皇公用程序: 物品視窗開啟 20020923 (參數佔用47-48)
//使用方法: Call RKAIDRItemOpen
RKAIDRItemOpen:
ExtVar[48] = 0
While (Color[2687467] != 0 || Color[2687758] != 0 || Color[12321259] != 0 || Color[12255837] != 0) && ExtVar[48] < ExtVar[47]
MouseMove 37683455
Right Down 37683455
Delay(100)
Right Up 37683455
KeyDown(16)
Delay(64)
LClick 37683455
Delay(500)
RClick 37683455
ExtVar[48] = ExtVar[48] + 1
Wend
Return
//聖皇公用程序: 物品視窗關閉 20020923 (參數佔用47-48)
//使用方法: Call RKAIDRItemClose
RKAIDRItemClose:
ExtVar[48] = 0
While (Color[2687467] = 0 && Color[2687758] = 0 && Color[12321259] = 0 && Color[12255837] = 0) && ExtVar[48] < ExtVar[47]
MouseMove 21693169
Right Down 21693169
Delay(100)
Right Up 21693169
KeyDown(16)
Delay(64)
LClick 21693169
Delay(500)
RClick 21693169
ExtVar[48] = ExtVar[48] + 1
Wend
Return
//聖皇公用程序: 物品裝備使用 20020923 (參數佔用43-46)
//必要參數: ExtVar[43] = 要尋找物品的顏色碼
//必要參數: ExtVar[44] = 0 使用 / 1 裝備
//必要參數: ExtVar[39] = Color[ExtVar[9]]
//使用方法: Call RKAIDRItemUse
RKAIDRItemUse:
If ExtVar[43] >= 1
Call RKAIDRItemOpen
If Color[2687467] = 0 && Color[2687758] = 0 && Color[12321259] = 0 && Color[12255837] = 0
//返回第一頁物品
KeyDown(16)
Delay(64)
LClick 21693039
LClick 21693039
ExtVar[45] = 0
ExtVar[46] = 1
If ExtVar[43] != 0
While ExtVar[46] <= 3 && ExtVar[45] <= 0
KeyDown(16)
Delay(500)
//尋找物品
ExtVar[45] = GetColorPos[ExtVar[43],13173234,19923720]
If ExtVar[45] >= 1
If ExtVar[44] = 1
//裝備物品
LClick ExtVar[45]
LClick ExtVar[45]
Else
//使用物品
MouseMove ExtVar[45]
Repeat 2
Right Down ExtVar[45]
Delay(100)
Right Up ExtVar[45]
Delay(50)
End Repeat
KeyDown(16)
End If
Else
//下一頁物品
LClick 21693074
ExtVar[46] = ExtVar[46] + 1
End If
Wend
KeyDown(16)
End If
Call RKAIDRItemClose
Else
MouseMove 37683455
Right Down 37683455
Delay(100)
Right Up 37683455
KeyDown(16)
Call RKAIDR
End If
End If
Return
//聖皇公用程序: 設換和平狀態 20020911
//使用方法: Call RKAIDRSetPeace
RKAIDRSetPeace:
While Color[36700855] = 0 || Color[37159613] = 0
LClick 36766401
Delay(500)
Wend
Return
//聖皇公用程序: 設換戰鬥狀態 20020911
//使用方法: Call RKAIDRSetBattle
RKAIDRSetBattle:
While Color[36700855] != 0 || Color[37159613] != 0
LClick 36766401
Delay(500)
Wend
Return
//聖皇公用程序: 視窗防禦判斷 20020911
//使用方法: Call RKAIDR
RKAIDR:
//物品交換取消 20020911
If Color[11075656]=0 && Color[11075867]=0
LClick 15073457
Delay(1500)
If Color[6553896]=0 && Color[11141592]=0
LClick 7340533
Delay(1500)
If Color[2687467]=0 && Color[12255837]=0
LClick 21693169
Delay(1500)
End If
End If
//交易失敗確定 20020911
ElseIf Color[6553896]=0 && Color[11141592]=0
LClick 7340533
Delay(1500)
If Color[2687467]=0 && Color[12255837]=0
LClick 21693169
Delay(1500)
End If
//邊境參戰取消 20020606
ElseIf Color[9175185]=0 && Color[29688458]=0
LClick 28181001
//國戰開始確定 20020608
ElseIf Color[8913037]=0 && Color[29033106]=0
LClick 27197991
//國戰完成確定 20020622
ElseIf Color[8912904]=0 && Color[28181270]=0
LClick 26214800
End If
Return
Stop
[
Next Thread |
Previous Thread |
Next Message |
Previous Message
]
| |
Feedback: 