通過調用助贏軟件上的計劃進行自動博彩,自動追高倍。不過由于助贏軟件的計劃是隨機的,有運氣成分在內,所以不建議使用,該代碼僅供參考。

助贏軟件.png


//本腳本有瀏瀏覽器期號是否更新的驗算
打法 = 5 //2就是打2期,3就是打三期
基數 = 1 //放大的基數
窗口名稱 = "萬法歸宗"
對話窗口 = "QQ"				// QQ / 微信 
購彩金額 = "角"// 元 / 角
//告知用戶設置好的數據
TracePrint "本次軟件輸出對話窗口方式為:" & 對話窗口 & ";名稱為:" & 窗口名稱
TracePrint "本次軟件輸打法為追[" & 打法 & "]期,需要準備的本金為[" & 3870 * 基數 & "]元"
//************************************************************************************************************************************************************推薦軟件
'推薦軟件操作
'當前推薦軟件為:助贏軟件(注:保守打法:僅適用于2.3.4期穩定打,虧損有限,盈利較慢)
'[推薦軟件操作] : 1.激活;2.推薦號轉化為元素;3.獲取當前追號期數;4.取消置頂(通用)
Function 推薦軟件操作
    Call Plugin.Window.Top(推薦軟件, 0)
    Delay 300
    '推薦號轉化為元素
    Call 激活推薦軟件
    Delay 300
    Call 復制推薦號碼
    Delay 300
    Call 推薦值轉化
    Delay 300
    Call 五星元素匹配
    Delay 300
    '獲取當前追號期數
    Call 獲取當前追號期數
    Delay 300
    Call 追號期數轉化(當前追號期數)
    Delay 300
    Call Plugin.Window.Top(推薦軟件, 1)
    Delay 300
End Function
'[激活推薦軟件] : 激活并還原推薦軟件,獲取窗口大?。ㄍㄓ茫?
Function 激活推薦軟件
    '1.激活并還原窗口
    Call Plugin.Window.Active(推薦軟件)
    Delay 300
    Call Plugin.Window.Restore(推薦軟件)
    Delay 300
    '2.下面這句是得到窗口句柄的客戶區大小   
    sRect = Plugin.Window.GetClientRect(推薦軟件)
    Delay 300
    dim MyArray   
    MyArray = Split(sRect, "|")   
    L = Clng(MyArray(0)): T = Clng(MyArray(1))   
    R = Clng(MyArray(2)) : B = Clng(MyArray(3))
    Delay 500
End Function
//----------------------------------------------------------
'[公式重選] : 1.激活軟件;2.進行重選操作;3.修改計劃周期
Function 公式重選
    TracePrint "[" & 當前時間 & "] 推薦軟件_重選公式:定碼萬位[" & 打法 & "]期"
    Call 激活推薦軟件
    '1.點擊關閉當前公式
    鼠標按下位置X = L + 354
    鼠標按下位置Y = T + 172
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftClick 1
    Delay 500
    '2.點擊全部折疊
    鼠標按下位置X = L + 182
    鼠標按下位置Y = T + 170
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftClick 1
    Delay 500
    '3.點擊展開定位膽系列
    鼠標按下位置X = L + 25
    鼠標按下位置Y = T + 193
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftClick 1
    Delay 500
    '4.點擊萬位定碼
    鼠標按下位置X = L + 52
    鼠標按下位置Y = T + 219
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftClick 1
    Delay 3000
    '6.修改計劃周期
    鼠標按下位置X = L + 515
    鼠標按下位置Y = T + 200
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 2000
    LeftClick 1
    Delay 300
    '5.判斷打法
    KeyPress "BackSpace", 1
    Delay 300
    SayString 打法
    Delay 300
    KeyPress "Enter", 1
    Delay 3000
