自動練功..(近戰)= 測試版

設定值...........



載點:http://www.xun6.com/file/ae99ffe47/%E8%9F%91%E8%9E%82%E6%B8%AC%E8%A9%A6%E7%89%88.rar.html

[重點]

測試版不是很穩(有可能會卡點所以請在位子顧好自己得人物)
[啟動] :F10
[停止] :F12

[內容]
1.自動打怪
2.打完一隻怪...坐下回血到滿
3.撿物
..............建議用腳本(小精靈)有點不穩
[腳本]
Rem 尋打怪
IfColor 515,30,2f256d,0
    Delay 10
    KeyPress 49,1
    Goto 尋打怪
Else
    Delay 750
    KeyPress 51,1
    Delay 200
    Goto 補血
    Delay 10
    Goto 尋打怪
EndIf
Rem 補血
IfColor 319,805,1f1455,1
    Delay 10
    KeyPress 189,1
    Delay 10
    Goto 補滿血
Else
    Goto 找怪
EndIf
Rem 補滿血
IfColor 319,805,1f1455,0
    Goto 找怪
Else
    Goto 補滿血
EndIf
Rem 找怪
Delay 100
KeyPress 9,1
Delay 100
Goto 尋打怪

感謝大大分享^^ 可以使用 但我想問一下大大 是否有辦法改成 打完1隻怪後 就座下回血 或是 hp少於幾%就喝紅水呢?這樣就不用因為站著回血 而浪費時間~但真的很感謝你 可以邊看電視邊掛著了

謝謝大大分享喔
希望能用~
YCT58B

#[HOTKEY]HOME
function main

SetInputMode(3) //驅動模式,很多遊戲會阻擋SP的部份功能,可以套用此函數

while true    //循環開始
  
  State() //子函數狀態
  
wend        //返回while開始循環

end function

function State//休息攻擊+喝水

//取窗口原點坐標

GetActiveWindowXY(WinX0, WinY0)



print("執行攻擊")

//血量休息的顏色座標

if not CheckColor(WinX0+172, WinY0+645, Color(219, 18, 53), 10) then
  
  Wait(500)
  
  KeyDown("x")
  
  Wait(500)
  
  KeyUp("x")
  
  do         //循環
   
   //等待2000毫秒
   
   Wait(2000)
   
   //血條頂點的顏色座標
   
  loop until CheckColor(WinX0+245, WinY0+643, Color(157, 61, 62), 10)
  
  
  
end if



//取窗口原點坐標

GetActiveWindowXY(WinX0, WinY0)



//魔力休息的顏色座標

if not CheckColor(WinX0+138, WinY0+674, Color(45, 61, 149), 10) then
  
  Wait(500)
  
  KeyDown("x")
  
  Wait(500)
  
  KeyUp("x")
  
  do
   
   Wait(2000)
   
  loop UNTIL CheckColor(WinX0+248, WinY0+675, Color(41, 51, 127), 10)
  
end if//魔力休息的頂點座標



//怪物血條的頂點座標(防止搶怪)

if not CheckColor(WinX0+585, WinY0+31, Color(116, 31, 51), 10) then
  
  
  
  //執行段內語句，當運行至LOOP時，如果表達式為false則跳回DO進行下一次執行，
  
  //直至LOOP後的表達式為true(真)時運行完畢。
  
  do               
   
   KeyDown("Tab")
   
   Wait(100)
   
   KeyUp("Tab")
   
   Wait(1000)
   
  loop until CheckColor(WinX0+585, WinY0+31, Color(116, 31, 51), 10)//怪物血條的頂點座標
  
  
  
else //找到的話…
  
  do//執行攻擊
  
  for ForCount = 1 to 1
   
   KeyDown("1")
   
   Wait(300)
   
   KeyUp("1")
   
   Wait(300)
   
   KeyDown("2")
   
   Wait(300)
   
   KeyUp("2")
   
   Wait(300)
   
   KeyDown("3")
   
   Wait(300)
   
   KeyUp("3")
   
  next
  
  
  
  //取窗口原點坐標
  
  GetActiveWindowXY(WinX0, WinY0)
  
  //補血技能,沒有就放紅水
  
  //想喝水的座標
  
  if not CheckColor(WinX0+136, WinY0+645, Color(124, 11, 30), 10) then
   
   KeyDown("6")
   
   Wait(300)
   
   KeyUp("6")
   
  end if
  
  DO WHILE  CheckColor(WinX0+585, WinY0+31, Color(116, 31, 51), 10)//怪物血量頂點的座標
   
   print("怪物無損血,按tab換怪")
   
   KeyPress("Tab")
   
     loop
  
  
  
loop while CheckColor(WinX0+448, WinY0+32, Color(111, 26, 45), 10)//怪物血量底線的座標

//等待500毫秒

Print("死亡")

KeyDown("1")//補打一下免的誤判

Wait(300)

KeyUp("1")

Wait(500)

KeyPress("ESC")

Wait(500)

KeyPress("F")

Wait(1000)

end if
end function
本文章轉自外掛聯合國http://www.wgun.net
我覺得這個比較好~~~   你這個有一點怪怪的   推這個吧

謝大大分享

來試用看看能不能用YCT35B

終於有人在努力幫玩家開發ㄌ  感謝大大

感謝有人在努力幫玩家開發ㄌ  我自己也是在測試當中

終於有人在努力幫玩家開發ㄌ  感謝大大

還沒用先感恩!!!!!感謝大大無私分享

腳本要怎麼用阿@@"
我還是一頭霧水