VBS XX(238)=471:YY(238)=271 VBS XX(239)=454:YY(239)=272 VBS XX(240)=455:YY(240)=272 VBS XX(241)=456:YY(241)=272 VBS XX(242)=457:YY(242)=272 VBS XX(243)=468:YY(243)=272 VBS XX(244)=469:YY(244)=272 VBS XX(245)=470:YY(245)=272 VBS XX(246)=471:YY(246)=272 VBS XX(247)=454:YY(247)=273 VBS XX(248)=455:YY(248)=273 VBS XX(249)=456:YY(249)=273 VBS XX(250)=457:YY(250)=273 VBS XX(251)=468:YY(251)=273 VBS XX(252)=469:YY(252)=273 VBS XX(253)=470:YY(253)=273 VBS XX(254)=471:YY(254)=273 VBS XX(255)=454:YY(255)=274 VBS XX(256)=455:YY(256)=274 VBS XX(257)=456:YY(257)=274 VBS XX(258)=457:YY(258)=274 VBS XX(259)=468:YY(259)=274 VBS XX(260)=469:YY(260)=274 VBS XX(261)=470:YY(261)=274 VBS XX(262)=471:YY(262)=274 VBS XX(263)=454:YY(263)=275 VBS XX(264)=455:YY(264)=275 VBS XX(265)=456:YY(265)=275 VBS XX(266)=457:YY(266)=275 VBS XX(267)=468:YY(267)=275 VBS XX(268)=469:YY(268)=275 VBS XX(269)=470:YY(269)=275 VBS XX(270)=471:YY(270)=275 VBS XX(271)=451:YY(271)=276 VBS XX(272)=452:YY(272)=276 VBS XX(273)=453:YY(273)=276 VBS XX(274)=454:YY(274)=276 VBS XX(275)=455:YY(275)=276 VBS XX(276)=456:YY(276)=276 VBS XX(277)=457:YY(277)=276 VBS XX(278)=458:YY(278)=276 VBS XX(279)=459:YY(279)=276 VBS XX(280)=460:YY(280)=276 VBS XX(281)=465:YY(281)=276 VBS XX(282)=466:YY(282)=276 VBS XX(283)=467:YY(283)=276 VBS XX(284)=468:YY(284)=276 VBS XX(285)=469:YY(285)=276 VBS XX(286)=470:YY(286)=276 VBS XX(287)=471:YY(287)=276 VBS XX(288)=472:YY(288)=276 VBS XX(289)=473:YY(289)=276 VBS XX(290)=474:YY(290)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return H Sub I dim XX(350),YY(350) VBS XX(1)=456:YY(1)=245 VBS XX(2)=457:YY(2)=245 VBS XX(3)=458:YY(3)=245 VBS XX(4)=459:YY(4)=245 VBS XX(5)=460:YY(5)=245 VBS XX(6)=461:YY(6)=245 VBS XX(7)=462:YY(7)=245 VBS XX(8)=463:YY(8)=245 VBS XX(9)=464:YY(9)=245 VBS XX(10)=465:YY(10)=245 VBS XX(11)=466:YY(11)=245 VBS XX(12)=467:YY(12)=245 VBS XX(13)=468:YY(13)=245 VBS XX(14)=469:YY(14)=245 VBS XX(15)=470:YY(15)=245 VBS XX(16)=471:YY(16)=245 VBS XX(17)=462:YY(17)=246 VBS XX(18)=463:YY(18)=246 VBS XX(19)=464:YY(19)=246 VBS XX(20)=465:YY(20)=246 VBS XX(21)=462:YY(21)=247 VBS XX(22)=463:YY(22)=247 VBS XX(23)=464:YY(23)=247 VBS XX(24)=465:YY(24)=247 VBS XX(25)=462:YY(25)=248 VBS XX(26)=463:YY(26)=248 VBS XX(27)=464:YY(27)=248 VBS XX(28)=465:YY(28)=248 VBS XX(29)=462:YY(29)=249 VBS XX(30)=463:YY(30)=249 VBS XX(31)=464:YY(31)=249 VBS XX(32)=465:YY(32)=249 VBS XX(33)=462:YY(33)=250 VBS XX(34)=463:YY(34)=250 VBS XX(35)=464:YY(35)=250 VBS XX(36)=465:YY(36)=250 VBS XX(37)=462:YY(37)=251 VBS XX(38)=463:YY(38)=251 VBS XX(39)=464:YY(39)=251 VBS XX(40)=465:YY(40)=251 VBS XX(41)=462:YY(41)=252