End Function
//----------------------------------------------------------
//推薦軟件_復制操作
'[復制開獎信息]
Function 復制開獎信息
    '復制開獎信息
    鼠標按下位置X = L + 125
    鼠標按下位置Y = T + 138
    鼠標彈起位置X = L + 569
    鼠標彈起位置Y = T + 138
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftDown 1
    Delay 300
    MoveTo 鼠標彈起位置X,鼠標彈起位置Y 
    LeftUp 1
    Delay 300
    KeyDown 17, 1
    KeyPress 67, 1
    KeyUp 17, 1
    Delay 300
    開獎信息 = Plugin.sys.GetCLB()
    Delay 300
End Function
'[復制推薦號碼] : [推薦號碼]
Function 復制推薦號碼
    '移動鼠標到指定復制位置
    鼠標按下位置X = L + 960
    鼠標按下位置Y = T + 230
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftClick 1
    Delay 300
    推薦號碼 = Plugin.sys.GetCLB()
    Delay 300
End Function
'[復制當前計劃] 
Function 復制當前計劃
    鼠標按下位置X = L + 213
    鼠標按下位置Y = T + 629
    鼠標彈起位置X = L + 492
    鼠標彈起位置Y = T + 668
    MoveTo 鼠標按下位置X,鼠標按下位置Y 
    Delay 300
    LeftDown 1
    Delay 300
    MoveTo 鼠標彈起位置X,鼠標彈起位置Y 
    LeftUp 1
    Delay 300
    KeyDown 17, 1
    KeyPress 67, 1
    KeyUp 17, 1
    Delay 300
    當前計劃 = Plugin.sys.GetCLB()
    Delay 300
End Function
'[復制歷史數據] 
Function 復制歷史數據
    TracePrint  "["  & 當前時間 & "] 推薦軟件_復制歷史數據"
    鼠標按下位置X = L + 225
    鼠標按下位置Y = T + 231
    MoveTo 鼠標按下位置X, 鼠標按下位置Y
    Delay 500
    LeftClick 1
    Delay 500
    MoveTo 鼠標按下位置X + 20, 鼠標按下位置Y + 15
    Delay 500
    RightClick 1
    Delay 500
    MoveTo 鼠標按下位置X + 120, 鼠標按下位置Y + 50
    Delay 500
    LeftClick 1
    Delay 500
    歷史預測信息 = Plugin.sys.GetCLB()
    Delay 300
End Function 
//----------------------------------------------------------
//推薦軟件_轉化
'[獲取當前追號期數] : [當前追號期數]
Function 獲取當前追號期數
    Call 激活推薦軟件
    Delay 300
    Call 復制當前計劃
    Delay 300
    '獲取當前追號期數 
    當前追號期數 = Right(當前計劃, 2)
    TracePrint "當前追號期數為:" & 當前追號期數
    Delay 300
End Function
//----------------------------------------------------------
'[追號期數轉化(當前追號期數)]
Function 追號期數轉化(當前追號期數)
    TracePrint  "["  & 當前時間 & "] 數據轉化_追號期數轉化_1/3/6/12"
    If 當前追號期數 = "1期" Then 
        倍數 = 1
    ElseIf 當前追號期數 = "2期" Then
        倍數 = 3
    ElseIf 當前追號期數 = "3期" Then
        倍數 = 6
    ElseIf 當前追號期數 = "4期" Then
        倍數 = 12
    ElseIf 當前追號期數 = "5期" Then
        倍數 = 24
    ElseIf 當前追號期數 = "6期" Then
        倍數 = 48
    ElseIf 當前追號期數 = "7期" Then
        倍數 = 97
    ElseIf 當前追號期數 = "8期" Then
        倍數 = 196
    ElseIf 當前追號期數 = "9期" Then
        倍數 = 396
    End If
    TracePrint "當前是第[" & 當前追號期數 & "]期,選擇了翻[" & 倍數 & "]倍"
End Function
//************************************************************************************************************************************************************推薦軟件
//==========================================================================================================================通用
'下面是通用函數對
Function 當前時間
    當前時間 = Plugin.Sys.GetDateTime() & " "
