VBS XX(118)=468:YY(118)=268 VBS XX(119)=469:YY(119)=268 VBS XX(120)=470:YY(120)=268 VBS XX(121)=471:YY(121)=268 VBS XX(122)=454:YY(122)=269 VBS XX(123)=455:YY(123)=269 VBS XX(124)=456:YY(124)=269 VBS XX(125)=468:YY(125)=269 VBS XX(126)=469:YY(126)=269 VBS XX(127)=470:YY(127)=269 VBS XX(128)=471:YY(128)=269 VBS XX(129)=454:YY(129)=270 VBS XX(130)=455:YY(130)=270 VBS XX(131)=456:YY(131)=270 VBS XX(132)=468:YY(132)=270 VBS XX(133)=469:YY(133)=270 VBS XX(134)=470:YY(134)=270 VBS XX(135)=471:YY(135)=270 VBS XX(136)=455:YY(136)=271 VBS XX(137)=456:YY(137)=271 VBS XX(138)=468:YY(138)=271 VBS XX(139)=469:YY(139)=271 VBS XX(140)=470:YY(140)=271 VBS XX(141)=471:YY(141)=271 VBS XX(142)=455:YY(142)=272 VBS XX(143)=456:YY(143)=272 VBS XX(144)=457:YY(144)=272 VBS XX(145)=468:YY(145)=272 VBS XX(146)=469:YY(146)=272 VBS XX(147)=470:YY(147)=272 VBS XX(148)=471:YY(148)=272 VBS XX(149)=456:YY(149)=273 VBS XX(150)=457:YY(150)=273 VBS XX(151)=458:YY(151)=273 VBS XX(152)=468:YY(152)=273 VBS XX(153)=469:YY(153)=273 VBS XX(154)=470:YY(154)=273 VBS XX(155)=471:YY(155)=273 VBS XX(156)=457:YY(156)=274 VBS XX(157)=458:YY(157)=274 VBS XX(158)=468:YY(158)=274 VBS XX(159)=469:YY(159)=274 VBS XX(160)=470:YY(160)=274 VBS XX(161)=471:YY(161)=274 VBS XX(162)=458:YY(162)=275 VBS XX(163)=459:YY(163)=275 VBS XX(164)=460:YY(164)=275 VBS XX(165)=466:YY(165)=275 VBS XX(166)=467:YY(166)=275 VBS XX(167)=468:YY(167)=275 VBS XX(168)=460:YY(168)=276 VBS XX(169)=461:YY(169)=276 VBS XX(170)=462:YY(170)=276 VBS XX(171)=463:YY(171)=276 VBS XX(172)=464:YY(172)=276 VBS XX(173)=465:YY(173)=276 VBS XX(174)=466:YY(174)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return G Sub H dim XX(350),YY(350) VBS XX(1)=451:YY(1)=245 VBS XX(2)=452:YY(2)=245 VBS XX(3)=453:YY(3)=245 VBS XX(4)=454:YY(4)=245 VBS XX(5)=455:YY(5)=245 VBS XX(6)=456:YY(6)=245 VBS XX(7)=457:YY(7)=245 VBS XX(8)=458:YY(8)=245 VBS XX(9)=459:YY(9)=245 VBS XX(10)=460:YY(10)=245 VBS XX(11)=465:YY(11)=245 VBS XX(12)=466:YY(12)=245 VBS XX(13)=467:YY(13)=245 VBS XX(14)=468:YY(14)=245 VBS XX(15)=469:YY(15)=245 VBS XX(16)=470:YY(16)=245 VBS XX(17)=471:YY(17)=245 VBS XX(18)=472:YY(18)=245 VBS XX(19)=473:YY(19)=245 VBS XX(20)=474:YY(20)=245 VBS XX(21)=454:YY(21)=246 VBS XX(22)=455:YY(22)=246 VBS XX(23)=456:YY(23)=246 VBS XX(24)=457:YY(24)=246 VBS XX(25)=468:YY(25)=246 VBS XX(26)=469:YY(26)=246 VBS XX(27)=470:YY(27)=246 VBS XX(28)=471:YY(28)=246 VBS XX(29)=454:YY(29)=247 VBS XX(30)=455:YY(30)=247 VBS XX(31)=456:YY(31)=247 VBS XX(32)=457:YY(32)=247 VBS XX(33)=468:YY(33)=247 VBS XX(34)=469:YY(34)=247 VBS XX(35)=470:YY(35)=247 VBS XX(36)=471:YY(36)=247 VBS XX(37)=454:YY(37)=248