1.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  2.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  3.             如果表达式 (c5=c2) 为真,则
  4.                 （VBScript语句） dy=dy+1:k=k+1:m1=0
  5.             否则如果(c5=c3 and c5<>c2)为真,则
  6.                 （VBScript语句） dx=dx+1:dy=dy+1:m=m+1:k=k+1:m1=0
  7.             否则如果(c5=c6 and c5<>c2 and c5<>c3)为真,则
  8.                 （VBScript语句） dx=dx+1:m=m+1:m1=0
  9.             否则如果(c5=c4 and c5<>c1 and c5<>c2 and c5<>c6 and c5<>c3 and c5<>c9)为真,则
  10.                 （VBScript语句） dx=dx-1:m=m-1:m1=m1+1
  11.                 （VBScript语句） zf1="6"
  12.                 （VBScript语句） c5="010101"
  13.             否则如果(c5=c4 and c5<>c1 and c5<>c2 and c5<>c6 and c5<>c3 and c5=c9)为真,则
  14.                 （VBScript语句） dx=dx-1:m=m-1:m1=m1+1
  15.                 （VBScript语句） c5="010101"
  16.             否则如果(c5=c1 and c5<>c4 and c5<>c2 and c5<>c6 and c5<>c3)为真,则
  17.                 （VBScript语句） c5="010101"
  18.             否则如果(c5<>c2 and c5<>c6 and c5<>c3)为真,则
  19.                 （VBScript语句） c5="010101"
  20.             条件结束
  21.         循环结束
  22.         （VBScript语句） dx=dx+m:dy=dy+k
  23.         如果表达式 (zf1<>"6") 为真,则
  24.             //⒈⒈⒈【↓④】6
  25.             //⒈⒈⒉【←↓⑥】23
  26.             （VBScript语句） dx=qxw:dy=qyw
  27.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  28.             （VBScript语句） m=0:k=0
  29.             如果表达式 (c5="000000") 为真,则循环执行
  30.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  31.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  32.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  33.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  34.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  35.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  36.                 如果表达式 (c5=c4) 为真,则
  37.                     （VBScript语句） dx=dx-1:m=m-1
  38.                 否则如果(c5<>c4 and c5=c1)为真,则
  39.                     （VBScript语句） dx=dx-1:dy=dy+1:m=m-1:k=k+1
  40.                 否则如果(c5<>c4 and c5<>c1 and c5=c2)为真,则
  41.                     （VBScript语句） dy=dy+1:k=k+1
  42.                 否则如果(c5<>c4 and c5<>c1 and c5<>c2)为真,则
  43.                     （VBScript语句） c5="010101"
  44.                 条件结束
  45.             循环结束
  46.             （VBScript语句） dx089=dx:dy089=dy:k089=k
  47.             （VBScript语句） m=0:k=0
  48.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  49.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  50.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  51.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  52.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  53.             如果表达式 (c5<>c3 and c5<>c1 and c5<>c2 and c5=c6) 为真,则
  54.                 （VBScript语句） dx=dx+1:m=m+1:k1=0
  55.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  56.                 如果表达式 (c15="FFFFFF") 为真,则循环执行
  57.                     调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  58.                     （VBScript语句） k1=k1+1
  59.                 循环结束
  60.                 （VBScript语句） m1=0
  61.                 （VBScript语句） dy=dy+k1
  62.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  63.                 如果表达式 (c15="FFFFFF" and m1<=8) 为真,则循环执行
  64.                     调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  65.                     （VBScript语句） m1=m1+1
  66.                 循环结束
  67.                 如果表达式 (m1=9) 为真,则
  68.                     （VBScript语句） zf1="3"
  69.                 否则如果(m1<=8)为真,则
  70.                     （VBScript语句） zf1="2"
  71.                 条件结束
  72.             条件结束
  73.         条件结束
  74.         如果表达式 (zf1<>"6" and zf1<>"2" and zf1<>"3") 为真,则
  75.             //⒈⒈⒉⒈【←↓③】089
  76.             //⒈⒈⒉⒉【←↓→①】8
  77.             （VBScript语句） dx=qxw:dy=qyw
  78.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  79.             （VBScript语句） m=0:k=0:m1=0
  80.             如果表达式 (c5="000000") 为真,则循环执行
  81.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  82.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  83.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  84.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  85.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  86.                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(20,20,960,690,"Attachment:\确定.bmp",1,xs,ys)
  87.                 如果表达式 (c5=c4) 为真,则
  88.                     （VBScript语句） dx=dx-1:m=m+1
  89.                 否则如果(c5<>c4 and c5=c1)为真,则
  90.                     （VBScript语句） dx=dx-1:dy=dy+1:m=m+1:k=k+1
  91.                 否则如果(c5=c2 and c5<>c1 and c5<>c4)为真,则
  92.                     （VBScript语句） dy=dy+1:k=k+1
  93.                 否则如果(c5<>c4 and c5<>c1 and c5<>c2 and c5=c3)为真,则
  94.                     （VBScript语句） dx=dx+1:dy=dy+1:m=m+1:k=k+1
  95.                     （VBScript语句） c5="010101"
  96.                 否则如果(c5<>c4 and c5<>c1 and c5<>c2)为真,则
  97.                     （VBScript语句） dx=dx+1:dy=dy+1:m=m+1:k=k+1
  98.                     （VBScript语句） c5="010101"
  99.                 条件结束
  100.             循环结束