VBS XX(89)=462:YY(89)=267
VBS XX(90)=463:YY(90)=267
VBS XX(91)=464:YY(91)=267
VBS XX(92)=465:YY(92)=267
VBS XX(93)=462:YY(93)=268
VBS XX(94)=463:YY(94)=268
VBS XX(95)=464:YY(95)=268
VBS XX(96)=465:YY(96)=268
VBS XX(97)=462:YY(97)=269
VBS XX(98)=463:YY(98)=269
VBS XX(99)=464:YY(99)=269
VBS XX(100)=465:YY(100)=269
VBS XX(101)=462:YY(101)=270
VBS XX(102)=463:YY(102)=270
VBS XX(103)=464:YY(103)=270
VBS XX(104)=465:YY(104)=270
VBS XX(105)=462:YY(105)=271
VBS XX(106)=463:YY(106)=271
VBS XX(107)=464:YY(107)=271
VBS XX(108)=465:YY(108)=271
VBS XX(109)=462:YY(109)=272
VBS XX(110)=463:YY(110)=272
VBS XX(111)=464:YY(111)=272
VBS XX(112)=465:YY(112)=272
VBS XX(113)=462:YY(113)=273
VBS XX(114)=463:YY(114)=273
VBS XX(115)=464:YY(115)=273
VBS XX(116)=465:YY(116)=273
VBS XX(117)=462:YY(117)=274
VBS XX(118)=463:YY(118)=274
VBS XX(119)=464:YY(119)=274
VBS XX(120)=465:YY(120)=274
VBS XX(121)=461:YY(121)=275
VBS XX(122)=462:YY(122)=275
VBS XX(123)=463:YY(123)=275
VBS XX(124)=464:YY(124)=275
VBS XX(125)=465:YY(125)=275
VBS XX(126)=466:YY(126)=275
VBS XX(127)=457:YY(127)=276
VBS XX(128)=458:YY(128)=276
VBS XX(129)=459:YY(129)=276
VBS XX(130)=460:YY(130)=276
VBS XX(131)=461:YY(131)=276
VBS XX(132)=462:YY(132)=276
VBS XX(133)=463:YY(133)=276
VBS XX(134)=464:YY(134)=276
VBS XX(135)=465:YY(135)=276
VBS XX(136)=466:YY(136)=276
VBS XX(137)=467:YY(137)=276
VBS XX(138)=468:YY(138)=276
VBS XX(139)=469:YY(139)=276
VBS XX(140)=470:YY(140)=276
Gosub 旋转
Gosub 缩小
Gosub 提取
Return 1
Sub 2
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)=466:YY(7)=245
VBS XX(8)=458:YY(8)=246
VBS XX(9)=459: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)=468:YY(13)=246
VBS XX(14)=457:YY(14)=247
VBS XX(15)=458:YY(15)=247
VBS XX(16)=467:YY(16)=247
VBS XX(17)=468:YY(17)=247
VBS XX(18)=469:YY(18)=247
VBS XX(19)=456:YY(19)=248
VBS XX(20)=457:YY(20)=248
VBS XX(21)=467:YY(21)=248
VBS XX(22)=468:YY(22)=248
VBS XX(23)=469:YY(23)=248
VBS XX(24)=455:YY(24)=249
VBS XX(25)=456: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)=455:YY(29)=250
VBS XX(30)=456:YY(30)=250
VBS XX(31)=468:YY(31)=250
VBS XX(32)=469:YY(32)=250
VBS XX(33)=470:YY(33)=250
VBS XX(34)=455:YY(34)=251
VBS XX(35)=456:YY(35)=251
VBS XX(36)=468:YY(36)=251
VBS XX(37)=469:YY(37)=251
VBS XX(38)=470:YY(38)=251
VBS XX(39)=454:YY(39)=252
VBS XX(40)=455:YY(40)=252
VBS XX(41)=456:YY(41)=252
VBS XX(42)=457:YY(42)=252