1. 鼠标移到 637 , 567
  2. 左键单击
  3. 延时400毫秒
  4. //搜索是否与服务器的连接状态不稳定(下面)
  5. dim color(2)
  6. dim s3,x,y
  7. color(0)="ea5500":color(1)="ea5500":color(2)="ea5500"
  8. 调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,570,color(s),x,y)
  9. 如果表达式 (x>0 and y>0) 为真,则
  10.     延时1000毫秒
  11.     鼠标移到 509 , 404
  12.     左键单击
  13.     延时1000毫秒
  14.     鼠标移到 653 , 525
  15.     左键单击
  16.     延时30毫秒
  17.     左键单击
  18.     延时1000毫秒
  19.     弹出窗口 "与服务器的连接状态不稳定,脚本程序退出!"
  20. 脚本停止运行
  21. 否则
  22. 条件结束
  23. //搜索“游戏开始”(下面)
  24. dim color(2)
  25. dim s0,x,y
  26. color(0)="600033":color(1)="31faff":color(2)="31faff"
  27. 调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,570,color(s),x,y)
  28. 如果表达式 (x>0 and y>0) 为真,则
  29.     鼠标移到 X , Y
  30.     延时30毫秒
  31.     左键单击
  32.     延时30毫秒
  33.     左键单击
  34. 否则
  35. 条件结束
  36. 标记 110012
  37. //搜索是否进入登陆页面(下面)
  38. dim color(2)
  39. dim s5,x,y
  40. color(0)="628":color(1)="31faff":color(2)="31faff"
  41. 调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,570,color(s),x,y)
  42. 如果表达式 (x>0 and y>0) 为真,则
  43.     延时1000毫秒
  44.     鼠标移到 X , Y
  45.     延时30毫秒
  46.     左键单击
  47.     延时30毫秒
  48.     左键单击
  49. 否则
  50.     延时3000毫秒
  51.     跳转到标记 110012
  52. 条件结束
  53. 用户定义变量 PSW="AbcdzZ12345" 请输入你的帐号
  54. // 计算密码长度
  55. PSW_Len=Len(PSW)
  56. ReDim a(PSW_Len)
  57. i=0
  58. 循环 PSW_Len 遍
  59.     a(i) = Mid(PSW,1+i,1)
  60.     如果表达式 (Asc(a(i))>=97 and Asc(a(i))<=122) 为真,则
  61.         // 英文大写
  62.         按键#Asc(a(i))-32
  63.     否则如果(Asc(a(i))>=65 and Asc(a(i))<=90)为真,则
  64.         // 英文小写
  65.         按住<Shift>
  66.         按键#Asc(a(i))
  67.         弹起<Shift>
  68.     否则如果(Asc(a(i))>=48 and Asc(a(i))<=57)为真,则
  69.         // 数字
  70.         按键#Asc(a(i))
  71.     否则
  72.         弹出窗口 "帐号: " & PSW &" 含有符号,不适用此脚本"
  73.     条件结束
  74.     i = i + 1
  75. 循环结束
  76. 按键<Enter>
  77. 用户定义变量 PSW1="AbcdzZ12345" 请输入你的密码
  78. // 计算密码长度
  79. PSW1_Len=Len(PSW1)
  80. ReDim a(PSW1_Len)
  81. i=0
  82. 循环 PSW1_Len 遍
  83.     a(i) = Mid(PSW1,1+i,1)
  84.     如果表达式 (Asc(a(i))>=97 and Asc(a(i))<=122) 为真,则
  85.         // 英文大写
  86.         按键#Asc(a(i))-32
  87.     否则如果(Asc(a(i))>=65 and Asc(a(i))<=90)为真,则
  88.         // 英文小写
  89.         按住<Shift>
  90.         按键#Asc(a(i))
  91.         弹起<Shift>
  92.     否则如果(Asc(a(i))>=48 and Asc(a(i))<=57)为真,则
  93.         // 数字
  94.         按键#Asc(a(i))
  95.     否则
  96.         弹出窗口 "密码: " & PSW1 &" 含有符号,不适用此脚本"
  97.     条件结束
  98.     i = i + 1
  99. 循环结束
  100. 按键<Enter>