.版本 2
.支持庫 exui
.支持庫 spec
.程序集 窗口程序集_啟動窗口
.程序集變量 用戶名, 文本型
.程序集變量 狀態碼, 文本型
.子程序 _頭像_框架_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
_啟動窗口.發送信息 (161, 2, 0)
.子程序 _選擇夾EX1_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
_啟動窗口.發送信息 (161, 2, 0)
.子程序 _登錄_輸入賬號_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (登錄_輸入賬號.內容 ＝ “輸入賬號”)
  登錄_輸入賬號.內容 ＝ “”
.如果真結束
.子程序 _登錄_輸入密碼_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (登錄_輸入密碼.內容 ＝ “輸入密碼”)
  登錄_輸入密碼.內容 ＝ “”
.如果真結束
.子程序 _登錄_輸入賬號_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (登錄_輸入賬號.內容 ＝ “”)
    登錄_輸入賬號.內容 ＝ “輸入賬號”
  .如果真結束
.如果真結束
.子程序 _登錄_輸入密碼_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (登錄_輸入密碼.內容 ＝ “”)
    登錄_輸入密碼.內容 ＝ “輸入密碼”
  .如果真結束
.如果真結束
.子程序 _控制_關閉_左鍵單擊
配置_保存配置 ()
結束 ()
.子程序 配置_讀取配置
.局部變量 配置_賬號, 文本型
.局部變量 配置_密碼, 文本型
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
配置_賬號 ＝ 讀配置項 (“config.ini”, “root”, “name”, )
配置_密碼 ＝ 讀配置項 (“config.ini”, “root”, “pwd”, )
狀態碼 ＝ 讀配置項 (“config.ini”, “root”, “StatusCode”, )
登錄_輸入賬號.內容 ＝ 配置_賬號
登錄_輸入密碼.內容 ＝ 配置_密碼
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志
.子程序 配置_保存配置
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
寫配置項 (“config.ini”, “root”, “name”, 登錄_輸入賬號.內容)
寫配置項 (“config.ini”, “root”, “pwd”, 登錄_輸入密碼.內容)
寫配置項 (“config.ini”, “root”, “StatusCode”, 狀態碼)
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志
.子程序 _分類_登錄_左鍵單擊
選擇夾EX1.現行子夾 ＝ 1
執行_小點 (分類_登錄)
.子程序 選擇夾漸變, , , 忽略
.參數 目標子夾, 整數型
.局部變量 i, 整數型
.局部變量 現在所在子夾, 整數型
.局部變量 參數_延遲速度, 整數型
現在所在子夾 ＝ 選擇夾EX1.現行子夾
參數_延遲速度 ＝ 10
.如果真 (現在所在子夾 ＝ 1) ' --------------漸變隱藏按鈕
  .計次循環首 (17, i)
    登錄_輸入賬號.透明度 ＝ 255 － i × 15
    登錄_輸入密碼.透明度 ＝ 255 － i × 15
    分類_登錄.透明度 ＝ 255 － i × 15
    延遲 (參數_延遲速度)
    處理事件 ()
  .計次循環尾 ()
.如果真結束
選擇夾EX1.現行子夾 ＝ 目標子夾
.如果真 (目標子夾 ＝ 1) ' --------------漸變顯示按鈕
  .計次循環首 (17, i)
    登錄_輸入賬號.透明度 ＝ i × 15
    登錄_輸入密碼.透明度 ＝ i × 15
    分類_登錄.透明度 ＝ i × 15
    延遲 (參數_延遲速度)
    處理事件 ()
  .計次循環尾 ()
  返回 ()
.如果真結束
' -----------------------------------------------------------------------------------------------------------------------------
.如果真 (現在所在子夾 ＝ 1) ' --------------漸變隱藏按鈕
  .計次循環首 (17, i)
    注冊_輸入賬號.透明度 ＝ 255 － i × 15
    注冊_輸入密碼.透明度 ＝ 255 － i × 15
    注冊_重復輸入密碼.透明度 ＝ 255 － i × 15
    注冊_郵箱地址.透明度 ＝ 255 － i × 15
    分類_注冊.透明度 ＝ 255 － i × 15
    延遲 (參數_延遲速度)
    處理事件 ()
  .計次循環尾 ()
