1. 调用 Sys.SetSc(1280,1024,32)
2. 延时 3000 毫秒
3. 令 游戏路径 = InputBox1.DNF路径.Text
4. 令 判断是否是正确路径 = File.IsFileExit(游戏路径)
5. 如果 判断是否是正确路径 = True 则
6. 否则
7.     Msgbox("游戏文件不存在",1 + 32,"红遍江淮提示")
8.     脚本停止运行
9. 条件结束
10. 延时 3000 毫秒
11. 令 判断账号路径 = File.IsFileExit(Form1.DNF账号.Text)
12. 令 账号路径 = InputBox1.DNF路径.Text
13. 令 判断是否是正确路径 = File.IsFileExit(游戏路径)
14. 如果 判断是否是正确路径 = True 则
15. 否则
16.     Msgbox("游戏文件不存在",1 + 32,"红遍江淮提示")
17.     脚本停止运行
18. 条件结束
19. （鼠标）移动到 (809, 517)
20. （鼠标）左键单击, 1次
21. （超级模拟键盘）按 "BackSpace" 键, 20次
22. 延时 500 毫秒
23. 调用 （命令库 键盘）KeyList(2513624528,1,100)
24. 延时 500 毫秒
25. （超级模拟键盘）按 Tab 键, 1次
26. （鼠标）移动到 (705, 543)
27. （鼠标）左键单击, 1次
28. 调用 （命令库 键盘）KeyList(123456,1,100)
29. （超级模拟键盘）按 "Enter" 键, 1次
30. 调用 Msg.Tips("在第" & 20 - ii & "秒正式进入游戏")
31. 令 ii = - 2