//<>--------------------------按鍵精靈腳本界面演示例子 - 流程結構-------------------------<> MessageBox "測試,腳本啟動運行中。。。" EndScript '演示例子不做腳本執行 //<>------------------------------ 初始設置內容 --------------------------<> //初始設置 Dim 血鍵 Select Case Form1.補血熱鍵.ListIndex Case 0 血鍵 = 0 Case 1 血鍵 = 112 Case 2 血鍵 = 113 Case 3 血鍵 = 114 Case 4 血鍵 = 115 Case 5 血鍵 = 116 Case 6 血鍵 = 117 Case 7 血鍵 = 118 Case 8 血鍵 = 119 Case 9 血鍵 = 120 End Select //初始設置 Dim 藍鍵 Select Case Form1.補藍熱鍵.ListIndex Case 0 藍鍵 = 0 Case 1 藍鍵 = 112 Case 2 藍鍵 = 113 Case 3 藍鍵 = 114 Case 4 藍鍵 = 115 Case 5 藍鍵 = 116 Case 6 藍鍵 = 117 Case 7 藍鍵 = 118 Case 8 藍鍵 = 119 Case 9 藍鍵 = 120 End Select //初始設置 Dim 技能鍵 Select Case Form1.技能加血熱鍵.ListIndex Case 0 技能鍵 = 0 Case 1 技能鍵 = 112 Case 2 技能鍵 = 113 Case 3 技能鍵 = 114 Case 4 技能鍵 = 115 Case 5 技能鍵 = 116 Case 6 技能鍵 = 117 Case 7 技能鍵 = 118 Case 8 技能鍵 = 119 Case 9 技能鍵 = 120 End Select //<>--------------------------------------------------初始執行登錄遊戲--------------------------<> Rem 登錄 RunApp Form1.遊戲路徑.Text '打開遊戲 //循環等待遊戲是否開啟? Do Delay 1000 '等待1秒 Hwnd = Plugin.Window.Find(0, "【遊戲標題】請自行修改") '查找遊戲句柄,或者用顏色判斷也行。 If Hwnd <> 0 Then '判斷遊戲已經打開了。 Exit Do '離開循環等待 End If Loop //輸入遊戲帳號 SayString Form1.遊戲帳號.Text '輸入帳號 Delay 1000 '等待1秒 //輸入遊戲密碼 KeyPress "Tab", 1 '切換輸入焦點 Delay 1000 '等待1秒 SayString Form1.遊戲密碼.Text '輸入密碼