.如果真結束
選擇夾EX1.現行子夾 ＝ 目標子夾
.如果真 (目標子夾 ＝ 2) ' --------------漸變顯示按鈕
  .計次循環首 (17, i)
    注冊_輸入賬號.透明度 ＝ i × 15
    注冊_輸入密碼.透明度 ＝ i × 15
    注冊_重復輸入密碼.透明度 ＝ i × 15
    注冊_郵箱地址.透明度 ＝ i × 15
    分類_注冊.透明度 ＝ i × 15
    延遲 (參數_延遲速度)
    處理事件 ()
  .計次循環尾 ()
  返回 ()
.如果真結束
' -----------------------------------------------------------------------------------------------------------------------------
.子程序 執行_小點
.參數 按鈕EX, 按鈕EX
.局部變量 按鈕居中位置, 整數型
.局部變量 小點居中位置, 整數型
.局部變量 歷史_小點位置, 整數型
.局部變量 小點_移動步數, 文本型
.局部變量 向左或向右移動, 邏輯型, , , 假 = 向右  真 = 向左
.局部變量 i
歷史_小點位置 ＝ 圖片_小點.左邊
按鈕居中位置 ＝ 按鈕EX.左邊 ＋ 按鈕EX.寬度 ÷ 2
小點居中位置 ＝ 按鈕居中位置 － 圖片_小點.寬度 ÷ 2
小點_移動步數 ＝ 到文本 (到整數 (小點居中位置 － 歷史_小點位置))
.如果 (尋找文本 (小點_移動步數, “-”, , 假) ≠ -1)
  向左或向右移動 ＝ 真
.否則
  向左或向右移動 ＝ 假
.如果結束
.計次循環首 (到整數 (子文本替換 (小點_移動步數, “-”, , , , 真)), i)
  .如果真 (向左或向右移動 ＝ 真)
    圖片_小點.移動 (圖片_小點.左邊 － 1, , , )
  .如果真結束
  .如果真 (向左或向右移動 ＝ 假)
    圖片_小點.移動 (圖片_小點.左邊 ＋ 1, , , )
  .如果真結束
  延遲 (1)
  處理事件 ()
.計次循環尾 ()
.子程序 _分類_注冊_左鍵單擊
選擇夾EX1.現行子夾 ＝ 2
執行_小點 (分類_注冊)
.子程序 _分類_充值_左鍵單擊
選擇夾EX1.現行子夾 ＝ 3
執行_小點 (分類_充值)
.子程序 _分類_設置_左鍵單擊
選擇夾EX1.現行子夾 ＝ 4
執行_小點 (分類_設置)
.子程序 _注冊_輸入賬號_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (注冊_輸入賬號.內容 ＝ “輸入賬號”)
  注冊_輸入賬號.內容 ＝ “”
.如果真結束
.子程序 _注冊_輸入密碼_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (注冊_輸入密碼.內容 ＝ “輸入密碼”)
  注冊_輸入密碼.內容 ＝ “”
.如果真結束
.子程序 _注冊_重復輸入密碼_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (注冊_重復輸入密碼.內容 ＝ “重復輸入密碼”)
  注冊_重復輸入密碼.內容 ＝ “”
.如果真結束
.子程序 _注冊_郵箱地址_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (注冊_郵箱地址.內容 ＝ “郵箱地址”)
  注冊_郵箱地址.內容 ＝ “”
.如果真結束
.子程序 _注冊_輸入賬號_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (注冊_輸入賬號.內容 ＝ “”)
    注冊_輸入賬號.內容 ＝ “輸入賬號”
  .如果真結束
.如果真結束
.子程序 _注冊_輸入密碼_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (注冊_輸入密碼.內容 ＝ “”)
    注冊_輸入密碼.內容 ＝ “輸入密碼”
  .如果真結束
