VBS XX(198)=470:YY(198)=270
VBS XX(199)=471:YY(199)=270
VBS XX(200)=472:YY(200)=270
VBS XX(201)=455:YY(201)=271
VBS XX(202)=456:YY(202)=271
VBS XX(203)=457:YY(203)=271
VBS XX(204)=458:YY(204)=271
VBS XX(205)=470:YY(205)=271
VBS XX(206)=471:YY(206)=271
VBS XX(207)=472:YY(207)=271
VBS XX(208)=455:YY(208)=272
VBS XX(209)=456:YY(209)=272
VBS XX(210)=457:YY(210)=272
VBS XX(211)=458:YY(211)=272
VBS XX(212)=470:YY(212)=272
VBS XX(213)=471:YY(213)=272
VBS XX(214)=472:YY(214)=272
VBS XX(215)=455:YY(215)=273
VBS XX(216)=456:YY(216)=273
VBS XX(217)=457:YY(217)=273
VBS XX(218)=458:YY(218)=273
VBS XX(219)=469:YY(219)=273
VBS XX(220)=470:YY(220)=273
VBS XX(221)=471:YY(221)=273
VBS XX(222)=455:YY(222)=274
VBS XX(223)=456:YY(223)=274
VBS XX(224)=457:YY(224)=274
VBS XX(225)=458:YY(225)=274
VBS XX(226)=468:YY(226)=274
VBS XX(227)=469:YY(227)=274
VBS XX(228)=470:YY(228)=274
VBS XX(229)=455:YY(229)=275
VBS XX(230)=456:YY(230)=275
VBS XX(231)=457:YY(231)=275
VBS XX(232)=458:YY(232)=275
VBS XX(233)=466:YY(233)=275
VBS XX(234)=467:YY(234)=275
VBS XX(235)=468:YY(235)=275
VBS XX(236)=469:YY(236)=275
VBS XX(237)=452:YY(237)=276
VBS XX(238)=453:YY(238)=276
VBS XX(239)=454:YY(239)=276
VBS XX(240)=455:YY(240)=276
VBS XX(241)=456:YY(241)=276
VBS XX(242)=457:YY(242)=276
VBS XX(243)=458:YY(243)=276
VBS XX(244)=459:YY(244)=276
VBS XX(245)=460:YY(245)=276
VBS XX(246)=461:YY(246)=276
VBS XX(247)=462:YY(247)=276
VBS XX(248)=463:YY(248)=276
VBS XX(249)=464:YY(249)=276
VBS XX(250)=465:YY(250)=276
VBS XX(251)=466:YY(251)=276
VBS XX(252)=467:YY(252)=276
Gosub 旋转
Gosub 缩小
Gosub 提取
Return B
Sub C
dim XX(350),YY(350)
VBS XX(1)=462:YY(1)=245
VBS XX(2)=463:YY(2)=245
VBS XX(3)=464:YY(3)=245
VBS XX(4)=465:YY(4)=245
VBS XX(5)=466:YY(5)=245
VBS XX(6)=467:YY(6)=245
VBS XX(7)=468:YY(7)=245
VBS XX(8)=460:YY(8)=246
VBS XX(9)=461:YY(9)=246
VBS XX(10)=462:YY(10)=246
VBS XX(11)=468:YY(11)=246
VBS XX(12)=469:YY(12)=246
VBS XX(13)=470:YY(13)=246
VBS XX(14)=471:YY(14)=246
VBS XX(15)=472:YY(15)=246
VBS XX(16)=459:YY(16)=247
VBS XX(17)=460:YY(17)=247
VBS XX(18)=470:YY(18)=247
VBS XX(19)=471:YY(19)=247
VBS XX(20)=472:YY(20)=247
VBS XX(21)=458:YY(21)=248
VBS XX(22)=459:YY(22)=248
VBS XX(23)=471:YY(23)=248
VBS XX(24)=472:YY(24)=248
VBS XX(25)=473:YY(25)=248
VBS XX(26)=457:YY(26)=249
VBS XX(27)=458:YY(27)=249
VBS XX(28)=471:YY(28)=249
VBS XX(29)=472:YY(29)=249
VBS XX(30)=473:YY(30)=249
VBS XX(31)=456:YY(31)=250
VBS XX(32)=457:YY(32)=250
VBS XX(33)=458:YY(33)=250
VBS XX(34)=472:YY(34)=250
VBS XX(35)=473:YY(35)=250
VBS XX(36)=456:YY(36)=251
VBS XX(37)=457:YY(37)=251
VBS XX(38)=472:YY(38)=251
VBS XX(39)=473:YY(39)=251