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