End Function
Function 查找并綁定窗口句柄
    TracePrint "[" & 當前時間 & "] 查找并綁定各級窗口句柄"
    '1.綁定推薦軟件
    推薦軟件 = Plugin.Window.Find(0, "重慶時時彩")
    Delay 300
    '2.綁定瀏覽器
    瀏覽器 = Plugin.Window.Find(0, "- 重慶時時彩 - 彩票系統 - Google Chrome")
    Delay 300
    '3.綁定微信
    微信 = Plugin.Window.Find("ChatWnd", 窗口名稱)
    Delay 300
    '4.綁定QQ
    QQ = Plugin.Window.Find("TXGuiFoundation", 窗口名稱)
    Delay 300	
End Function
//----------------------------------------------------------
'運行以下代碼需要獲?。骸就扑]號碼 】;以下代碼將推薦的號碼轉換成可點擊的網頁元素代碼 
'[推薦值轉化] : [上局推薦購買號碼] (通用)
Function 推薦值轉化
    dim 推薦購買數組   
    推薦購買數組 = Split(推薦號碼, " ")   
    推薦購買一 = Clng(推薦購買數組(0))
    推薦購買二 = Clng(推薦購買數組(1))
    推薦購買三 = Clng(推薦購買數組(2))
    推薦購買四 = Clng(推薦購買數組(3))
    推薦購買五 = Clng(推薦購買數組(4))
    Delay 300
    上局推薦購買號碼 = 推薦號碼
End Function
'[五星元素匹配] (通用)
Function 五星元素匹配
    '萬位元素
    萬零 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(1) > a"
    萬一 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(2) > a"
    萬二 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(3) > a"
    萬三 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(4) > a"
    萬四 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(5) > a"
    萬五 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(6) > a"
    萬六 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(7) > a" 
    萬七 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(8) > a" 
    萬八 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(9) > a" 
    萬九 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(1) > div.sumBtn_left > div > span:nth-child(10) > a"
    '千位元素
    千零 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(1) > a"
    千一 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(2) > a"
    千二 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(3) > a"
    千三 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(4) > a"
    千四 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(5) > a"
    千五 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(6) > a"
    千六 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(7) > a" 
    千七 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(8) > a" 
    千八 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(9) > a" 
    千九 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(2) > div.sumBtn_left > div > span:nth-child(10) > a"
    '百位元素
    百零 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(1) > a"
    百一 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(2) > a"
    百二 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(3) > a"
    百三 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(4) > a"
    百四 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(5) > a"
    百五 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(6) > a"
    百六 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(7) > a" 
    百七 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(8) > a" 
    百八 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(9) > a" 
    百九 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(3) > div.sumBtn_left > div > span:nth-child(10) > a"
    '十位元素
    十零 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(1) > a"
    十一 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(2) > a"
    十二 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(3) > a"
    十三 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(4) > a"
    十四 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(5) > a"
    十五 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(6) > a"
    十六 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(7) > a" 
    十七 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(8) > a" 
    十八 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(9) > a" 
    十九 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(4) > div.sumBtn_left > div > span:nth-child(10) > a"
    '個位元素
    個零 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(1) > a"
    個一 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(2) > a"
    個二 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(3) > a"
    個三 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(5) > a"
    個四 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(5) > a"
    個五 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(6) > a"
    個六 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(7) > a" 
    個七 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(8) > a" 
    個八 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(9) > a" 
    個九 = "#PLAY-CONTAINER > div.sumBtn_box > div > div > div:nth-child(5) > div.sumBtn_left > div > span:nth-child(10) > a"
End Function
'[推薦購買匹配()] (通用)
Function 推薦購買匹配(推薦購買)
    Call 五星元素匹配
    If 推薦購買 = 0 Then 
        元素 = 萬零
    ElseIf 推薦購買 = 1 Then
        元素 = 萬一
    ElseIf 推薦購買 = 2 Then
        元素 = 萬二
    ElseIf 推薦購買 = 3 Then
        元素 = 萬三
    ElseIf 推薦購買 = 4 Then
        元素 = 萬四
    ElseIf 推薦購買 = 5 Then
        元素 = 萬五
    ElseIf 推薦購買 = 6 Then
        元素 = 萬六
    ElseIf 推薦購買 = 7 Then
        元素 = 萬七
    ElseIf 推薦購買 = 8 Then
        元素 = 萬八
    ElseIf 推薦購買 = 9 Then
        元素 = 萬九
    End If
