- 调用 Sys.SetSc(1280,1024,32)
- 延时 3000 毫秒
- 令 游戏路径 = InputBox1.DNF路径.Text
- 令 判断是否是正确路径 = File.IsFileExit(游戏路径)
- 如果 判断是否是正确路径 = True 则
- 否则
- Msgbox("游戏文件不存在",1 + 32,"红遍江淮提示")
- 脚本停止运行
- 条件结束
- 延时 3000 毫秒
- 令 判断账号路径 = File.IsFileExit(Form1.DNF账号.Text)
- 令 账号路径 = InputBox1.DNF路径.Text
- 令 判断是否是正确路径 = File.IsFileExit(游戏路径)
- 如果 判断是否是正确路径 = True 则
- 否则
- Msgbox("游戏文件不存在",1 + 32,"红遍江淮提示")
- 脚本停止运行
- 条件结束
- (鼠标)移动到 (809, 517)
- (鼠标)左键单击, 1次
- (超级模拟键盘)按 "BackSpace" 键, 20次
- 延时 500 毫秒
- 调用 (命令库 键盘)KeyList(2513624528,1,100)
- 延时 500 毫秒
- (超级模拟键盘)按 Tab 键, 1次
- (鼠标)移动到 (705, 543)
- (鼠标)左键单击, 1次
- 调用 (命令库 键盘)KeyList(123456,1,100)
- (超级模拟键盘)按 "Enter" 键, 1次
- 调用 Msg.Tips("在第" & 20 - ii & "秒正式进入游戏")
- 令 ii = - 2