1.     (VBScript语句) XX(155)=458:YY(155)=276
  2.     (VBScript语句) XX(156)=459:YY(156)=276
  3.     (VBScript语句) XX(157)=460:YY(157)=276
  4.     (VBScript语句) XX(158)=461:YY(158)=276
  5.     (VBScript语句) XX(159)=462:YY(159)=276
  6.     (VBScript语句) XX(160)=463:YY(160)=276
  7.     (VBScript语句) XX(161)=464:YY(161)=276
  8.     (VBScript语句) XX(162)=465:YY(162)=276
  9.     (VBScript语句) XX(163)=466:YY(163)=276
  10.     (VBScript语句) XX(164)=467:YY(164)=276
  11.     (VBScript语句) XX(165)=468:YY(165)=276
  12.     (VBScript语句) XX(166)=469:YY(166)=276
  13.     (VBScript语句) XX(167)=470:YY(167)=276
  14.     (VBScript语句) XX(168)=471:YY(168)=276
  15.     调用子程序 旋转
  16.     调用子程序 缩小
  17.     调用子程序 提取
  18. 子程序结束,回到调用处
  19. 子程序 0
  20.     dim XX(350),YY(350)
  21.     (VBScript语句) XX(1)=460:YY(1)=245
  22.     (VBScript语句) XX(2)=461:YY(2)=245
  23.     (VBScript语句) XX(3)=462:YY(3)=245
  24.     (VBScript语句) XX(4)=463:YY(4)=245
  25.     (VBScript语句) XX(5)=464:YY(5)=245
  26.     (VBScript语句) XX(6)=465:YY(6)=245
  27.     (VBScript语句) XX(7)=459:YY(7)=246
  28.     (VBScript语句) XX(8)=460:YY(8)=246
  29.     (VBScript语句) XX(9)=465:YY(9)=246
  30.     (VBScript语句) XX(10)=466:YY(10)=246
  31.     (VBScript语句) XX(11)=458:YY(11)=247
  32.     (VBScript语句) XX(12)=459:YY(12)=247
  33.     (VBScript语句) XX(13)=466:YY(13)=247
  34.     (VBScript语句) XX(14)=467:YY(14)=247
  35.     (VBScript语句) XX(15)=468:YY(15)=247
  36.     (VBScript语句) XX(16)=457:YY(16)=248
  37.     (VBScript语句) XX(17)=458:YY(17)=248
  38.     (VBScript语句) XX(18)=467:YY(18)=248
  39.     (VBScript语句) XX(19)=468:YY(19)=248
  40.     (VBScript语句) XX(20)=456:YY(20)=249
  41.     (VBScript语句) XX(21)=457:YY(21)=249
  42.     (VBScript语句) XX(22)=458:YY(22)=249
  43.     (VBScript语句) XX(23)=468:YY(23)=249
  44.     (VBScript语句) XX(24)=469:YY(24)=249
  45.     (VBScript语句) XX(25)=456:YY(25)=250
  46.     (VBScript语句) XX(26)=457:YY(26)=250
  47.     (VBScript语句) XX(27)=468:YY(27)=250
  48.     (VBScript语句) XX(28)=469:YY(28)=250
  49.     (VBScript语句) XX(29)=470:YY(29)=250
  50.     (VBScript语句) XX(30)=455:YY(30)=251
  51.     (VBScript语句) XX(31)=456:YY(31)=251
  52.     (VBScript语句) XX(32)=457:YY(32)=251
  53.     (VBScript语句) XX(33)=468:YY(33)=251
  54.     (VBScript语句) XX(34)=469:YY(34)=251
  55.     (VBScript语句) XX(35)=470:YY(35)=251
  56.     (VBScript语句) XX(36)=455:YY(36)=252
  57.     (VBScript语句) XX(37)=456:YY(37)=252
  58.     (VBScript语句) XX(38)=457:YY(38)=252
  59.     (VBScript语句) XX(39)=469:YY(39)=252
  60.     (VBScript语句) XX(40)=470:YY(40)=252
  61.     (VBScript语句) XX(41)=454:YY(41)=253
  62.     (VBScript语句) XX(42)=455:YY(42)=253
  63.     (VBScript语句) XX(43)=456:YY(43)=253
  64.     (VBScript语句) XX(44)=469:YY(44)=253
  65.     (VBScript语句) XX(45)=470:YY(45)=253
  66.     (VBScript语句) XX(46)=471:YY(46)=253
  67.     (VBScript语句) XX(47)=454:YY(47)=254
  68.     (VBScript语句) XX(48)=455:YY(48)=254
  69.     (VBScript语句) XX(49)=456:YY(49)=254
  70.     (VBScript语句) XX(50)=469:YY(50)=254
  71.     (VBScript语句) XX(51)=470:YY(51)=254
  72.     (VBScript语句) XX(52)=471:YY(52)=254
  73.     (VBScript语句) XX(53)=454:YY(53)=255
  74.     (VBScript语句) XX(54)=455:YY(54)=255
  75.     (VBScript语句) XX(55)=456:YY(55)=255
  76.     (VBScript语句) XX(56)=469:YY(56)=255
  77.     (VBScript语句) XX(57)=470:YY(57)=255
  78.     (VBScript语句) XX(58)=471:YY(58)=255
  79.     (VBScript语句) XX(59)=454:YY(59)=256
  80.     (VBScript语句) XX(60)=455:YY(60)=256
  81.     (VBScript语句) XX(61)=456:YY(61)=256
  82.     (VBScript语句) XX(62)=469:YY(62)=256
  83.     (VBScript语句) XX(63)=470:YY(63)=256
  84.     (VBScript语句) XX(64)=471:YY(64)=256
  85.     (VBScript语句) XX(65)=454:YY(65)=257
  86.     (VBScript语句) XX(66)=455:YY(66)=257
  87.     (VBScript语句) XX(67)=456:YY(67)=257
  88.     (VBScript语句) XX(68)=469:YY(68)=257
  89.     (VBScript语句) XX(69)=470:YY(69)=257
  90.     (VBScript语句) XX(70)=471:YY(70)=257
  91.     (VBScript语句) XX(71)=453:YY(71)=258
  92.     (VBScript语句) XX(72)=454:YY(72)=258
  93.     (VBScript语句) XX(73)=455:YY(73)=258
  94.     (VBScript语句) XX(74)=456:YY(74)=258
  95.     (VBScript语句) XX(75)=469:YY(75)=258
  96.     (VBScript语句) XX(76)=470:YY(76)=258
  97.     (VBScript语句) XX(77)=471:YY(77)=258
  98.     (VBScript语句) XX(78)=472:YY(78)=258
  99.     (VBScript语句) XX(79)=453:YY(79)=259
  100.     (VBScript语句) XX(80)=454:YY(80)=259