VBS XX(118)=468:YY(118)=268
VBS XX(119)=469:YY(119)=268
VBS XX(120)=470:YY(120)=268
VBS XX(121)=471:YY(121)=268
VBS XX(122)=454:YY(122)=269
VBS XX(123)=455:YY(123)=269
VBS XX(124)=456:YY(124)=269
VBS XX(125)=468:YY(125)=269
VBS XX(126)=469:YY(126)=269
VBS XX(127)=470:YY(127)=269
VBS XX(128)=471:YY(128)=269
VBS XX(129)=454:YY(129)=270
VBS XX(130)=455:YY(130)=270
VBS XX(131)=456:YY(131)=270
VBS XX(132)=468:YY(132)=270
VBS XX(133)=469:YY(133)=270
VBS XX(134)=470:YY(134)=270
VBS XX(135)=471:YY(135)=270
VBS XX(136)=455:YY(136)=271
VBS XX(137)=456:YY(137)=271
VBS XX(138)=468:YY(138)=271
VBS XX(139)=469:YY(139)=271
VBS XX(140)=470:YY(140)=271
VBS XX(141)=471:YY(141)=271
VBS XX(142)=455:YY(142)=272
VBS XX(143)=456:YY(143)=272
VBS XX(144)=457:YY(144)=272
VBS XX(145)=468:YY(145)=272
VBS XX(146)=469:YY(146)=272
VBS XX(147)=470:YY(147)=272
VBS XX(148)=471:YY(148)=272
VBS XX(149)=456:YY(149)=273
VBS XX(150)=457:YY(150)=273
VBS XX(151)=458:YY(151)=273
VBS XX(152)=468:YY(152)=273
VBS XX(153)=469:YY(153)=273
VBS XX(154)=470:YY(154)=273
VBS XX(155)=471:YY(155)=273
VBS XX(156)=457:YY(156)=274
VBS XX(157)=458:YY(157)=274
VBS XX(158)=468:YY(158)=274
VBS XX(159)=469:YY(159)=274
VBS XX(160)=470:YY(160)=274
VBS XX(161)=471:YY(161)=274
VBS XX(162)=458:YY(162)=275
VBS XX(163)=459:YY(163)=275
VBS XX(164)=460:YY(164)=275
VBS XX(165)=466:YY(165)=275
VBS XX(166)=467:YY(166)=275
VBS XX(167)=468:YY(167)=275
VBS XX(168)=460:YY(168)=276
VBS XX(169)=461:YY(169)=276
VBS XX(170)=462:YY(170)=276
VBS XX(171)=463:YY(171)=276
VBS XX(172)=464:YY(172)=276
VBS XX(173)=465:YY(173)=276
VBS XX(174)=466:YY(174)=276
Gosub 旋转
Gosub 缩小
Gosub 提取
Return G
Sub H
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)=465:YY(11)=245
VBS XX(12)=466:YY(12)=245
VBS XX(13)=467:YY(13)=245
VBS XX(14)=468:YY(14)=245
VBS XX(15)=469:YY(15)=245
VBS XX(16)=470:YY(16)=245
VBS XX(17)=471:YY(17)=245
VBS XX(18)=472:YY(18)=245
VBS XX(19)=473:YY(19)=245
VBS XX(20)=474:YY(20)=245
VBS XX(21)=454:YY(21)=246
VBS XX(22)=455:YY(22)=246
VBS XX(23)=456:YY(23)=246
VBS XX(24)=457:YY(24)=246
VBS XX(25)=468:YY(25)=246
VBS XX(26)=469:YY(26)=246
VBS XX(27)=470:YY(27)=246
VBS XX(28)=471:YY(28)=246
VBS XX(29)=454:YY(29)=247
VBS XX(30)=455:YY(30)=247
VBS XX(31)=456:YY(31)=247
VBS XX(32)=457:YY(32)=247
VBS XX(33)=468:YY(33)=247
VBS XX(34)=469:YY(34)=247
VBS XX(35)=470:YY(35)=247
VBS XX(36)=471:YY(36)=247
VBS XX(37)=454:YY(37)=248