VBS XX(135)=471:YY(135)=274 VBS XX(136)=472:YY(136)=274 VBS XX(137)=456:YY(137)=275 VBS XX(138)=457:YY(138)=275 VBS XX(139)=458:YY(139)=275 VBS XX(140)=459:YY(140)=275 VBS XX(141)=469:YY(141)=275 VBS XX(142)=470:YY(142)=275 VBS XX(143)=471:YY(143)=275 VBS XX(144)=472:YY(144)=275 VBS XX(145)=453:YY(145)=276 VBS XX(146)=454:YY(146)=276 VBS XX(147)=455:YY(147)=276 VBS XX(148)=456:YY(148)=276 VBS XX(149)=457:YY(149)=276 VBS XX(150)=458:YY(150)=276 VBS XX(151)=459:YY(151)=276 VBS XX(152)=460:YY(152)=276 VBS XX(153)=461:YY(153)=276 VBS XX(154)=462:YY(154)=276 VBS XX(155)=463:YY(155)=276 VBS XX(156)=464:YY(156)=276 VBS XX(157)=465:YY(157)=276 VBS XX(158)=466:YY(158)=276 VBS XX(159)=467:YY(159)=276 VBS XX(160)=468:YY(160)=276 VBS XX(161)=469:YY(161)=276 VBS XX(162)=470:YY(162)=276 VBS XX(163)=471:YY(163)=276 VBS XX(164)=472:YY(164)=276 Gosub 旋转 Gosub 缩小 Gosub 提取 Return L Sub M 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)=468:YY(8)=245 VBS XX(9)=469:YY(9)=245 VBS XX(10)=470:YY(10)=245 VBS XX(11)=471:YY(11)=245 VBS XX(12)=472:YY(12)=245 VBS XX(13)=473:YY(13)=245 VBS XX(14)=474:YY(14)=245 VBS XX(15)=475:YY(15)=245 VBS XX(16)=454:YY(16)=246 VBS XX(17)=455:YY(17)=246 VBS XX(18)=456:YY(18)=246 VBS XX(19)=457:YY(19)=246 VBS XX(20)=468:YY(20)=246 VBS XX(21)=469:YY(21)=246 VBS XX(22)=470:YY(22)=246 VBS XX(23)=471:YY(23)=246 VBS XX(24)=472: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)=468:YY(29)=247 VBS XX(30)=469:YY(30)=247 VBS XX(31)=470:YY(31)=247 VBS XX(32)=471:YY(32)=247 VBS XX(33)=472:YY(33)=247 VBS XX(34)=454:YY(34)=248 VBS XX(35)=455:YY(35)=248 VBS XX(36)=456:YY(36)=248 VBS XX(37)=457:YY(37)=248 VBS XX(38)=458:YY(38)=248 VBS XX(39)=467:YY(39)=248 VBS XX(40)=468:YY(40)=248 VBS XX(41)=469:YY(41)=248 VBS XX(42)=470:YY(42)=248 VBS XX(43)=471:YY(43)=248 VBS XX(44)=472:YY(44)=248 VBS XX(45)=454:YY(45)=249 VBS XX(46)=455:YY(46)=249 VBS XX(47)=456:YY(47)=249 VBS XX(48)=457:YY(48)=249 VBS XX(49)=458:YY(49)=249 VBS XX(50)=467:YY(50)=249 VBS XX(51)=468:YY(51)=249 VBS XX(52)=469:YY(52)=249 VBS XX(53)=470:YY(53)=249 VBS XX(54)=471:YY(54)=249 VBS XX(55)=472:YY(55)=249 VBS XX(56)=454:YY(56)=250 VBS XX(57)=455:YY(57)=250 VBS XX(58)=456:YY(58)=250 VBS XX(59)=457:YY(59)=250 VBS XX(60)=458:YY(60)=250 VBS XX(61)=467:YY(61)=250 VBS XX(62)=468:YY(62)=250 VBS XX(63)=469:YY(63)=250 VBS XX(64)=470:YY(64)=250