VBS XX(128)=454:YY(128)=269 VBS XX(129)=455:YY(129)=269 VBS XX(130)=456:YY(130)=269 VBS XX(131)=457:YY(131)=269 VBS XX(132)=458:YY(132)=269 VBS XX(133)=469:YY(133)=269 VBS XX(134)=470:YY(134)=269 VBS XX(135)=471:YY(135)=269 VBS XX(136)=454:YY(136)=270 VBS XX(137)=455:YY(137)=270 VBS XX(138)=456:YY(138)=270 VBS XX(139)=457:YY(139)=270 VBS XX(140)=469:YY(140)=270 VBS XX(141)=470:YY(141)=270 VBS XX(142)=471:YY(142)=270 VBS XX(143)=455:YY(143)=271 VBS XX(144)=456:YY(144)=271 VBS XX(145)=457:YY(145)=271 VBS XX(146)=469:YY(146)=271 VBS XX(147)=470:YY(147)=271 VBS XX(148)=471:YY(148)=271 VBS XX(149)=455:YY(149)=272 VBS XX(150)=456:YY(150)=272 VBS XX(151)=457:YY(151)=272 VBS XX(152)=468:YY(152)=272 VBS XX(153)=469:YY(153)=272 VBS XX(154)=470:YY(154)=272 VBS XX(155)=456:YY(155)=273 VBS XX(156)=457:YY(156)=273 VBS XX(157)=468:YY(157)=273 VBS XX(158)=469:YY(158)=273 VBS XX(159)=470:YY(159)=273 VBS XX(160)=457:YY(160)=274 VBS XX(161)=467:YY(161)=274 VBS XX(162)=468:YY(162)=274 VBS XX(163)=469:YY(163)=274 VBS XX(164)=458:YY(164)=275 VBS XX(165)=459:YY(165)=275 VBS XX(166)=465:YY(166)=275 VBS XX(167)=466:YY(167)=275 VBS XX(168)=467:YY(168)=275 VBS XX(169)=468:YY(169)=275 VBS XX(170)=460:YY(170)=276 VBS XX(171)=461:YY(171)=276 VBS XX(172)=462:YY(172)=276 VBS XX(173)=463:YY(173)=276 VBS XX(174)=464:YY(174)=276 VBS XX(175)=465:YY(175)=276 VBS XX(176)=466:YY(176)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return 5 Sub 6 dim XX(350),YY(350) VBS XX(1)=462:YY(1)=245 VBS XX(2)=463:YY(2)=245 VBS XX(3)=464:YY(3)=245 VBS XX(4)=465:YY(4)=245 VBS XX(5)=466:YY(5)=245 VBS XX(6)=460:YY(6)=246 VBS XX(7)=461:YY(7)=246 VBS XX(8)=466:YY(8)=246 VBS XX(9)=467:YY(9)=246 VBS XX(10)=468:YY(10)=246 VBS XX(11)=458:YY(11)=247 VBS XX(12)=459:YY(12)=247 VBS XX(13)=467:YY(13)=247 VBS XX(14)=468:YY(14)=247 VBS XX(15)=469:YY(15)=247 VBS XX(16)=457:YY(16)=248 VBS XX(17)=458:YY(17)=248 VBS XX(18)=467:YY(18)=248 VBS XX(19)=468:YY(19)=248 VBS XX(20)=469:YY(20)=248 VBS XX(21)=457:YY(21)=249 VBS XX(22)=466:YY(22)=249 VBS XX(23)=467:YY(23)=249 VBS XX(24)=468:YY(24)=249 VBS XX(25)=469:YY(25)=249 VBS XX(26)=456:YY(26)=250 VBS XX(27)=457:YY(27)=250 VBS XX(28)=467:YY(28)=250 VBS XX(29)=468:YY(29)=250 VBS XX(30)=469:YY(30)=250 VBS XX(31)=455:YY(31)=251 VBS XX(32)=456:YY(32)=251 VBS XX(33)=457:YY(33)=251 VBS XX(34)=455:YY(34)=252 VBS XX(35)=456:YY(35)=252 VBS XX(36)=455:YY(36)=253 VBS XX(37)=456:YY(37)=253 VBS XX(38)=454:YY(38)=254 VBS XX(39)=455:YY(39)=254 VBS XX(40)=456:YY(40)=254 VBS XX(41)=454:YY(41)=255 VBS XX(42)=455:YY(42)=255 VBS XX(43)=456:YY(43)=255 VBS XX(44)=454:YY(44)=256 VBS XX(45)=455:YY(45)=256