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