當前位置:首頁 » 網頁前端 » 傲劍抓寵物腳本
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

傲劍抓寵物腳本

發布時間: 2023-07-07 09:55:37

① 在淘寶訂做按鍵精靈腳本靠譜嗎我想搞個游戲腳本

也不是都有那麼多的資本去刷銷量的。很多也是靠口碑。我原來玩過很多網游和頁游,天龍、戰國、傲劍、修真、修仙、三界等等十幾種,游戲里也有很多需要腳本的和使用腳本的。他們也通過按鍵的論壇和淘寶等很多途徑宣傳。但是,真正收入多少確實是海面下的冰山,無從知曉。

② 最近想換一個輔助腳本玩傲劍蒼穹,有推薦的嗎

我會推薦我玩的鳥人助手,這款輔助腳本真的特別適合喜歡玩游戲的小夥伴,我現在每天都有連續簽到,可以獲得領取游戲禮包和游戲,爽呀,自由調節倍速也是很給力∞

③ 按鍵精靈製作網頁游戲《傲劍》腳本的問題!

UserVar sfkj=DropList{"科技1":"1"|"科技2":"2"|"科技3":"3"|"科技 Sub 武將訓練1
Call Plugin.Bkgnd.LeftClick(Hwnd, 440, 390)
Delay 600
Call Plugin.Bkgnd.LeftClick(Hwnd, 565, 335)
Delay 3000
If xl1 = 1 then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 220)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl1 = 2 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 240)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl1 = 3 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 260)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl1 = 4 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 280)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl1 = 5 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 300)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Else
End If
Delay 800
End Sub

Sub 武將訓練2
Delay 1000
If xl2 = 1 then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 220)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl2 = 2 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 240)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl2 = 3 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 260)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl2 = 4 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 280)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl2 = 5 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 300)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Else
End If
Delay 800
End Sub

Sub 武將訓練3
Delay 1000
If xl3 = 1 then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 220)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl3 = 2 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 240)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl3 = 3 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 260)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl3 = 4 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 280)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Delay 500
ElseIf xl3 = 5 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 300)
Delay 1200
Call Plugin.Bkgnd.LeftClick(Hwnd, 730, 415)
Else
End If
Delay 800
End Sub

//武將突飛
Sub 武將突飛
Delay 1000
//突飛武將
If tufei = 1
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 220)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 700, 470)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 810, 110)
Delay 500
ElseIf tufei = 2
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 240)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 700, 470)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 810, 110)
Delay 500
ElseIf tufei = 3
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 260)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 700, 470)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 810, 110)
Delay 500
ElseIf tufei = 4
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 280)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 700, 470)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 810, 110)
Delay 500
ElseIf tufei = 5
Call Plugin.Bkgnd.LeftClick(Hwnd, 320, 300)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 700, 470)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 500
Call Plugin.Bkgnd.LeftClick(Hwnd, 810, 110)
Delay 500
ElseIf tufei = 0
Call Plugin.Bkgnd.LeftClick(Hwnd, 810, 110)
Delay 1000
Else
End If
End Sub

//建設腳本
Sub 建設判斷
GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 56, 200)
GetColor1 = Plugin.Bkgnd.GetPixelColor(Hwnd, 56, 220)
GetColor2 = Plugin.Bkgnd.GetPixelColor(Hwnd, 56, 240)
GetColor3 = Plugin.Bkgnd.GetPixelColor(Hwnd, 56, 260)
GetColor4 = Plugin.Bkgnd.GetPixelColor(Hwnd, 56, 280)

If GetColor = "31CF63" or GetColor1 = "31CF63" or GetColor2 = "31CF63" or GetColor3 = "31CF63" or GetColor4 = "31CF63" or GetColor = "33CC66" or GetColor1 = "33CC66" or GetColor2 = "33CC66" or GetColor3 = "33CC66" or GetColor4 = "33CC66"then
Delay 800
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Else
Goto wait
End If
End sub

//建設子程序

//建設民居
Sub 民居
Call 建設判斷
Call 民居1
Delay 800
Call 建設判斷
Call 民居2
Delay 800
Call 建設判斷
Call 民居3
Delay 800
Call 建設判斷
Call 民居4
Delay 800
Call 建設判斷
Call 民居5
Delay 800
Call 建設判斷
Call 民居6
Delay 800
Call 建設判斷
Call 民居7
Delay 800
Call 建設判斷
Call 民居8
Delay 800
End Sub

Sub 民居1
Call Plugin.Bkgnd.LeftClick(Hwnd, 500, 165)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居2
Call Plugin.Bkgnd.LeftClick(Hwnd, 580, 220)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居3
Call Plugin.Bkgnd.LeftClick(Hwnd, 650, 260)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居4
Call Plugin.Bkgnd.LeftClick(Hwnd, 710, 305)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居5
Call Plugin.Bkgnd.LeftClick(Hwnd, 645, 345)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居6
Call Plugin.Bkgnd.LeftClick(Hwnd, 565, 85)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居7
Call Plugin.Bkgnd.LeftClick(Hwnd, 640, 130)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 民居8
Call Plugin.Bkgnd.LeftClick(Hwnd, 710, 215)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 銀庫
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 430, 205)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 糧倉
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 365, 250)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 市場
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 300, 300)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 商店
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 370, 335)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 校場
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 440, 390)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 兵營
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 520, 425)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 軍機處
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 580, 380)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 賬房
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 360, 125)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 鑄幣廠
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 290, 210)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 驛站
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 305, 395)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

Sub 主城
Call 建設判斷
Call Plugin.Bkgnd.LeftClick(Hwnd, 500, 300)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 445, 350)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub

// 徵兵
Sub 徵兵
Call Plugin.Bkgnd.LeftClick(Hwnd, 520, 425)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 655, 330)
Delay 800
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 800
Call Plugin.Bkgnd.LeftClick(Hwnd, 680, 196)
End Sub 多謝 採納