支援三視窗 獵+補 多組合, Seraph 脚本
宗旨: 為達到掛到最高點, 最大支援到3個視窗.
功能:
1.支援1-3人掛機, 其組合分別為(獵人為弓獵)
一獵, 二獵 , 一獵一補 , 二獵一補
2. 獵人掛毒蜂, 自動補血,可選擇是否打怪.
3. 補師定時++ , 全體補血.
4. 寵物定時收放(避免寵物發呆)
基本需求:
1.若要掛三個視窗, 建議電腦要Core 2 Duo 以上,
並有獨立顯卡.
2. 視窗需調為 1024*768
3. 子視窗(血條, 怪物血條,組隊)為原廠設定位置.
如有問題, 請自行調整.
運行前準備:
1. 獵人快捷鍵設定
1 毒蜂召喚
2 選怪
3 魔法箭
4 普攻
5 野性治癒
6 小紅水
7 大紅水
8 寵物 (目前設定只有獵人1有效)
2. 補師快捷鍵設定
1 生命之火
2 全體回生
3 神聖意識
4 保護結界
5 增加攻擊力
6 藍水
3. 需依照掛機實際需求, 修改程式的第1-3行的數值.
(改完後不要忘了再編譯一次)
4. 需將桌面上不必要的視窗縮為最小.
5. 獵人的 "怪物血條欄" 必須是空白的或指向近怪.
否則會造成不打怪.
6. 在執行前 需依照 補師-->獵人2 -->獵人1 的次序,
依序 Ative 視窗, 然後再點桌面任一點, 使無
Ative 視窗, 才可按執行鍵來運行.
已知問題:
選怪有時會選到遠處的怪, 而造成人物跑到遠處.
此為遊戲本身的問題.
以下為程式:
dim fight_ON_OFF=1 //0--> 獵人不打怪, 1--> 打怪
dim Win_conunt=3 //依掛機人數修改
dim people_Compent=4 //依以下組合修改
//1:one hunter 2: two hunter
//3: one hunter and high priessess
//4: two hunter and high priessess
dim y,y1
dim WinX0, WinY0
dim Win_ID[3]
//---------------------------------------------------------------
function main
if people_Compent=3 or people_Compent=4 then
SetTimer("protect", 1150000, true)//每20分鐘施放 ++ 一次
end if
SetTimer("pick", 1300000, true)//每20分鐘收放寵物
SetTimer("pick1", 1320000, true)
for i=1 to Win_conunt //讀取視窗ID
KeyDown("ALT")
Wait(100)
KeyPress("TAB")
Wait(100)
if i=3 then
KeyPress("TAB")
Wait(100)
end if
KeyUp("ALT")
Wait(100)
GetActiveWindowID(Win_ID[i])
print (Win_ID[i])
Next
while true
ActiveWindow(Win_ID[1]) //視窗 1 動作 獵人1
//InputText("獵人一")
go()
if fight_ON_OFF=1 then
fight()
end if
if people_Compent=2 or people_Compent=4 then
ActiveWindow(Win_ID[2]) //視窗 2 動作 獵人2
//InputText("獵人二")
go()
if fight_ON_OFF=1 then
fight()
end if
end if
if people_Compent=3 then
ActiveWindow(Win_ID[2])//補師 動作
//InputText("補師")
tt()
elseif people_Compent=4 then
ActiveWindow(Win_ID[3])//補師 動作
//InputText("補師")
tt()
Wait(500)
end if
wend
end function
//---------------------------------------------------------------
function go() //獵人
Wait(100)
KeyPress("1")//招喚蜜蜂
GetActiveWindowXY(WinX0, WinY0)
//喝水
if CheckColor(WinX0+76, WinY0+30, Color(4, 17, 35), 10) then
Wait(200)
KeyPress("5")//技能"野性治癒"
Wait(500)
KeyPress("7")//喝大紅
elseif CheckColor(WinX0+164, WinY0+29, Color(4, 17, 35), 10) then
KeyPress("6")//喝小紅
end if
Wait(300)
end function
//---------------------------------------------------------------
function tt() //補師
KeyPress("1")//放"生命之火
Wait(100)
y1=247
GetActiveWindowXY(WinX0, WinY0)
if CheckColor(WinX0+86, WinY0+44, Color(4, 17, 35), 10) then
Wait(100)
KeyPress("2")//補藍水
Wait(300)
end if
for ForCount = 1 to Win_conunt
if CheckColor(WinX0+197, WinY0+y1, Color(9, 7, 4), 10) then
// MouseLeftClick(WinX0+74, WinY0+y)
Wait(200)
KeyPress("2")//全體回生
Wait(200)
end if
y1=y1+50
//Print(y1)
Wait(200)
next
//Print("out")
end function
//---------------------------------------------------------------
function protect()//加加
dim y
y=243
if people_Compent=3 then
ActiveWindow(Win_ID[2])//補師 動作
elseif people_Compent=4 then
ActiveWindow(Win_ID[3])//補師 動作
end if
Wait(300)
KeyPress("6")//先補藍
Wait(1000)
KeyPress("3")//神聖意識(加大血條)
Wait(1000)
GetActiveWindowXY(WinX0, WinY0)
for ForCount = 1 to Win_conunt
MouseLeftClick(WinX0+74, WinY0+y)
Wait(300)
KeyPress("4")//保護結界(加防禦)
Wait(2000)
KeyPress("5")//加攻擊
Wait(3000)
y=y+50
next
end function
//---------------------------------------------------------------
function pick()//收回寵物
ActiveWindow(Win_ID[1])
Wait(100)
KeyPress("8")
Wait(100)
end function
//---------------------------------------------------------------
function pick1()//放出寵物
ActiveWindow(Win_ID[1])
Wait(100)
KeyPress("8")
Wait(100)
end function
//---------------------------------------------------------------
function fight()
GetActiveWindowXY(WinX0, WinY0)
if not CheckColor(WinX0+240, WinY0+76, Color(214, 31, 22), 10) then
Wait(100)
KeyPress("2")//基本技能"選怪"
Wait(300)
KeyPress("3")//技能"魔法箭"
Wait(200)
KeyPress("4")//基本技能"普攻"
Wait(200)
end if
end function
//--------------------------------------------------------------- |
收藏
分享
讚
幹
分享
分享