End Function
//==========================================================================================================================循環體
'[一期判斷] : 如果當前為1期則重新選擇一個公式
Function 一期判斷
    Call 獲取當前追號期數
    If 當前追號期數 = "1期" Then 
        TracePrint "上局中獎啦!現在又是第一期!"
        上一局余額 = LibE.神夢_智能填表.元素_取屬性值("title", "//*[@id='AvailableBalance']")
        //Call 公式重選
        Delay 300
    End If	
End Function
//----------------------------------------------------------
'循環體_循環
'[核心循環] : 通過判斷當前瀏覽器開獎期號判斷是否需要進行購彩操作
Function 核心循環
    '進入循環前的數據校驗
    當前瀏覽器開獎期號 = 上局瀏覽器開獎期號
    當前推薦軟件開獎期號 = 上局推薦軟件開獎期號
    '循環判斷:瀏覽器開獎數據是否更新 (部分情況可能瀏覽器沒有更新開獎號碼?。?
    Do
        Call 循環瀏覽器
        //Call 循環推薦軟件
    Loop
End Function
'先循環判斷瀏覽器期號是否更新,再循環判斷推薦軟件期號是否更新
Function 循環瀏覽器
    Do
        '判斷瀏覽器當前推薦軟件開獎期號 [當前瀏覽器開獎期號]
        當前瀏覽器開獎期號 = LibE.神夢_智能填表.元素_取屬性值("text", "/html/body/div[1]/div[1]/div/div[3]/div[2]/span[1]/span")
        If 當前瀏覽器開獎期號 <> 上局瀏覽器開獎期號 Then 
            TracePrint "此時瀏覽器已經更新開獎號碼,最新的開獎期號為[" & 當前瀏覽器開獎期號 & "],上局購買的號碼為[" & 上局推薦號碼 & "]"
            Call 瀏覽器刷新
            Delay 1000
            '循環判斷:推薦軟件開獎期號是否更新
            Call 循環推薦軟件
        Else 
            TracePrint "當前瀏覽器的開獎號碼還沒有更新,請繼續循環哦!"
            Call 瀏覽器刷新
        End If
        For i = 15 To 0 Step -1
            TracePrint i
            Delay 1000
        Next
    Loop
End Function
'循環判斷推薦軟件的期號是否更新,如果更新了則進行新的投注
Function 循環推薦軟件
    Do
        '復制推薦軟件的開獎信息
        Call 激活推薦軟件
        Call 復制開獎信息
        當前推薦軟件開獎期號 = Left(開獎信息, 15)
        TracePrint "[" + 當前時間 + "]當前" + 當前推薦軟件開獎期號
        If 上局推薦軟件開獎期號 <> 當前推薦軟件開獎期號 Then 
            TracePrint "[" + 當前時間 + "]當前推薦軟件開獎期號不等于上局推薦軟件開獎期號,繼續往下操作"
            TracePrint "上局" + 上局推薦軟件開獎期號
            TracePrint "當前" + 當前推薦軟件開獎期號
            '如果為第一期,那么我們更新一下公式
            Call 一期判斷
            Call 激活推薦軟件
            Call 復制推薦號碼
            Call 自動操作
            '循環判斷:推薦軟件的推薦號碼是否更新
            '退出:判斷助贏軟件是否更新期號的循環
            Exit Do	
        Else
            TracePrint "當前助贏軟件的期號還沒有更新呢!再等等吧!"
            For i = 5 To 0 Step -1
                TracePrint i
                Delay 1000
            Next
        End If
    loop
