VBS XX(212)=456:YY(212)=273 VBS XX(213)=470:YY(213)=273 VBS XX(214)=471:YY(214)=273 VBS XX(215)=472:YY(215)=273 VBS XX(216)=455:YY(216)=274 VBS XX(217)=456:YY(217)=274 VBS XX(218)=470:YY(218)=274 VBS XX(219)=471:YY(219)=274 VBS XX(220)=472:YY(220)=274 VBS XX(221)=455:YY(221)=275 VBS XX(222)=456:YY(222)=275 VBS XX(223)=471:YY(223)=275 VBS XX(224)=472:YY(224)=275 VBS XX(225)=452:YY(225)=276 VBS XX(226)=453:YY(226)=276 VBS XX(227)=454:YY(227)=276 VBS XX(228)=455:YY(228)=276 VBS XX(229)=456:YY(229)=276 VBS XX(230)=457:YY(230)=276 VBS XX(231)=458:YY(231)=276 VBS XX(232)=459:YY(232)=276 VBS XX(233)=471:YY(233)=276 VBS XX(234)=472:YY(234)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return N Sub O dim XX(350),YY(350) VBS XX(1)=461:YY(1)=245 VBS XX(2)=462:YY(2)=245 VBS XX(3)=463:YY(3)=245 VBS XX(4)=464:YY(4)=245 VBS XX(5)=465:YY(5)=245 VBS XX(6)=466:YY(6)=245 VBS XX(7)=459:YY(7)=246 VBS XX(8)=460:YY(8)=246 VBS XX(9)=461:YY(9)=246 VBS XX(10)=466:YY(10)=246 VBS XX(11)=467:YY(11)=246 VBS XX(12)=468:YY(12)=246 VBS XX(13)=458:YY(13)=247 VBS XX(14)=459:YY(14)=247 VBS XX(15)=468:YY(15)=247 VBS XX(16)=469:YY(16)=247 VBS XX(17)=457:YY(17)=248 VBS XX(18)=458:YY(18)=248 VBS XX(19)=469:YY(19)=248 VBS XX(20)=470:YY(20)=248 VBS XX(21)=456:YY(21)=249 VBS XX(22)=457:YY(22)=249 VBS XX(23)=458:YY(23)=249 VBS XX(24)=469:YY(24)=249 VBS XX(25)=470:YY(25)=249 VBS XX(26)=471:YY(26)=249 VBS XX(27)=456:YY(27)=250 VBS XX(28)=457:YY(28)=250 VBS XX(29)=470:YY(29)=250 VBS XX(30)=471: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)=470:YY(34)=251 VBS XX(35)=471:YY(35)=251 VBS XX(36)=472:YY(36)=251 VBS XX(37)=455:YY(37)=252 VBS XX(38)=456:YY(38)=252 VBS XX(39)=471:YY(39)=252 VBS XX(40)=472:YY(40)=252 VBS XX(41)=454:YY(41)=253 VBS XX(42)=455:YY(42)=253 VBS XX(43)=456:YY(43)=253 VBS XX(44)=471:YY(44)=253 VBS XX(45)=472:YY(45)=253 VBS XX(46)=454:YY(46)=254 VBS XX(47)=455:YY(47)=254 VBS XX(48)=456:YY(48)=254 VBS XX(49)=471:YY(49)=254 VBS XX(50)=472:YY(50)=254 VBS XX(51)=473:YY(51)=254 VBS XX(52)=454:YY(52)=255 VBS XX(53)=455:YY(53)=255 VBS XX(54)=456:YY(54)=255 VBS XX(55)=471:YY(55)=255 VBS XX(56)=472:YY(56)=255 VBS XX(57)=473:YY(57)=255 VBS XX(58)=454:YY(58)=256 VBS XX(59)=455:YY(59)=256 VBS XX(60)=456:YY(60)=256 VBS XX(61)=471:YY(61)=256 VBS XX(62)=472:YY(62)=256 VBS XX(63)=473:YY(63)=256 VBS XX(64)=454:YY(64)=257 VBS XX(65)=455:YY(65)=257 VBS XX(66)=456:YY(66)=257 VBS XX(67)=471:YY(67)=257 VBS XX(68)=472:YY(68)=257 VBS XX(69)=473:YY(69)=257 VBS XX(70)=453:YY(70)=258 VBS XX(71)=454:YY(71)=258