1.     (VBScript语句) XX(265)=455:YY(265)=269
  2.     (VBScript语句) XX(266)=460:YY(266)=269
  3.     (VBScript语句) XX(267)=461:YY(267)=269
  4.     (VBScript语句) XX(268)=462:YY(268)=269
  5.     (VBScript语句) XX(269)=463:YY(269)=269
  6.     (VBScript语句) XX(270)=464:YY(270)=269
  7.     (VBScript语句) XX(271)=469:YY(271)=269
  8.     (VBScript语句) XX(272)=470:YY(272)=269
  9.     (VBScript语句) XX(273)=471:YY(273)=269
  10.     (VBScript语句) XX(274)=472:YY(274)=269
  11.     (VBScript语句) XX(275)=454:YY(275)=270
  12.     (VBScript语句) XX(276)=455:YY(276)=270
  13.     (VBScript语句) XX(277)=460:YY(277)=270
  14.     (VBScript语句) XX(278)=461:YY(278)=270
  15.     (VBScript语句) XX(279)=462:YY(279)=270
  16.     (VBScript语句) XX(280)=463:YY(280)=270
  17.     (VBScript语句) XX(281)=469:YY(281)=270
  18.     (VBScript语句) XX(282)=470:YY(282)=270
  19.     (VBScript语句) XX(283)=471:YY(283)=270
  20.     (VBScript语句) XX(284)=472:YY(284)=270
  21.     (VBScript语句) XX(285)=454:YY(285)=271
  22.     (VBScript语句) XX(286)=455:YY(286)=271
  23.     (VBScript语句) XX(287)=460:YY(287)=271
  24.     (VBScript语句) XX(288)=461:YY(288)=271
  25.     (VBScript语句) XX(289)=462:YY(289)=271
  26.     (VBScript语句) XX(290)=463:YY(290)=271
  27.     (VBScript语句) XX(291)=469:YY(291)=271
  28.     (VBScript语句) XX(292)=470:YY(292)=271
  29.     (VBScript语句) XX(293)=471:YY(293)=271
  30.     (VBScript语句) XX(294)=472:YY(294)=271
  31.     (VBScript语句) XX(295)=454:YY(295)=272
  32.     (VBScript语句) XX(296)=455:YY(296)=272
  33.     (VBScript语句) XX(297)=461:YY(297)=272
  34.     (VBScript语句) XX(298)=462:YY(298)=272
  35.     (VBScript语句) XX(299)=463:YY(299)=272
  36.     (VBScript语句) XX(300)=469:YY(300)=272
  37.     (VBScript语句) XX(301)=470:YY(301)=272
  38.     (VBScript语句) XX(302)=471:YY(302)=272
  39.     (VBScript语句) XX(303)=472:YY(303)=272
  40.     (VBScript语句) XX(304)=454:YY(304)=273
  41.     (VBScript语句) XX(305)=455:YY(305)=273
  42.     (VBScript语句) XX(306)=461:YY(306)=273
  43.     (VBScript语句) XX(307)=462:YY(307)=273
  44.     (VBScript语句) XX(308)=463:YY(308)=273
  45.     (VBScript语句) XX(309)=469:YY(309)=273
  46.     (VBScript语句) XX(310)=470:YY(310)=273
  47.     (VBScript语句) XX(311)=471:YY(311)=273
  48.     (VBScript语句) XX(312)=472:YY(312)=273
  49.     (VBScript语句) XX(313)=454:YY(313)=274
  50.     (VBScript语句) XX(314)=455:YY(314)=274
  51.     (VBScript语句) XX(315)=461:YY(315)=274
  52.     (VBScript语句) XX(316)=462:YY(316)=274
  53.     (VBScript语句) XX(317)=469:YY(317)=274
  54.     (VBScript语句) XX(318)=470:YY(318)=274
  55.     (VBScript语句) XX(319)=471:YY(319)=274
  56.     (VBScript语句) XX(320)=472:YY(320)=274
  57.     (VBScript语句) XX(321)=454:YY(321)=275
  58.     (VBScript语句) XX(322)=455:YY(322)=275
  59.     (VBScript语句) XX(323)=461:YY(323)=275
  60.     (VBScript语句) XX(324)=462:YY(324)=275
  61.     (VBScript语句) XX(325)=469:YY(325)=275
  62.     (VBScript语句) XX(326)=470:YY(326)=275
  63.     (VBScript语句) XX(327)=471:YY(327)=275
  64.     (VBScript语句) XX(328)=472:YY(328)=275
  65.     (VBScript语句) XX(329)=451:YY(329)=276
  66.     (VBScript语句) XX(330)=452:YY(330)=276
  67.     (VBScript语句) XX(331)=453:YY(331)=276
  68.     (VBScript语句) XX(332)=454:YY(332)=276
  69.     (VBScript语句) XX(333)=455:YY(333)=276
  70.     (VBScript语句) XX(334)=456:YY(334)=276
  71.     (VBScript语句) XX(335)=457:YY(335)=276
  72.     (VBScript语句) XX(336)=458:YY(336)=276
  73.     (VBScript语句) XX(337)=462:YY(337)=276
  74.     (VBScript语句) XX(338)=466:YY(338)=276
  75.     (VBScript语句) XX(339)=467:YY(339)=276
  76.     (VBScript语句) XX(340)=468:YY(340)=276
  77.     (VBScript语句) XX(341)=469:YY(341)=276
  78.     (VBScript语句) XX(342)=470:YY(342)=276
  79.     (VBScript语句) XX(343)=471:YY(343)=276
  80.     (VBScript语句) XX(344)=472:YY(344)=276
  81.     (VBScript语句) XX(345)=473:YY(345)=276
  82.     (VBScript语句) XX(346)=474:YY(346)=276
  83.     (VBScript语句) XX(347)=475:YY(347)=276
  84.     调用子程序 旋转
  85.     调用子程序 缩小
  86.     调用子程序 提取
  87. 子程序结束,回到调用处
  88. 子程序 N
  89.     dim XX(350),YY(350)
  90.     (VBScript语句) XX(1)=452:YY(1)=245
  91.     (VBScript语句) XX(2)=453:YY(2)=245
  92.     (VBScript语句) XX(3)=454:YY(3)=245
  93.     (VBScript语句) XX(4)=455:YY(4)=245
  94.     (VBScript语句) XX(5)=456:YY(5)=245
  95.     (VBScript语句) XX(6)=457:YY(6)=245
  96.     (VBScript语句) XX(7)=468:YY(7)=245
  97.     (VBScript语句) XX(8)=469:YY(8)=245
  98.     (VBScript语句) XX(9)=470:YY(9)=245
  99.     (VBScript语句) XX(10)=471:YY(10)=245
  100.     (VBScript语句) XX(11)=472:YY(11)=245