End Function
//----------------------------------------------------------
'循環體_操作
'[自動操作]
Function 自動操作
    當前余額 = LibE.神夢_智能填表.元素_取屬性值("title", "//*[@id='AvailableBalance']")
    '1.推薦軟件操作
    Call 推薦軟件操作
    '2.瀏覽器操作
    Call 瀏覽器操作
    '3.對話窗口操作
    本局差額 = 購買后當前余額 - 上一局余額
    本局差額 = FormatNumber((本局差額*100)/100,2)
    差額 = 購買后當前余額 - 啟動資金
    '判斷:盈利峰值
    If 差額 > 0 Then 
        If 差額 > 最大差額 Then 
            最大差額 = 差額
        End If
        Delay 300
    Else 
        Delay 300
    End If
    If 差額 < 0 Then
        If 差額 < 最小差額 Then 
            最小差額 = 差額
        End If
        Delay 300
    Else 
        Delay 300
    End If
    輸出差額 = FormatNumber((差額 * 100) / 100, 2)
    'a.開獎信息
    上局開獎信息 = "上局開獎期號為[" & 當前瀏覽器開獎期號 & "],上局開獎號碼為[" & 開獎號碼 & "]"
    'b.上局投注信息
    上局投注號碼 = "上局投注的號碼為[" & 上局推薦號碼 & "]"
    上局投注倍數 = "上局投注的倍數為[" & 上局追號期數 & "],上一局投注的金額為[" & 上局投注金額 & "]元"
    'c.本局投注信息
    本局投注號碼 = "本局投注的號碼為[" & 推薦號碼 & "]"
    本局追號期數 = "本局是追第[" & 當前追號期數 & "],倍數為[" & 倍數 & "]"
    本局投注倍數 = "本局投注的倍數為[" & 購買倍數 & "]倍,本局投注金額為[" & 1 * 購買倍數 & "]元"
    'd.財產信息
    余額信息 = "當前賬號啟動資金為[" & 啟動資金 & "]元,當前賬號余額為[" & 購買后當前余額 & "]元"
    本局盈利 = "本輪投注盈利[" & 本局差額 & "]元"
    盈利峰值 = "當前最大盈利[" & 最大差額 & "]元,最大虧損[" & 最小差額 & "]元"
    總體盈利 = "程序啟動后總體盈利[" & 輸出差額 & "]元"
    '在輸出信息后,本局數據變上局數據
    上局瀏覽器開獎期號 = 當前瀏覽器開獎期號
    上局推薦軟件開獎期號 = 當前推薦軟件開獎期號
    上局推薦號碼 = 推薦號碼
    上局追號期數 = 當前追號期數
    上局投注金額 = 10 * 購買倍數
    If 對話窗口 = "QQ" Then 
        Call QQ操作
    ElseIf 對話窗口 = "微信" Then
        Call 微信操作
    End If
End Function
//==========================================================================================================================瀏覽器
'[購買操作]
Function 購買操作
    Call 瀏覽器刷新
    Call Plugin.Window.Max(瀏覽器)
    Delay 300
    Call Plugin.Window.Top(瀏覽器, 0)
    Delay 300
    '獲取信息操作
    '1.獲取當前瀏覽器開獎期號 [當前瀏覽器開獎期號]
    當前瀏覽器開獎期號 = LibE.神夢_智能填表.元素_取屬性值("text", "/html/body/div[1]/div[1]/div/div[3]/div[2]/span[1]/span")
    '2.獲取開獎號碼 [開獎號碼]
    開獎號碼 = LibE.神夢_智能填表.元素_取屬性值("text", "/html/body/div[1]/div[1]/div/div[3]/div[1]")
    '點擊定位膽
    Call LibE.神夢_智能填表.元素_點擊("//*[@id='PLAY-CONTAINER']/div[1]/div[1]/a[8]")
    TracePrint "點擊選擇定位膽完畢"
    '1.選號
    Call 選號
    '2.選擇倍數
    購買倍數 = 倍數 * 基數
    Call LibE.神夢_智能填表.元素_置輸入框(購買倍數, "//*[@id='PLAY-CONTAINER']/div[5]/div/div[1]/div[1]/input")
    Delay 300
    TracePrint "當前輸入倍數成功"
    '判斷投注購彩金額:元/角
    Call 判斷購彩金額
    Delay 500
    '3.點擊立即購買
    Call LibE.神夢_智能填表.元素_點擊("#PLAY-CONTAINER > div.betNum-btn.row_btm.clear > a.btn.confirm-btn.activate1")
    For i = 5 To 0 Step -1
        TracePrint i
        Delay 1000
    Next
    Call 瀏覽器刷新
    當前余額 = LibE.神夢_智能填表.元素_取屬性值("title", "//*[@id='AvailableBalance']")
