VBS XX(198)=470:YY(198)=270 VBS XX(199)=471:YY(199)=270 VBS XX(200)=472:YY(200)=270 VBS XX(201)=455:YY(201)=271 VBS XX(202)=456:YY(202)=271 VBS XX(203)=457:YY(203)=271 VBS XX(204)=458:YY(204)=271 VBS XX(205)=470:YY(205)=271 VBS XX(206)=471:YY(206)=271 VBS XX(207)=472:YY(207)=271 VBS XX(208)=455:YY(208)=272 VBS XX(209)=456:YY(209)=272 VBS XX(210)=457:YY(210)=272 VBS XX(211)=458:YY(211)=272 VBS XX(212)=470:YY(212)=272 VBS XX(213)=471:YY(213)=272 VBS XX(214)=472:YY(214)=272 VBS XX(215)=455:YY(215)=273 VBS XX(216)=456:YY(216)=273 VBS XX(217)=457:YY(217)=273 VBS XX(218)=458:YY(218)=273 VBS XX(219)=469:YY(219)=273 VBS XX(220)=470:YY(220)=273 VBS XX(221)=471:YY(221)=273 VBS XX(222)=455:YY(222)=274 VBS XX(223)=456:YY(223)=274 VBS XX(224)=457:YY(224)=274 VBS XX(225)=458:YY(225)=274 VBS XX(226)=468:YY(226)=274 VBS XX(227)=469:YY(227)=274 VBS XX(228)=470:YY(228)=274 VBS XX(229)=455:YY(229)=275 VBS XX(230)=456:YY(230)=275 VBS XX(231)=457:YY(231)=275 VBS XX(232)=458:YY(232)=275 VBS XX(233)=466:YY(233)=275 VBS XX(234)=467:YY(234)=275 VBS XX(235)=468:YY(235)=275 VBS XX(236)=469:YY(236)=275 VBS XX(237)=452:YY(237)=276 VBS XX(238)=453:YY(238)=276 VBS XX(239)=454:YY(239)=276 VBS XX(240)=455:YY(240)=276 VBS XX(241)=456:YY(241)=276 VBS XX(242)=457:YY(242)=276 VBS XX(243)=458:YY(243)=276 VBS XX(244)=459:YY(244)=276 VBS XX(245)=460:YY(245)=276 VBS XX(246)=461:YY(246)=276 VBS XX(247)=462:YY(247)=276 VBS XX(248)=463:YY(248)=276 VBS XX(249)=464:YY(249)=276 VBS XX(250)=465:YY(250)=276 VBS XX(251)=466:YY(251)=276 VBS XX(252)=467:YY(252)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return B Sub C 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)=467:YY(6)=245 VBS XX(7)=468:YY(7)=245 VBS XX(8)=460:YY(8)=246 VBS XX(9)=461:YY(9)=246 VBS XX(10)=462:YY(10)=246 VBS XX(11)=468:YY(11)=246 VBS XX(12)=469:YY(12)=246 VBS XX(13)=470:YY(13)=246 VBS XX(14)=471:YY(14)=246 VBS XX(15)=472:YY(15)=246 VBS XX(16)=459:YY(16)=247 VBS XX(17)=460:YY(17)=247 VBS XX(18)=470:YY(18)=247 VBS XX(19)=471:YY(19)=247 VBS XX(20)=472:YY(20)=247 VBS XX(21)=458:YY(21)=248 VBS XX(22)=459:YY(22)=248 VBS XX(23)=471:YY(23)=248 VBS XX(24)=472:YY(24)=248 VBS XX(25)=473:YY(25)=248 VBS XX(26)=457:YY(26)=249 VBS XX(27)=458:YY(27)=249 VBS XX(28)=471:YY(28)=249 VBS XX(29)=472:YY(29)=249 VBS XX(30)=473:YY(30)=249 VBS XX(31)=456:YY(31)=250 VBS XX(32)=457:YY(32)=250 VBS XX(33)=458:YY(33)=250 VBS XX(34)=472:YY(34)=250 VBS XX(35)=473:YY(35)=250 VBS XX(36)=456:YY(36)=251 VBS XX(37)=457:YY(37)=251 VBS XX(38)=472:YY(38)=251 VBS XX(39)=473:YY(39)=251