VBS XX(169)=466:YY(169)=276 VBS XX(170)=467:YY(170)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return T Sub U dim XX(350),YY(350) VBS XX(1)=451:YY(1)=245 VBS XX(2)=452:YY(2)=245 VBS XX(3)=453:YY(3)=245 VBS XX(4)=454:YY(4)=245 VBS XX(5)=455:YY(5)=245 VBS XX(6)=456:YY(6)=245 VBS XX(7)=457:YY(7)=245 VBS XX(8)=458:YY(8)=245 VBS XX(9)=459:YY(9)=245 VBS XX(10)=460:YY(10)=245 VBS XX(11)=467:YY(11)=245 VBS XX(12)=468:YY(12)=245 VBS XX(13)=469:YY(13)=245 VBS XX(14)=470:YY(14)=245 VBS XX(15)=471:YY(15)=245 VBS XX(16)=472:YY(16)=245 VBS XX(17)=473:YY(17)=245 VBS XX(18)=474:YY(18)=245 VBS XX(19)=454:YY(19)=246 VBS XX(20)=455:YY(20)=246 VBS XX(21)=456:YY(21)=246 VBS XX(22)=457:YY(22)=246 VBS XX(23)=470:YY(23)=246 VBS XX(24)=471:YY(24)=246 VBS XX(25)=454:YY(25)=247 VBS XX(26)=455:YY(26)=247 VBS XX(27)=456:YY(27)=247 VBS XX(28)=457:YY(28)=247 VBS XX(29)=470:YY(29)=247 VBS XX(30)=471:YY(30)=247 VBS XX(31)=454:YY(31)=248 VBS XX(32)=455:YY(32)=248 VBS XX(33)=456:YY(33)=248 VBS XX(34)=457:YY(34)=248 VBS XX(35)=470:YY(35)=248 VBS XX(36)=471:YY(36)=248 VBS XX(37)=454:YY(37)=249 VBS XX(38)=455:YY(38)=249 VBS XX(39)=456:YY(39)=249 VBS XX(40)=457:YY(40)=249 VBS XX(41)=470:YY(41)=249 VBS XX(42)=471:YY(42)=249 VBS XX(43)=454:YY(43)=250 VBS XX(44)=455:YY(44)=250 VBS XX(45)=456:YY(45)=250 VBS XX(46)=457:YY(46)=250 VBS XX(47)=470:YY(47)=250 VBS XX(48)=471:YY(48)=250 VBS XX(49)=454:YY(49)=251 VBS XX(50)=455:YY(50)=251 VBS XX(51)=456:YY(51)=251 VBS XX(52)=457:YY(52)=251 VBS XX(53)=470:YY(53)=251 VBS XX(54)=471:YY(54)=251 VBS XX(55)=454:YY(55)=252 VBS XX(56)=455:YY(56)=252 VBS XX(57)=456:YY(57)=252 VBS XX(58)=457:YY(58)=252 VBS XX(59)=470:YY(59)=252 VBS XX(60)=471:YY(60)=252 VBS XX(61)=454:YY(61)=253 VBS XX(62)=455:YY(62)=253 VBS XX(63)=456:YY(63)=253 VBS XX(64)=457:YY(64)=253 VBS XX(65)=470:YY(65)=253 VBS XX(66)=471:YY(66)=253 VBS XX(67)=454:YY(67)=254 VBS XX(68)=455:YY(68)=254 VBS XX(69)=456:YY(69)=254 VBS XX(70)=457:YY(70)=254 VBS XX(71)=470:YY(71)=254 VBS XX(72)=471:YY(72)=254 VBS XX(73)=454:YY(73)=255 VBS XX(74)=455:YY(74)=255 VBS XX(75)=456:YY(75)=255 VBS XX(76)=457:YY(76)=255 VBS XX(77)=470:YY(77)=255 VBS XX(78)=471:YY(78)=255 VBS XX(79)=454:YY(79)=256 VBS XX(80)=455:YY(80)=256 VBS XX(81)=456:YY(81)=256 VBS XX(82)=457:YY(82)=256 VBS XX(83)=470:YY(83)=256 VBS XX(84)=471:YY(84)=256 VBS XX(85)=454:YY(85)=257 VBS XX(86)=455:YY(86)=257 VBS XX(87)=456:YY(87)=257 VBS XX(88)=457:YY(88)=257 VBS XX(89)=470:YY(89)=257 VBS XX(90)=471:YY(90)=257 VBS XX(91)=454:YY(91)=258 VBS XX(92)=455:YY(92)=258