End Function
'[瀏覽器操作] : 1.激活、置頂、最大化;2.定位膽、選號、選倍數、選金額、購彩;3.除錯、取消置頂
Function 瀏覽器操作
    購買前當前余額 = LibE.神夢_智能填表.元素_取屬性值("title", "//*[@id='AvailableBalance']")
    Do
        '判斷是否購買成功
        當前余額 = LibE.神夢_智能填表.元素_取屬性值("title", "//*[@id='AvailableBalance']")
        If 購買前當前余額 = 當前余額 Then 
            TracePrint "當前購買失敗"
            Call 購買操作
        ElseIf 購買前當前余額 >  當前余額 Then
            TracePrint "當前購買成功"
            購買后當前余額 = 當前余額
            Call Plugin.Window.Top(瀏覽器, 1)
            Delay 300
            Exit Do
        End If
    loop
End Function
//-----------------------------------------------------------------------------------------------
//瀏覽器_計算
'瀏覽器_計算
'[獲取啟動資金] : [啟動資金]
Function 獲取啟動資金
    '注:只能在查找并綁定窗口句柄使用本函數
    啟動資金 = LibE.神夢_智能填表.元素_取屬性值("title", "//*[@id='AvailableBalance']")
    TracePrint "本輪投注的啟動資金為[" & 啟動資金 & "]元"
End Function
'主體循環
If 當前余額 > 上局余額 Then 
    TracePrint "當前盈利了,可以開始新的一局了."
    '判斷:當前余額大于上一局余額,則將當前余額設置為上一局余下的額度
    上局余額 = 當前余額
ElseIf 當前余額 < 上局余額 Then
    TracePrint "上一注未盈利,請再接再勵!"
End If
//-----------------------------------------------------------------------------------------------
'瀏覽器_操作
'[選號] : 依次點擊號碼
Function 選號
    TracePrint "[" & 當前時間 & "] 網頁操作_開始購買: " & 推薦號碼
    '網頁陸續點擊選擇好的推薦號碼
    Call 推薦購買匹配(推薦購買一)
    Call LibE.神夢_智能填表.元素_點擊(元素)
    Call 推薦購買匹配(推薦購買二)
    Call LibE.神夢_智能填表.元素_點擊(元素)
    Call 推薦購買匹配(推薦購買三)
    Call LibE.神夢_智能填表.元素_點擊(元素)
    Call 推薦購買匹配(推薦購買四)
    Call LibE.神夢_智能填表.元素_點擊(元素)
    Call 推薦購買匹配(推薦購買五)
    Call LibE.神夢_智能填表.元素_點擊(元素)
    TracePrint "[" & 當前時間 & "] 點選號碼完畢"
End Function
'[判斷購彩金額] : 判斷投注購彩金額:元/角
Function 判斷購彩金額
    If 購彩金額 = "角" Then 
        Call LibE.神夢_智能填表.元素_點擊("#PLAY-CONTAINER > div.betNum-btn.row_btm.clear > div > div.amount-box > div.unit-box.select-box")
        Delay 300
        Call LibE.神夢_智能填表.元素_執行事件("mouseover", "//*[@id='MoneyModel']/li[2]/a")
        Delay 300
        Call LibE.神夢_智能填表.元素_執行事件("click", "//*[@id='MoneyModel']/li[2]/a")
        Delay 300
        TracePrint "當前購買的金額是:[" & 1 * 購買倍數 & "]角"
    Else 
        TracePrint "當前購買的金額是:[" & 1 * 購買倍數 & "]元"
        Delay 300
    End If
