1.         调用子程序 8
  2.     条件结束
  3. 子程序结束,回到调用处
  4. 子程序 8
  5.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  6.     如果表达式 (x>a and y>b) 为真,则
  7.         按键<Num 8>
  8.         a=x+e
  9.         c=a+f
  10.         x=0
  11.         y=0
  12.     否则
  13.         调用子程序 9
  14.     条件结束
  15. 子程序结束,回到调用处
  16. 子程序 9
  17.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  18.     如果表达式 (x>a and y>b) 为真,则
  19.         按键<Num 9>
  20.         a=x+e
  21.         c=a+f
  22.         x=0
  23.         y=0
  24.     否则
  25.         调用子程序 01
  26.     条件结束
  27. 条件结束
  28. 子程序结束,回到调用处
  29. 子程序 01
  30.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  31.     如果表达式 (x>a and y>b) 为真,则
  32.         按键<Num 9>
  33.         a=x+e
  34.         c=a+f
  35.         x=0
  36.         y=0
  37.     否则
  38.         调用子程序 02
  39.     条件结束
  40. 子程序结束,回到调用处
  41. 子程序 02
  42.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  43.     如果表达式 (x>a and y>b) 为真,则
  44.         按键<Num 8>
  45.         a=x+e
  46.         c=a+f
  47.         x=0
  48.         y=0
  49.     否则
  50.         调用子程序 03
  51.     条件结束
  52. 子程序结束,回到调用处
  53. 子程序 03
  54.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  55.     如果表达式 (x>a and y>b) 为真,则
  56.         按键<Num 7>
  57.         a=x+e
  58.         c=a+f
  59.         x=0
  60.         y=0
  61.     否则
  62.         调用子程序 04
  63.     条件结束
  64. 子程序结束,回到调用处
  65. 子程序 04
  66.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  67.     如果表达式 (x>a and y>b) 为真,则
  68.         按键<Num 6>
  69.         a=x+e
  70.         c=a+f
  71.         x=0
  72.         y=0
  73.     否则
  74.         调用子程序 06
  75.     条件结束
  76. 子程序结束,回到调用处
  77. 子程序 06
  78.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  79.     如果表达式 (x>a and y>b) 为真,则
  80.         按键<Num 4>
  81.         a=x+e
  82.         c=a+f
  83.         x=0
  84.         y=0
  85.     否则
  86.         调用子程序 07
  87.     条件结束
  88. 子程序结束,回到调用处
  89. 子程序 07
  90.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1023,767,"Attachment:\ckd.bmp",1,x,y)
  91.     如果表达式 (x>a and y>b) 为真,则
  92.         按键<Num 3>
  93.         a=x+e
  94.         c=a+f
  95.         x=0
  96.         y=0
  97.     否则
  98.         调用子程序 08
  99.     条件结束
  100. 子程序结束,回到调用处