分享
上一篇主題向下下一篇主題
文章數 : 2
注冊日期 : 2017-10-17
檢視會員個人資料

牧師用 傻瓜掛機範例!

于 周三 11月 22, 2017 6:07 pm
這是我編寫的傻瓜掛機
紅色字體是我自己家的說明記得刪除
每個Hwnd後面的數字都代表一個快捷設定可以自己需要修改

****以下正題****

//----指定視窗----//
Dim Hwnd
Hwnd = 11733712<----每次關掉遊戲重開都要改
//----主程式----//
Delay 2000
//----這條線以下是cast 照順序是 純刃 力量 祝福,能修改的地方只有Hwnd後面的數字數字含意請找福大按精程式下載的頁面有說明----//
Call Plugin.Bkgnd.KeyPress(Hwnd,100)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 4000
Call Plugin.Bkgnd.KeyPress(Hwnd,115)
Delay 4000
Call Plugin.Bkgnd.KeyPress(Hwnd,117)
Delay 3000
//----這邊是用法術指定目標,60000這個數字是打怪所需要的時間可修改----//
Call Plugin.Bkgnd.KeyPress(Hwnd,114)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd,114)
Delay 60000
//----這邊以下是撿東西的設定可自行增加----//
Call Plugin.Bkgnd.KeyPress(Hwnd,105)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,101)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,99)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,97)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
//----以下為淨化,這樣可以把屍體處理掉免得站位置,同樣可自行增加----//
Call Plugin.Bkgnd.KeyPress(Hwnd,103)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,102)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,98)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,96)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
//----以下是開啟商店----//
Call Plugin.Bkgnd.KeyPress(Hwnd,104)
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd,13)
Delay 500
//----以下是把你撿到的東西賣掉----//
Call Plugin.Bkgnd.KeyPress(Hwnd,119)
Delay 300
Call Plugin.Bkgnd.KeyPress(Hwnd,119)
Delay 300
Call Plugin.Bkgnd.KeyPress(Hwnd,119)
Delay 300
Call Plugin.Bkgnd.KeyPress(Hwnd,119)
Delay 300
Call Plugin.Bkgnd.KeyPress(Hwnd,119)
Delay 300
Admin
文章數 : 37
注冊日期 : 2017-09-28
檢視會員個人資料http://gkkhk.666forum.com

回復: 牧師用 傻瓜掛機範例!

于 周四 11月 23, 2017 1:01 am
謝謝新宇大臣來分享,先給個讚!
文章數 : 1
注冊日期 : 2017-11-25
檢視會員個人資料

回復: 牧師用 傻瓜掛機範例!

于 周六 11月 25, 2017 10:40 am
我也分享一下我自己的吧

Hwnd =Plugin.Window.MousePoint()

For 100000000000
Call Plugin.Bkgnd.SendString(hwnd, "cast bless on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast strong on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast stone_skin on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast enlarge on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast holy_power on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast holy_spirit on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000

Call Plugin.Bkgnd.SendString(hwnd, "wield gkkdart")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "kill 3342442")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3342441")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3407978")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3407977")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3473514")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3473513")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3801193")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3866730")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3866729")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3932266")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3932265")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3997802")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "wield golden spade")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 330000

Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 30000

Call Plugin.Bkgnd.SendString(hwnd, "cast bless on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast strong on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast stone_skin on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast enlarge on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast holy_power on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000
Call Plugin.Bkgnd.SendString(hwnd, "cast holy_spirit on")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 4000

Call Plugin.Bkgnd.SendString(hwnd, "wield gkkdart")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "kill 3997784")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3932249")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3932248")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3866713")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3866712")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3801177")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3473497")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3473496")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3407961")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3407960")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3342425")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "kill 3342424")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 1000
Call Plugin.Bkgnd.SendString(hwnd, "wield golden spade")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 330000

Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.SendString(hwnd, "purify")
Delay 500
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 30000

Next
文章數 : 2
注冊日期 : 2017-11-26
檢視會員個人資料

回復: 牧師用 傻瓜掛機範例!

于 周日 11月 26, 2017 7:36 pm
請問這個要怎麼使用啊?
上一篇主題回頂端下一篇主題
這個論壇的權限:
無法 在這個版面回復文章