End Function
'[瀏覽器刷新] : 激活瀏覽器后,點擊刷新余額
Function 瀏覽器刷新
    Call Plugin.Window.Active(瀏覽器)
    Delay 300
    Call Plugin.Window.Max(瀏覽器)
    Delay 500
    KeyPress "Esc", 1
    Delay 500
    Call LibE.神夢_智能填表.元素_點擊("/html/body/div[6]/div/table/tbody/tr[3]/td/div[2]/button")
    Delay 500
    '點擊當前余額
    Call LibE.神夢_智能填表.元素_點擊("//*[@id='AvailableBalance']")
    Delay 2000
    Call Plugin.Window.Min(瀏覽器)
    Delay 300
End Function
//==========================================================================================================================對話窗口
Function 微信操作
    '1.調整微信窗口句柄并[調整大小][激活][置頂]
    Call Plugin.Window.Active(微信)
    Delay 300
    Call Plugin.Window.SetClientSize(微信, 100, 100)
    Delay 300
    Call Plugin.Window.Top(微信, 0)
    Delay 300
    '2.打開瀏覽器并點擊截圖
    '最大化瀏覽器
    Call Plugin.Window.Active(瀏覽器)
    Delay 300
    Call Plugin.Window.Top(瀏覽器, 0)
    Delay 300
    Call Plugin.Window.Max(瀏覽器)
    Delay 300
    Call Plugin.Window.Active(微信)
    Delay 500  
    Call Plugin.Bkgnd.LeftClick(微信, 95, 250) 
    Delay 500 
    MoveTo 100, 100
    Delay 500
    LeftClick 1
    Delay 500
    MoveTo 0, 0
    Delay 500
    LeftClick 1
    Delay 500
    KeyPress "Enter", 1
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13) 
    Delay 500
    '最小化瀏覽器
    Call Plugin.Window.Top(瀏覽器, 1)
    Delay 300
    Call Plugin.Window.Min(瀏覽器)
    Delay 300
    '3.發送消息
    '3-1.開獎信息
    Call Plugin.Bkgnd.SendString(微信, 上局開獎信息) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13)
    Delay 50
    '3-2.上局投注信息
    Call Plugin.Bkgnd.SendString(微信, 上局投注號碼) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(微信, 上局投注倍數)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13) 
    Delay 50
    '3-3.本局投注信息
    Call Plugin.Bkgnd.SendString(微信, 本局投注號碼)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13) 
    Delay 50
    Call Plugin.Bkgnd.SendString(微信, 本局追號期數)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13) 
    Delay 50
    Call Plugin.Bkgnd.SendString(微信, 本局投注倍數)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13) 
    Delay 50
    '3-4.財產信息
    Call Plugin.Bkgnd.SendString(微信, 余額信息) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(微信, 本局盈利) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(微信, 盈利峰值) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(微信, 總體盈利) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(微信, 13)
    Delay 50
    'footer
    'a.處理微信窗口句柄[取消置頂][最小化]
    Call Plugin.Window.Top(微信, 1)
    Delay 300
    Call Plugin.Window.Min(微信)
    Delay 300
    'b.處理瀏覽器窗口句柄
    Call Plugin.Window.Min(瀏覽器)
    Delay 300
