(seraph)商人腳本,尋敵打怪吃藥放人(重新寫過,測試用不用錢,有問題可議)

因為重新寫過腳本所以再發一個帖,

要改之前的帖怕會太亂,這次是為了解決選怪時間過長,

以及吃藥部份進行重新編輯,

自動吃藥部分為扣血約50%的時候會自補,

老樣子希望大家使用後有問題的可以在這篇回覆,

而有高手則可以提供意見給小妹(大誤)修改一下^^


1 尋敵
2 一般攻擊
3 技能攻擊(技能施放時間請到紅字區修改,預設為3000毫秒=3秒)
4 沒有 給玩家自己修改
5 拾取
6 吃的,限定補血
7 放傭兵 , 蜜蜂 or 補助技(不用點自己的那種,時間設定可參照上一篇)
8 沒有 給玩家自己修改

注意事項請看前篇

============================================



# 在此定義全局變量
function main
//取窗口原點坐標
GetActiveWindowXY(WinX0, WinY0)
while true
//如果窗口坐標(232, 50)的顏色等於(255, 193, 114) 那麼
if CheckColor(WinX0+232, WinY0+50, Color(255, 193, 114), 10) then
  FuncTimer01()
  Wait(2000)
  hp()
  KeyPress("2")
  Wait(3000)
  KeyPress("3")
  
  
else //否則
  KeyPress("5")
  KeyPress("1")
end if
  wend
end function

# 在此添加子函數
function FuncTimer01
//定時器代碼，每Interval秒執行一次
dim global Timer01 = -1

if Timer01 < 0  or GetTime() - Timer01 >= 200 * 1000 then
  Timer01 = GetTime()
  //以下為執行代碼
  //以下為嚮導添加的代碼
  KeyPress("7")
end if
end function
function hp
//取窗口原點坐標
GetActiveWindowXY(WinX0, WinY0)

//如果窗口坐標(114, 28)的顏色等於(0, 3, 7) 那麼
if CheckColor(WinX0+114, WinY0+28, Color(0, 3, 7), 10) then
  KeyPress("6")
  
else //否則
  KeyPress("2")
end if



end function

使用看看~~~
感謝提供~~~~~~~~~~~~

感謝呢妳的分享
我來試試看~~~~

這樣也就可以方便多了
感謝大大無私的分享!!你辛苦了

感覺有點眼熟... 繼續摸熟ˇˇ!!(雖然還沒開始用

A_ A 有點怪怪的‵

好像不能用餒 QQ

還是謝謝分享 :)

YCT64BYCT55BYCT62BYCT60Bwefwegwegw

謝謝大大  小弟感激不盡  但是不能喝水@@

為什麼掛一下之後會點到遠處的怪啊 會亂跑