1.     (VBScript语句) XX(212)=456:YY(212)=273
  2.     (VBScript语句) XX(213)=470:YY(213)=273
  3.     (VBScript语句) XX(214)=471:YY(214)=273
  4.     (VBScript语句) XX(215)=472:YY(215)=273
  5.     (VBScript语句) XX(216)=455:YY(216)=274
  6.     (VBScript语句) XX(217)=456:YY(217)=274
  7.     (VBScript语句) XX(218)=470:YY(218)=274
  8.     (VBScript语句) XX(219)=471:YY(219)=274
  9.     (VBScript语句) XX(220)=472:YY(220)=274
  10.     (VBScript语句) XX(221)=455:YY(221)=275
  11.     (VBScript语句) XX(222)=456:YY(222)=275
  12.     (VBScript语句) XX(223)=471:YY(223)=275
  13.     (VBScript语句) XX(224)=472:YY(224)=275
  14.     (VBScript语句) XX(225)=452:YY(225)=276
  15.     (VBScript语句) XX(226)=453:YY(226)=276
  16.     (VBScript语句) XX(227)=454:YY(227)=276
  17.     (VBScript语句) XX(228)=455:YY(228)=276
  18.     (VBScript语句) XX(229)=456:YY(229)=276
  19.     (VBScript语句) XX(230)=457:YY(230)=276
  20.     (VBScript语句) XX(231)=458:YY(231)=276
  21.     (VBScript语句) XX(232)=459:YY(232)=276
  22.     (VBScript语句) XX(233)=471:YY(233)=276
  23.     (VBScript语句) XX(234)=472:YY(234)=276
  24.     调用子程序 旋转
  25.     调用子程序 缩小
  26.     调用子程序 提取
  27. 子程序结束,回到调用处
  28. 子程序 O
  29.     dim XX(350),YY(350)
  30.     (VBScript语句) XX(1)=461:YY(1)=245
  31.     (VBScript语句) XX(2)=462:YY(2)=245
  32.     (VBScript语句) XX(3)=463:YY(3)=245
  33.     (VBScript语句) XX(4)=464:YY(4)=245
  34.     (VBScript语句) XX(5)=465:YY(5)=245
  35.     (VBScript语句) XX(6)=466:YY(6)=245
  36.     (VBScript语句) XX(7)=459:YY(7)=246
  37.     (VBScript语句) XX(8)=460:YY(8)=246
  38.     (VBScript语句) XX(9)=461:YY(9)=246
  39.     (VBScript语句) XX(10)=466:YY(10)=246
  40.     (VBScript语句) XX(11)=467:YY(11)=246
  41.     (VBScript语句) XX(12)=468:YY(12)=246
  42.     (VBScript语句) XX(13)=458:YY(13)=247
  43.     (VBScript语句) XX(14)=459:YY(14)=247
  44.     (VBScript语句) XX(15)=468:YY(15)=247
  45.     (VBScript语句) XX(16)=469:YY(16)=247
  46.     (VBScript语句) XX(17)=457:YY(17)=248
  47.     (VBScript语句) XX(18)=458:YY(18)=248
  48.     (VBScript语句) XX(19)=469:YY(19)=248
  49.     (VBScript语句) XX(20)=470:YY(20)=248
  50.     (VBScript语句) XX(21)=456:YY(21)=249
  51.     (VBScript语句) XX(22)=457:YY(22)=249
  52.     (VBScript语句) XX(23)=458:YY(23)=249
  53.     (VBScript语句) XX(24)=469:YY(24)=249
  54.     (VBScript语句) XX(25)=470:YY(25)=249
  55.     (VBScript语句) XX(26)=471:YY(26)=249
  56.     (VBScript语句) XX(27)=456:YY(27)=250
  57.     (VBScript语句) XX(28)=457:YY(28)=250
  58.     (VBScript语句) XX(29)=470:YY(29)=250
  59.     (VBScript语句) XX(30)=471:YY(30)=250
  60.     (VBScript语句) XX(31)=455:YY(31)=251
  61.     (VBScript语句) XX(32)=456:YY(32)=251
  62.     (VBScript语句) XX(33)=457:YY(33)=251
  63.     (VBScript语句) XX(34)=470:YY(34)=251
  64.     (VBScript语句) XX(35)=471:YY(35)=251
  65.     (VBScript语句) XX(36)=472:YY(36)=251
  66.     (VBScript语句) XX(37)=455:YY(37)=252
  67.     (VBScript语句) XX(38)=456:YY(38)=252
  68.     (VBScript语句) XX(39)=471:YY(39)=252
  69.     (VBScript语句) XX(40)=472:YY(40)=252
  70.     (VBScript语句) XX(41)=454:YY(41)=253
  71.     (VBScript语句) XX(42)=455:YY(42)=253
  72.     (VBScript语句) XX(43)=456:YY(43)=253
  73.     (VBScript语句) XX(44)=471:YY(44)=253
  74.     (VBScript语句) XX(45)=472:YY(45)=253
  75.     (VBScript语句) XX(46)=454:YY(46)=254
  76.     (VBScript语句) XX(47)=455:YY(47)=254
  77.     (VBScript语句) XX(48)=456:YY(48)=254
  78.     (VBScript语句) XX(49)=471:YY(49)=254
  79.     (VBScript语句) XX(50)=472:YY(50)=254
  80.     (VBScript语句) XX(51)=473:YY(51)=254
  81.     (VBScript语句) XX(52)=454:YY(52)=255
  82.     (VBScript语句) XX(53)=455:YY(53)=255
  83.     (VBScript语句) XX(54)=456:YY(54)=255
  84.     (VBScript语句) XX(55)=471:YY(55)=255
  85.     (VBScript语句) XX(56)=472:YY(56)=255
  86.     (VBScript语句) XX(57)=473:YY(57)=255
  87.     (VBScript语句) XX(58)=454:YY(58)=256
  88.     (VBScript语句) XX(59)=455:YY(59)=256
  89.     (VBScript语句) XX(60)=456:YY(60)=256
  90.     (VBScript语句) XX(61)=471:YY(61)=256
  91.     (VBScript语句) XX(62)=472:YY(62)=256
  92.     (VBScript语句) XX(63)=473:YY(63)=256
  93.     (VBScript语句) XX(64)=454:YY(64)=257
  94.     (VBScript语句) XX(65)=455:YY(65)=257
  95.     (VBScript语句) XX(66)=456:YY(66)=257
  96.     (VBScript语句) XX(67)=471:YY(67)=257
  97.     (VBScript语句) XX(68)=472:YY(68)=257
  98.     (VBScript语句) XX(69)=473:YY(69)=257
  99.     (VBScript语句) XX(70)=453:YY(70)=258
  100.     (VBScript语句) XX(71)=454:YY(71)=258