.如果真結束
.子程序 _注冊_重復輸入密碼_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (注冊_重復輸入密碼.內容 ＝ “”)
    注冊_重復輸入密碼.內容 ＝ “重復輸入密碼”
  .如果真結束
.如果真結束
.子程序 _注冊_郵箱地址_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (注冊_郵箱地址.內容 ＝ “”)
    注冊_郵箱地址.內容 ＝ “郵箱地址”
  .如果真結束
.如果真結束
.子程序 _充值_充值賬號_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (充值_充值賬號.內容 ＝ “充值賬號”)
  充值_充值賬號.內容 ＝ “”
.如果真結束
.子程序 _充值_充值卡密_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (充值_充值卡密.內容 ＝ “充值卡密”)
  充值_充值卡密.內容 ＝ “”
.如果真結束
.子程序 _充值_推薦人_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (充值_推薦人.內容 ＝ “推薦人 *可空”)
  充值_推薦人.內容 ＝ “”
.如果真結束
.子程序 _充值_充值賬號_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (充值_充值賬號.內容 ＝ “”)
    充值_充值賬號.內容 ＝ “充值賬號”
  .如果真結束
.如果真結束
.子程序 _充值_充值卡密_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (充值_充值卡密.內容 ＝ “”)
    充值_充值卡密.內容 ＝ “充值卡密”
  .如果真結束
.如果真結束
.子程序 _充值_推薦人_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (充值_推薦人.內容 ＝ “”)
    充值_推薦人.內容 ＝ “推薦人 *可空”
  .如果真結束
.如果真結束
.子程序 _修改_用戶賬號_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (修改_用戶賬號.內容 ＝ “用戶賬號 *必填”)
  修改_用戶賬號.內容 ＝ “”
.如果真結束
.子程序 _修改_用戶賬號_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (修改_用戶賬號.內容 ＝ “”)
    修改_用戶賬號.內容 ＝ “用戶賬號 *必填”
  .如果真結束
.如果真結束
.子程序 _修改_現在密碼_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (修改_現在密碼.內容 ＝ “現在密碼”)
  修改_現在密碼.內容 ＝ “”
.如果真結束
.子程序 _修改_現在密碼_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (修改_現在密碼.內容 ＝ “”)
    修改_現在密碼.內容 ＝ “現在密碼”
  .如果真結束
.如果真結束
.子程序 _修改_新的密碼_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (修改_新的密碼.內容 ＝ “新的密碼”)
  修改_新的密碼.內容 ＝ “”
.如果真結束
.子程序 _修改_新的密碼_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (修改_新的密碼.內容 ＝ “”)
    修改_新的密碼.內容 ＝ “新的密碼”
  .如果真結束
.如果真結束
.子程序 _修改_郵箱地址_鼠標左鍵按下
.參數 xy坐標, 整數型
.參數 wp, 整數型
.如果真 (修改_郵箱地址.內容 ＝ “郵箱地址”)
  修改_郵箱地址.內容 ＝ “”
.如果真結束
.子程序 _修改_郵箱地址_焦點信息
.參數 焦點類型, 整數型
.參數 保留參數2, 整數型
.如果真 (焦點類型 ＝ 0)
  .如果真 (修改_郵箱地址.內容 ＝ “”)
    修改_郵箱地址.內容 ＝ “郵箱地址”
  .如果真結束
.如果真結束
.子程序 _按鈕_登錄_左鍵單擊
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
xx (“紅色簡約網絡驗證UI”)
' 自己寫自己的網絡驗證登錄命令
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志
.子程序 xx
.參數 txt, 文本型
' Taohin_信息框 (2, txt, _啟動窗口)
信息框EX (, “告警 :”, , txt, , , , , , , , , )
.子程序 _按鈕_注冊_左鍵單擊
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
' 自己寫自己的網絡驗證注冊命令
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志
.子程序 _按鈕_充值_左鍵單擊
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志
.子程序 _按鈕_修改_左鍵單擊
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志
.子程序 _按鈕_找回_左鍵單擊
.局部變量 返回值, 文本型
置入代碼 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 }) ' VMP保護開始標志
置入代碼 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 }) ' VMP保護結束標志