VBS XX(143)=461:YY(143)=275 VBS XX(144)=462:YY(144)=275 VBS XX(145)=463:YY(145)=275 VBS XX(146)=464:YY(146)=275 VBS XX(147)=465:YY(147)=275 VBS XX(148)=466:YY(148)=275 VBS XX(149)=467:YY(149)=275 VBS XX(150)=468:YY(150)=275 VBS XX(151)=469:YY(151)=275 VBS XX(152)=470:YY(152)=275 VBS XX(153)=453:YY(153)=276 VBS XX(154)=454:YY(154)=276 VBS XX(155)=455:YY(155)=276 VBS XX(156)=456:YY(156)=276 VBS XX(157)=457:YY(157)=276 VBS XX(158)=458:YY(158)=276 VBS XX(159)=459:YY(159)=276 VBS XX(160)=460:YY(160)=276 VBS XX(161)=461:YY(161)=276 VBS XX(162)=462:YY(162)=276 VBS XX(163)=463:YY(163)=276 VBS XX(164)=464:YY(164)=276 VBS XX(165)=465:YY(165)=276 VBS XX(166)=466:YY(166)=276 VBS XX(167)=467:YY(167)=276 VBS XX(168)=468:YY(168)=276 VBS XX(169)=469:YY(169)=276 VBS XX(170)=470:YY(170)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return 2 Sub 3 dim XX(350),YY(350) VBS XX(1)=460:YY(1)=245 VBS XX(2)=461:YY(2)=245 VBS XX(3)=462:YY(3)=245 VBS XX(4)=463:YY(4)=245 VBS XX(5)=464:YY(5)=245 VBS XX(6)=465:YY(6)=245 VBS XX(7)=458:YY(7)=246 VBS XX(8)=459:YY(8)=246 VBS XX(9)=460:YY(9)=246 VBS XX(10)=465:YY(10)=246 VBS XX(11)=466:YY(11)=246 VBS XX(12)=467:YY(12)=246 VBS XX(13)=457:YY(13)=247 VBS XX(14)=458:YY(14)=247 VBS XX(15)=467:YY(15)=247 VBS XX(16)=468:YY(16)=247 VBS XX(17)=456:YY(17)=248 VBS XX(18)=457:YY(18)=248 VBS XX(19)=458:YY(19)=248 VBS XX(20)=467:YY(20)=248 VBS XX(21)=468:YY(21)=248 VBS XX(22)=469: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)=468:YY(26)=249 VBS XX(27)=469:YY(27)=249 VBS XX(28)=470:YY(28)=249 VBS XX(29)=456:YY(29)=250 VBS XX(30)=457:YY(30)=250 VBS XX(31)=458:YY(31)=250 VBS XX(32)=468:YY(32)=250 VBS XX(33)=469:YY(33)=250 VBS XX(34)=470:YY(34)=250 VBS XX(35)=455:YY(35)=251 VBS XX(36)=456:YY(36)=251 VBS XX(37)=457:YY(37)=251 VBS XX(38)=458:YY(38)=251 VBS XX(39)=468:YY(39)=251 VBS XX(40)=469:YY(40)=251 VBS XX(41)=470:YY(41)=251 VBS XX(42)=456:YY(42)=252 VBS XX(43)=457:YY(43)=252 VBS XX(44)=458:YY(44)=252 VBS XX(45)=468:YY(45)=252 VBS XX(46)=469:YY(46)=252 VBS XX(47)=470:YY(47)=252 VBS XX(48)=471:YY(48)=252 VBS XX(49)=456:YY(49)=253 VBS XX(50)=457:YY(50)=253 VBS XX(51)=458:YY(51)=253 VBS XX(52)=468:YY(52)=253 VBS XX(53)=469:YY(53)=253 VBS XX(54)=470:YY(54)=253 VBS XX(55)=471:YY(55)=253 VBS XX(56)=468:YY(56)=254 VBS XX(57)=469:YY(57)=254 VBS XX(58)=470:YY(58)=254 VBS XX(59)=468:YY(59)=255 VBS XX(60)=469:YY(60)=255 VBS XX(61)=470:YY(61)=255 VBS XX(62)=468:YY(62)=256 VBS XX(63)=469:YY(63)=256 VBS XX(64)=470:YY(64)=256 VBS XX(65)=467:YY(65)=257 VBS XX(66)=468:YY(66)=257