VBS XX(238)=471:YY(238)=271
VBS XX(239)=454:YY(239)=272
VBS XX(240)=455:YY(240)=272
VBS XX(241)=456:YY(241)=272
VBS XX(242)=457:YY(242)=272
VBS XX(243)=468:YY(243)=272
VBS XX(244)=469:YY(244)=272
VBS XX(245)=470:YY(245)=272
VBS XX(246)=471:YY(246)=272
VBS XX(247)=454:YY(247)=273
VBS XX(248)=455:YY(248)=273
VBS XX(249)=456:YY(249)=273
VBS XX(250)=457:YY(250)=273
VBS XX(251)=468:YY(251)=273
VBS XX(252)=469:YY(252)=273
VBS XX(253)=470:YY(253)=273
VBS XX(254)=471:YY(254)=273
VBS XX(255)=454:YY(255)=274
VBS XX(256)=455:YY(256)=274
VBS XX(257)=456:YY(257)=274
VBS XX(258)=457:YY(258)=274
VBS XX(259)=468:YY(259)=274
VBS XX(260)=469:YY(260)=274
VBS XX(261)=470:YY(261)=274
VBS XX(262)=471:YY(262)=274
VBS XX(263)=454:YY(263)=275
VBS XX(264)=455:YY(264)=275
VBS XX(265)=456:YY(265)=275
VBS XX(266)=457:YY(266)=275
VBS XX(267)=468:YY(267)=275
VBS XX(268)=469:YY(268)=275
VBS XX(269)=470:YY(269)=275
VBS XX(270)=471:YY(270)=275
VBS XX(271)=451:YY(271)=276
VBS XX(272)=452:YY(272)=276
VBS XX(273)=453:YY(273)=276
VBS XX(274)=454:YY(274)=276
VBS XX(275)=455:YY(275)=276
VBS XX(276)=456:YY(276)=276
VBS XX(277)=457:YY(277)=276
VBS XX(278)=458:YY(278)=276
VBS XX(279)=459:YY(279)=276
VBS XX(280)=460:YY(280)=276
VBS XX(281)=465:YY(281)=276
VBS XX(282)=466:YY(282)=276
VBS XX(283)=467:YY(283)=276
VBS XX(284)=468:YY(284)=276
VBS XX(285)=469:YY(285)=276
VBS XX(286)=470:YY(286)=276
VBS XX(287)=471:YY(287)=276
VBS XX(288)=472:YY(288)=276
VBS XX(289)=473:YY(289)=276
VBS XX(290)=474:YY(290)=276
Gosub 旋转
Gosub 缩小
Gosub 提取
Return H
Sub I
dim XX(350),YY(350)
VBS XX(1)=456:YY(1)=245
VBS XX(2)=457:YY(2)=245
VBS XX(3)=458:YY(3)=245
VBS XX(4)=459:YY(4)=245
VBS XX(5)=460:YY(5)=245
VBS XX(6)=461:YY(6)=245
VBS XX(7)=462:YY(7)=245
VBS XX(8)=463:YY(8)=245
VBS XX(9)=464:YY(9)=245
VBS XX(10)=465:YY(10)=245
VBS XX(11)=466:YY(11)=245
VBS XX(12)=467:YY(12)=245
VBS XX(13)=468:YY(13)=245
VBS XX(14)=469:YY(14)=245
VBS XX(15)=470:YY(15)=245
VBS XX(16)=471:YY(16)=245
VBS XX(17)=462:YY(17)=246
VBS XX(18)=463:YY(18)=246
VBS XX(19)=464:YY(19)=246
VBS XX(20)=465:YY(20)=246
VBS XX(21)=462:YY(21)=247
VBS XX(22)=463:YY(22)=247
VBS XX(23)=464:YY(23)=247
VBS XX(24)=465:YY(24)=247
VBS XX(25)=462:YY(25)=248
VBS XX(26)=463:YY(26)=248
VBS XX(27)=464:YY(27)=248
VBS XX(28)=465:YY(28)=248
VBS XX(29)=462:YY(29)=249
VBS XX(30)=463:YY(30)=249
VBS XX(31)=464:YY(31)=249
VBS XX(32)=465:YY(32)=249
VBS XX(33)=462:YY(33)=250
VBS XX(34)=463:YY(34)=250
VBS XX(35)=464:YY(35)=250
VBS XX(36)=465:YY(36)=250
VBS XX(37)=462:YY(37)=251
VBS XX(38)=463:YY(38)=251
VBS XX(39)=464:YY(39)=251
VBS XX(40)=465:YY(40)=251
VBS XX(41)=462:YY(41)=252