1.     (VBScript语句) XX(146)=454:YY(146)=269
  2.     (VBScript语句) XX(147)=455:YY(147)=269
  3.     (VBScript语句) XX(148)=456:YY(148)=269
  4.     (VBScript语句) XX(149)=469:YY(149)=269
  5.     (VBScript语句) XX(150)=470:YY(150)=269
  6.     (VBScript语句) XX(151)=471:YY(151)=269
  7.     (VBScript语句) XX(152)=455:YY(152)=270
  8.     (VBScript语句) XX(153)=456:YY(153)=270
  9.     (VBScript语句) XX(154)=469:YY(154)=270
  10.     (VBScript语句) XX(155)=470:YY(155)=270
  11.     (VBScript语句) XX(156)=471:YY(156)=270
  12.     (VBScript语句) XX(157)=455:YY(157)=271
  13.     (VBScript语句) XX(158)=456:YY(158)=271
  14.     (VBScript语句) XX(159)=457:YY(159)=271
  15.     (VBScript语句) XX(160)=469:YY(160)=271
  16.     (VBScript语句) XX(161)=470:YY(161)=271
  17.     (VBScript语句) XX(162)=471:YY(162)=271
  18.     (VBScript语句) XX(163)=456:YY(163)=272
  19.     (VBScript语句) XX(164)=457:YY(164)=272
  20.     (VBScript语句) XX(165)=469:YY(165)=272
  21.     (VBScript语句) XX(166)=470:YY(166)=272
  22.     (VBScript语句) XX(167)=456:YY(167)=273
  23.     (VBScript语句) XX(168)=457:YY(168)=273
  24.     (VBScript语句) XX(169)=458:YY(169)=273
  25.     (VBScript语句) XX(170)=468:YY(170)=273
  26.     (VBScript语句) XX(171)=469:YY(171)=273
  27.     (VBScript语句) XX(172)=470:YY(172)=273
  28.     (VBScript语句) XX(173)=457:YY(173)=274
  29.     (VBScript语句) XX(174)=458:YY(174)=274
  30.     (VBScript语句) XX(175)=459:YY(175)=274
  31.     (VBScript语句) XX(176)=467:YY(176)=274
  32.     (VBScript语句) XX(177)=468:YY(177)=274
  33.     (VBScript语句) XX(178)=469:YY(178)=274
  34.     (VBScript语句) XX(179)=458:YY(179)=275
  35.     (VBScript语句) XX(180)=459:YY(180)=275
  36.     (VBScript语句) XX(181)=460:YY(181)=275
  37.     (VBScript语句) XX(182)=466:YY(182)=275
  38.     (VBScript语句) XX(183)=467:YY(183)=275
  39.     (VBScript语句) XX(184)=468:YY(184)=275
  40.     (VBScript语句) XX(185)=460:YY(185)=276
  41.     (VBScript语句) XX(186)=461:YY(186)=276
  42.     (VBScript语句) XX(187)=462:YY(187)=276
  43.     (VBScript语句) XX(188)=463:YY(188)=276
  44.     (VBScript语句) XX(189)=464:YY(189)=276
  45.     (VBScript语句) XX(190)=465:YY(190)=276
  46.     (VBScript语句) XX(191)=466:YY(191)=276
  47.     调用子程序 旋转
  48.     调用子程序 缩小
  49.     调用子程序 提取
  50. 子程序结束,回到调用处
  51. 子程序 7
  52.     dim XX(350),YY(350)
  53.     (VBScript语句) XX(1)=456:YY(1)=245
  54.     (VBScript语句) XX(2)=457:YY(2)=245
  55.     (VBScript语句) XX(3)=458:YY(3)=245
  56.     (VBScript语句) XX(4)=459:YY(4)=245
  57.     (VBScript语句) XX(5)=460:YY(5)=245
  58.     (VBScript语句) XX(6)=461:YY(6)=245
  59.     (VBScript语句) XX(7)=462:YY(7)=245
  60.     (VBScript语句) XX(8)=463:YY(8)=245
  61.     (VBScript语句) XX(9)=464:YY(9)=245
  62.     (VBScript语句) XX(10)=465:YY(10)=245
  63.     (VBScript语句) XX(11)=466:YY(11)=245
  64.     (VBScript语句) XX(12)=467:YY(12)=245
  65.     (VBScript语句) XX(13)=468:YY(13)=245
  66.     (VBScript语句) XX(14)=469:YY(14)=245
  67.     (VBScript语句) XX(15)=470:YY(15)=245
  68.     (VBScript语句) XX(16)=471:YY(16)=245
  69.     (VBScript语句) XX(17)=472:YY(17)=245
  70.     (VBScript语句) XX(18)=455:YY(18)=246
  71.     (VBScript语句) XX(19)=456:YY(19)=246
  72.     (VBScript语句) XX(20)=457:YY(20)=246
  73.     (VBScript语句) XX(21)=458:YY(21)=246
  74.     (VBScript语句) XX(22)=459:YY(22)=246
  75.     (VBScript语句) XX(23)=460:YY(23)=246
  76.     (VBScript语句) XX(24)=461:YY(24)=246
  77.     (VBScript语句) XX(25)=462:YY(25)=246
  78.     (VBScript语句) XX(26)=463:YY(26)=246
  79.     (VBScript语句) XX(27)=464:YY(27)=246
  80.     (VBScript语句) XX(28)=465:YY(28)=246
  81.     (VBScript语句) XX(29)=466:YY(29)=246
  82.     (VBScript语句) XX(30)=467:YY(30)=246
  83.     (VBScript语句) XX(31)=468:YY(31)=246
  84.     (VBScript语句) XX(32)=469:YY(32)=246
  85.     (VBScript语句) XX(33)=470:YY(33)=246
  86.     (VBScript语句) XX(34)=471:YY(34)=246
  87.     (VBScript语句) XX(35)=455:YY(35)=247
  88.     (VBScript语句) XX(36)=456:YY(36)=247
  89.     (VBScript语句) XX(37)=457:YY(37)=247
  90.     (VBScript语句) XX(38)=458:YY(38)=247
  91.     (VBScript语句) XX(39)=459:YY(39)=247
  92.     (VBScript语句) XX(40)=460:YY(40)=247
  93.     (VBScript语句) XX(41)=461:YY(41)=247
  94.     (VBScript语句) XX(42)=462:YY(42)=247
  95.     (VBScript语句) XX(43)=463:YY(43)=247
  96.     (VBScript语句) XX(44)=464:YY(44)=247
  97.     (VBScript语句) XX(45)=465:YY(45)=247
  98.     (VBScript语句) XX(46)=466:YY(46)=247
  99.     (VBScript语句) XX(47)=467:YY(47)=247
  100.     (VBScript语句) XX(48)=468:YY(48)=247