VBS XX(186)=457:YY(186)=270
VBS XX(187)=458:YY(187)=270
VBS XX(188)=469:YY(188)=270
VBS XX(189)=470:YY(189)=270
VBS XX(190)=471:YY(190)=270
VBS XX(191)=455:YY(191)=271
VBS XX(192)=456:YY(192)=271
VBS XX(193)=457:YY(193)=271
VBS XX(194)=458:YY(194)=271
VBS XX(195)=469:YY(195)=271
VBS XX(196)=470:YY(196)=271
VBS XX(197)=455:YY(197)=272
VBS XX(198)=456:YY(198)=272
VBS XX(199)=457:YY(199)=272
VBS XX(200)=458:YY(200)=272
VBS XX(201)=468:YY(201)=272
VBS XX(202)=469:YY(202)=272
VBS XX(203)=470:YY(203)=272
VBS XX(204)=455:YY(204)=273
VBS XX(205)=456:YY(205)=273
VBS XX(206)=457:YY(206)=273
VBS XX(207)=458:YY(207)=273
VBS XX(208)=467:YY(208)=273
VBS XX(209)=468:YY(209)=273
VBS XX(210)=469:YY(210)=273
VBS XX(211)=455:YY(211)=274
VBS XX(212)=456:YY(212)=274
VBS XX(213)=457:YY(213)=274
VBS XX(214)=458:YY(214)=274
VBS XX(215)=466:YY(215)=274
VBS XX(216)=467:YY(216)=274
VBS XX(217)=468:YY(217)=274
VBS XX(218)=455:YY(218)=275
VBS XX(219)=456:YY(219)=275
VBS XX(220)=457:YY(220)=275
VBS XX(221)=458:YY(221)=275
VBS XX(222)=464:YY(222)=275
VBS XX(223)=465:YY(223)=275
VBS XX(224)=466:YY(224)=275
VBS XX(225)=452:YY(225)=276
VBS XX(226)=453:YY(226)=276
VBS XX(227)=454:YY(227)=276
VBS XX(228)=455:YY(228)=276
VBS XX(229)=456:YY(229)=276
VBS XX(230)=457:YY(230)=276
VBS XX(231)=458:YY(231)=276
VBS XX(232)=459:YY(232)=276
VBS XX(233)=460:YY(233)=276
VBS XX(234)=461:YY(234)=276
VBS XX(235)=462:YY(235)=276
VBS XX(236)=463:YY(236)=276
VBS XX(237)=464:YY(237)=276
Gosub 旋转
Gosub 缩小
Gosub 提取
Return D
Sub E
dim XX(350),YY(350)
VBS XX(1)=452:YY(1)=245
VBS XX(2)=453:YY(2)=245
VBS XX(3)=454:YY(3)=245
VBS XX(4)=455:YY(4)=245
VBS XX(5)=456:YY(5)=245
VBS XX(6)=457:YY(6)=245
VBS XX(7)=458:YY(7)=245
VBS XX(8)=459:YY(8)=245
VBS XX(9)=460:YY(9)=245
VBS XX(10)=461:YY(10)=245
VBS XX(11)=462:YY(11)=245
VBS XX(12)=463:YY(12)=245
VBS XX(13)=464:YY(13)=245
VBS XX(14)=465:YY(14)=245
VBS XX(15)=466:YY(15)=245
VBS XX(16)=467:YY(16)=245
VBS XX(17)=468:YY(17)=245
VBS XX(18)=469:YY(18)=245
VBS XX(19)=470:YY(19)=245
VBS XX(20)=455:YY(20)=246
VBS XX(21)=456:YY(21)=246
VBS XX(22)=457:YY(22)=246
VBS XX(23)=458:YY(23)=246
VBS XX(24)=467: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)=455:YY(28)=247
VBS XX(29)=456:YY(29)=247
VBS XX(30)=457:YY(30)=247
VBS XX(31)=458:YY(31)=247
VBS XX(32)=469:YY(32)=247
VBS XX(33)=470:YY(33)=247
VBS XX(34)=455:YY(34)=248
VBS XX(35)=456:YY(35)=248
VBS XX(36)=457:YY(36)=248
VBS XX(37)=458:YY(37)=248
VBS XX(38)=469:YY(38)=248
VBS XX(39)=470:YY(39)=248
VBS XX(40)=471:YY(40)=248
VBS XX(41)=455:YY(41)=249
VBS XX(42)=456:YY(42)=249