1. 令 Hwnd = Window.Find(GAMEAPP,"0")
2. 令 HwndEx = Window.FindEx(Hwnd,0,"GAMEAPP","0")
3. 弹出窗口 "季枫暗恋刷喇叭工具Q1156925605"
4. 调用 Window.Move(HwndEx,0,0)
5. 用户定义变量 str1="季枫暗恋刷喇叭工具Q987549272" "请输入自动叫喊的第1句话"
6. 注释：****************设置结束*****************
7. 调用 Window.SendString(HwndEx,str1)
8. 延时 500 毫秒
9. 调用 Bkgnd.KeyPress(HwndEx,13)
10. 循环当 true 时
11.     调用 Bkgnd.KeyPress(HwndEx,38)
12.     延时 1 毫秒
13.     调用 Bkgnd.KeyPress(HwndEx,13)
14. 循环结束