VBS XX(172)=459:YY(172)=275
    VBS XX(173)=460:YY(173)=275
    VBS XX(174)=461:YY(174)=275
    VBS XX(175)=466:YY(175)=275
    VBS XX(176)=467:YY(176)=275
    VBS XX(177)=468:YY(177)=275
    VBS XX(178)=461:YY(178)=276
    VBS XX(179)=462:YY(179)=276
    VBS XX(180)=463:YY(180)=276
    VBS XX(181)=464:YY(181)=276
    VBS XX(182)=465:YY(182)=276
    VBS XX(183)=466:YY(183)=276
    Gosub 旋转
    Gosub 缩小
    Gosub 提取
Return O
Sub P
    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)=455:YY(17)=246
    VBS XX(18)=456:YY(18)=246
    VBS XX(19)=457:YY(19)=246
    VBS XX(20)=458:YY(20)=246
    VBS XX(21)=466:YY(21)=246
    VBS XX(22)=467:YY(22)=246
    VBS XX(23)=468:YY(23)=246
    VBS XX(24)=469:YY(24)=246
    VBS XX(25)=455:YY(25)=247
    VBS XX(26)=456:YY(26)=247
    VBS XX(27)=457:YY(27)=247
    VBS XX(28)=458:YY(28)=247
    VBS XX(29)=468:YY(29)=247
    VBS XX(30)=469:YY(30)=247
    VBS XX(31)=470:YY(31)=247
    VBS XX(32)=455:YY(32)=248
    VBS XX(33)=456:YY(33)=248
    VBS XX(34)=457:YY(34)=248
    VBS XX(35)=458:YY(35)=248
    VBS XX(36)=469:YY(36)=248
    VBS XX(37)=470:YY(37)=248
    VBS XX(38)=471:YY(38)=248
    VBS XX(39)=455:YY(39)=249
    VBS XX(40)=456:YY(40)=249
    VBS XX(41)=457:YY(41)=249
    VBS XX(42)=458:YY(42)=249
    VBS XX(43)=470:YY(43)=249
    VBS XX(44)=471:YY(44)=249
    VBS XX(45)=472:YY(45)=249
    VBS XX(46)=455:YY(46)=250
    VBS XX(47)=456:YY(47)=250
    VBS XX(48)=457:YY(48)=250
    VBS XX(49)=458:YY(49)=250
    VBS XX(50)=470:YY(50)=250
    VBS XX(51)=471:YY(51)=250
    VBS XX(52)=472:YY(52)=250
    VBS XX(53)=455:YY(53)=251
    VBS XX(54)=456:YY(54)=251
    VBS XX(55)=457:YY(55)=251
    VBS XX(56)=458:YY(56)=251
    VBS XX(57)=470:YY(57)=251
    VBS XX(58)=471:YY(58)=251
    VBS XX(59)=472:YY(59)=251
    VBS XX(60)=455:YY(60)=252
    VBS XX(61)=456:YY(61)=252
    VBS XX(62)=457:YY(62)=252
    VBS XX(63)=458:YY(63)=252
    VBS XX(64)=470:YY(64)=252
    VBS XX(65)=471:YY(65)=252
    VBS XX(66)=472:YY(66)=252
    VBS XX(67)=473:YY(67)=252
    VBS XX(68)=455:YY(68)=253
    VBS XX(69)=456:YY(69)=253
    VBS XX(70)=457:YY(70)=253
    VBS XX(71)=458:YY(71)=253
    VBS XX(72)=470:YY(72)=253
    VBS XX(73)=471:YY(73)=253
    VBS XX(74)=472:YY(74)=253
    VBS XX(75)=473:YY(75)=253
    VBS XX(76)=455:YY(76)=254
    VBS XX(77)=456:YY(77)=254
    VBS XX(78)=457:YY(78)=254
    VBS XX(79)=458:YY(79)=254
    VBS XX(80)=470:YY(80)=254
    VBS XX(81)=471:YY(81)=254
    VBS XX(82)=472:YY(82)=254