1.     (VBScript语句) XX(105)=462:YY(105)=266
  2.     (VBScript语句) XX(106)=463:YY(106)=266
  3.     (VBScript语句) XX(107)=464:YY(107)=266
  4.     (VBScript语句) XX(108)=465:YY(108)=266
  5.     (VBScript语句) XX(109)=466:YY(109)=266
  6.     (VBScript语句) XX(110)=467:YY(110)=266
  7.     (VBScript语句) XX(111)=468:YY(111)=266
  8.     (VBScript语句) XX(112)=469:YY(112)=266
  9.     (VBScript语句) XX(113)=470:YY(113)=266
  10.     (VBScript语句) XX(114)=471:YY(114)=266
  11.     (VBScript语句) XX(115)=472:YY(115)=266
  12.     (VBScript语句) XX(116)=454:YY(116)=267
  13.     (VBScript语句) XX(117)=455:YY(117)=267
  14.     (VBScript语句) XX(118)=456:YY(118)=267
  15.     (VBScript语句) XX(119)=457:YY(119)=267
  16.     (VBScript语句) XX(120)=458:YY(120)=267
  17.     (VBScript语句) XX(121)=459:YY(121)=267
  18.     (VBScript语句) XX(122)=460:YY(122)=267
  19.     (VBScript语句) XX(123)=461:YY(123)=267
  20.     (VBScript语句) XX(124)=462:YY(124)=267
  21.     (VBScript语句) XX(125)=463:YY(125)=267
  22.     (VBScript语句) XX(126)=464:YY(126)=267
  23.     (VBScript语句) XX(127)=465:YY(127)=267
  24.     (VBScript语句) XX(128)=466:YY(128)=267
  25.     (VBScript语句) XX(129)=467:YY(129)=267
  26.     (VBScript语句) XX(130)=468:YY(130)=267
  27.     (VBScript语句) XX(131)=469:YY(131)=267
  28.     (VBScript语句) XX(132)=470:YY(132)=267
  29.     (VBScript语句) XX(133)=471:YY(133)=267
  30.     (VBScript语句) XX(134)=472:YY(134)=267
  31.     (VBScript语句) XX(135)=466:YY(135)=268
  32.     (VBScript语句) XX(136)=467:YY(136)=268
  33.     (VBScript语句) XX(137)=468:YY(137)=268
  34.     (VBScript语句) XX(138)=466:YY(138)=269
  35.     (VBScript语句) XX(139)=467:YY(139)=269
  36.     (VBScript语句) XX(140)=468:YY(140)=269
  37.     (VBScript语句) XX(141)=466:YY(141)=270
  38.     (VBScript语句) XX(142)=467:YY(142)=270
  39.     (VBScript语句) XX(143)=468:YY(143)=270
  40.     (VBScript语句) XX(144)=466:YY(144)=271
  41.     (VBScript语句) XX(145)=467:YY(145)=271
  42.     (VBScript语句) XX(146)=468:YY(146)=271
  43.     (VBScript语句) XX(147)=466:YY(147)=272
  44.     (VBScript语句) XX(148)=467:YY(148)=272
  45.     (VBScript语句) XX(149)=468:YY(149)=272
  46.     (VBScript语句) XX(150)=466:YY(150)=273
  47.     (VBScript语句) XX(151)=467:YY(151)=273
  48.     (VBScript语句) XX(152)=468:YY(152)=273
  49.     (VBScript语句) XX(153)=466:YY(153)=274
  50.     (VBScript语句) XX(154)=467:YY(154)=274
  51.     (VBScript语句) XX(155)=468:YY(155)=274
  52.     (VBScript语句) XX(156)=465:YY(156)=275
  53.     (VBScript语句) XX(157)=466:YY(157)=275
  54.     (VBScript语句) XX(158)=467:YY(158)=275
  55.     (VBScript语句) XX(159)=468:YY(159)=275
  56.     (VBScript语句) XX(160)=461:YY(160)=276
  57.     (VBScript语句) XX(161)=462:YY(161)=276
  58.     (VBScript语句) XX(162)=463:YY(162)=276
  59.     (VBScript语句) XX(163)=464:YY(163)=276
  60.     (VBScript语句) XX(164)=465:YY(164)=276
  61.     (VBScript语句) XX(165)=466:YY(165)=276
  62.     (VBScript语句) XX(166)=467:YY(166)=276
  63.     (VBScript语句) XX(167)=468:YY(167)=276
  64.     (VBScript语句) XX(168)=469:YY(168)=276
  65.     (VBScript语句) XX(169)=470:YY(169)=276
  66.     (VBScript语句) XX(170)=471:YY(170)=276
  67.     (VBScript语句) XX(171)=472:YY(171)=276
  68.     调用子程序 旋转
  69.     调用子程序 缩小
  70.     调用子程序 提取
  71. 子程序结束,回到调用处
  72. 子程序 5
  73.     dim XX(350),YY(350)
  74.     (VBScript语句) XX(1)=456:YY(1)=245
  75.     (VBScript语句) XX(2)=457:YY(2)=245
  76.     (VBScript语句) XX(3)=458:YY(3)=245
  77.     (VBScript语句) XX(4)=459:YY(4)=245
  78.     (VBScript语句) XX(5)=460:YY(5)=245
  79.     (VBScript语句) XX(6)=461:YY(6)=245
  80.     (VBScript语句) XX(7)=462:YY(7)=245
  81.     (VBScript语句) XX(8)=463:YY(8)=245
  82.     (VBScript语句) XX(9)=464:YY(9)=245
  83.     (VBScript语句) XX(10)=465:YY(10)=245
  84.     (VBScript语句) XX(11)=466:YY(11)=245
  85.     (VBScript语句) XX(12)=467:YY(12)=245
  86.     (VBScript语句) XX(13)=468:YY(13)=245
  87.     (VBScript语句) XX(14)=469:YY(14)=245
  88.     (VBScript语句) XX(15)=470:YY(15)=245
  89.     (VBScript语句) XX(16)=456:YY(16)=246
  90.     (VBScript语句) XX(17)=457:YY(17)=246
  91.     (VBScript语句) XX(18)=458:YY(18)=246
  92.     (VBScript语句) XX(19)=459:YY(19)=246
  93.     (VBScript语句) XX(20)=460:YY(20)=246
  94.     (VBScript语句) XX(21)=461:YY(21)=246
  95.     (VBScript语句) XX(22)=462:YY(22)=246
  96.     (VBScript语句) XX(23)=463:YY(23)=246
  97.     (VBScript语句) XX(24)=464:YY(24)=246
  98.     (VBScript语句) XX(25)=465:YY(25)=246
  99.     (VBScript语句) XX(26)=466:YY(26)=246
  100.     (VBScript语句) XX(27)=467:YY(27)=246