VBS XX(202)=468:YY(202)=270 VBS XX(203)=469:YY(203)=270 VBS XX(204)=455:YY(204)=271 VBS XX(205)=456:YY(205)=271 VBS XX(206)=457:YY(206)=271 VBS XX(207)=458:YY(207)=271 VBS XX(208)=467:YY(208)=271 VBS XX(209)=468:YY(209)=271 VBS XX(210)=469:YY(210)=271 VBS XX(211)=455:YY(211)=272 VBS XX(212)=456:YY(212)=272 VBS XX(213)=457:YY(213)=272 VBS XX(214)=458:YY(214)=272 VBS XX(215)=467:YY(215)=272 VBS XX(216)=468:YY(216)=272 VBS XX(217)=469:YY(217)=272 VBS XX(218)=470:YY(218)=272 VBS XX(219)=455:YY(219)=273 VBS XX(220)=456:YY(220)=273 VBS XX(221)=457:YY(221)=273 VBS XX(222)=458:YY(222)=273 VBS XX(223)=468:YY(223)=273 VBS XX(224)=469:YY(224)=273 VBS XX(225)=470:YY(225)=273 VBS XX(226)=455:YY(226)=274 VBS XX(227)=456:YY(227)=274 VBS XX(228)=457:YY(228)=274 VBS XX(229)=458:YY(229)=274 VBS XX(230)=468:YY(230)=274 VBS XX(231)=469:YY(231)=274 VBS XX(232)=470:YY(232)=274 VBS XX(233)=471:YY(233)=274 VBS XX(234)=455:YY(234)=275 VBS XX(235)=456:YY(235)=275 VBS XX(236)=457:YY(236)=275 VBS XX(237)=458:YY(237)=275 VBS XX(238)=468:YY(238)=275 VBS XX(239)=469:YY(239)=275 VBS XX(240)=470:YY(240)=275 VBS XX(241)=471:YY(241)=275 VBS XX(242)=472:YY(242)=275 VBS XX(243)=452:YY(243)=276 VBS XX(244)=453:YY(244)=276 VBS XX(245)=454:YY(245)=276 VBS XX(246)=455:YY(246)=276 VBS XX(247)=456:YY(247)=276 VBS XX(248)=457:YY(248)=276 VBS XX(249)=458:YY(249)=276 VBS XX(250)=459:YY(250)=276 VBS XX(251)=460:YY(251)=276 VBS XX(252)=461:YY(252)=276 VBS XX(253)=466:YY(253)=276 VBS XX(254)=467:YY(254)=276 VBS XX(255)=468:YY(255)=276 VBS XX(256)=469:YY(256)=276 VBS XX(257)=470:YY(257)=276 VBS XX(258)=471:YY(258)=276 VBS XX(259)=472:YY(259)=276 VBS XX(260)=473:YY(260)=276 VBS XX(261)=474:YY(261)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return K Sub L dim XX(350),YY(350) VBS XX(1)=453:YY(1)=245 VBS XX(2)=454:YY(2)=245 VBS XX(3)=455:YY(3)=245 VBS XX(4)=456:YY(4)=245 VBS XX(5)=457:YY(5)=245 VBS XX(6)=458:YY(6)=245 VBS XX(7)=459:YY(7)=245 VBS XX(8)=460:YY(8)=245 VBS XX(9)=461:YY(9)=245 VBS XX(10)=462:YY(10)=245 VBS XX(11)=456:YY(11)=246 VBS XX(12)=457:YY(12)=246 VBS XX(13)=458:YY(13)=246 VBS XX(14)=459:YY(14)=246 VBS XX(15)=456:YY(15)=247 VBS XX(16)=457:YY(16)=247 VBS XX(17)=458:YY(17)=247 VBS XX(18)=459:YY(18)=247 VBS XX(19)=456:YY(19)=248 VBS XX(20)=457:YY(20)=248 VBS XX(21)=458:YY(21)=248 VBS XX(22)=459:YY(22)=248 VBS XX(23)=456:YY(23)=249 VBS XX(24)=457:YY(24)=249 VBS XX(25)=458:YY(25)=249 VBS XX(26)=459:YY(26)=249 VBS XX(27)=456:YY(27)=250 VBS XX(28)=457:YY(28)=250 VBS XX(29)=458:YY(29)=250 VBS XX(30)=459:YY(30)=250 VBS XX(31)=456:YY(31)=251 VBS XX(32)=457:YY(32)=251 VBS XX(33)=458:YY(33)=251 VBS XX(34)=459:YY(34)=251