End Function
Function QQ操作
    '1.調整QQ窗口句柄并[調整大小][激活][置頂]
    Call Plugin.Window.Active(QQ)
    Delay 300
    Call Plugin.Window.SetClientSize(QQ, 500, 500)
    Delay 300
    Call Plugin.Window.Top(QQ, 0)
    Delay 300
    '最大化瀏覽器
    Call Plugin.Window.Active(瀏覽器)
    Delay 300
    Call Plugin.Window.Top(瀏覽器, 0)
    Delay 300
    Call Plugin.Window.Max(瀏覽器)
    Delay 300
    '2.打開瀏覽器并點擊截圖
    Call Plugin.Window.Active(QQ)
    Delay 500  
    Call Plugin.Bkgnd.LeftClick(QQ, 90, 385) 
    Delay 500 
    MoveTo 100, 100
    Delay 500
    LeftClick 1
    Delay 500
    MoveTo 0, 0
    Delay 500
    LeftClick 1
    Delay 500
    KeyPress "Enter", 1
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13) 
    Delay 500
    '最小化瀏覽器
    Call Plugin.Window.Top(瀏覽器, 1)
    Delay 300
    Call Plugin.Window.Min(瀏覽器)
    '3.發送消息
    '3-1.開獎信息
    Call Plugin.Bkgnd.SendString(QQ, 上局開獎信息) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13)
    Delay 50
    '3-2.上局投注信息
    Call Plugin.Bkgnd.SendString(QQ, 上局投注號碼) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(QQ, 上局投注倍數)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13) 
    Delay 50
    '3-3.本局投注信息
    Call Plugin.Bkgnd.SendString(QQ, 本局投注號碼)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13) 
    Delay 50
    Call Plugin.Bkgnd.SendString(QQ, 本局追號期數)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13) 
    Delay 50
    Call Plugin.Bkgnd.SendString(QQ, 本局投注倍數)
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13) 
    Delay 50
    '3-4.財產信息
    Call Plugin.Bkgnd.SendString(QQ, 余額信息) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(QQ, 本局盈利) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(QQ, 盈利峰值) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13)
    Delay 50
    Call Plugin.Bkgnd.SendString(QQ, 總體盈利) 
    Delay 500
    Call Plugin.Bkgnd.KeyPress(QQ, 13)
    Delay 50
    'footer
    'a.處理QQ窗口句柄[取消置頂][最小化]
    Call Plugin.Window.Top(QQ, 1)
    Delay 300
    Call Plugin.Window.Min(QQ)
    Delay 300
    'b.處理瀏覽器窗口句柄
    Call Plugin.Window.Min(瀏覽器)
    Delay 300
End Function
//開始進行自動購買操作
If LibE.神夢_智能填表._初始化("", "") = False  Then 
    MsgBox "出錯,智能填表初始化失??!", 1 + 16 + 4096, "警告!"
    ExitScript 
End If
//啟動谷歌瀏覽器
If LibE.神夢_智能填表.綁定("Chrome.exe") Then 
    '打開購彩網頁(利鑫彩票)
    Call LibE.神夢_智能填表.網頁_跳轉("https://www.99551277.com/Lobby/Lottery")
    TracePrint "請在60秒內輸入帳號密碼驗證碼登錄,請打開利鑫彩票主頁!"
    For i = 20 To 0 Step -1
        TracePrint i
        Delay 1000
    Next
    TracePrint "現在程序繼續往下執行!"
    Call LibE.神夢_智能填表.網頁_標簽新建("http://gpkapiqt.ying036.com/OffcialOtherGame/Index/26")
    For i = 10 To 0 Step -1
        TracePrint i
        Delay 1000
    Next
    '軟件初始化:1.綁定窗口;2.公式重選;
    Call 查找并綁定窗口句柄
    Call 公式重選
    Call 獲取啟動資金
    '綁定的投注網頁再次確認
    TracePrint LibE.神夢_智能填表.網頁_取網址()
    Delay 300
    TracePrint LibE.神夢_智能填表.網頁_取標題()
    Delay 300
    Call 核心循環
Else 
    MsgBox "出錯,綁定瀏覽器失??!", 1 + 16 + 4096, "警告!"
    ExitScript 
End If
//把這個代碼放到腳本末尾,避免按鍵精靈奔潰
Sub OnScriptExit()
    Call LibE.神夢_智能填表._銷毀()
End Sub
Sub OnThreadExit()
    Call LibE.神夢_智能填表._銷毀()
End Sub