VBS XX(183)=458:YY(183)=272
    VBS XX(184)=455:YY(184)=273
    VBS XX(185)=456:YY(185)=273
    VBS XX(186)=457:YY(186)=273
    VBS XX(187)=458:YY(187)=273
    VBS XX(188)=455:YY(188)=274
    VBS XX(189)=456:YY(189)=274
    VBS XX(190)=457:YY(190)=274
    VBS XX(191)=458:YY(191)=274
    VBS XX(192)=455:YY(192)=275
    VBS XX(193)=456:YY(193)=275
    VBS XX(194)=457:YY(194)=275
    VBS XX(195)=458:YY(195)=275
    VBS XX(196)=452:YY(196)=276
    VBS XX(197)=453:YY(197)=276
    VBS XX(198)=454:YY(198)=276
    VBS XX(199)=455:YY(199)=276
    VBS XX(200)=456:YY(200)=276
    VBS XX(201)=457:YY(201)=276
    VBS XX(202)=458:YY(202)=276
    VBS XX(203)=459:YY(203)=276
    VBS XX(204)=460:YY(204)=276
    VBS XX(205)=461:YY(205)=276
    Gosub 旋转
    Gosub 缩小
    Gosub 提取
Return P
Sub Q
    dim XX(350),YY(350)
    VBS XX(1)=461:YY(1)=245
    VBS XX(2)=462:YY(2)=245
    VBS XX(3)=463:YY(3)=245
    VBS XX(4)=464:YY(4)=245
    VBS XX(5)=465:YY(5)=245
    VBS XX(6)=466:YY(6)=245
    VBS XX(7)=459:YY(7)=246
    VBS XX(8)=460:YY(8)=246
    VBS XX(9)=461:YY(9)=246
    VBS XX(10)=466:YY(10)=246
    VBS XX(11)=467:YY(11)=246
    VBS XX(12)=468:YY(12)=246
    VBS XX(13)=458:YY(13)=247
    VBS XX(14)=459:YY(14)=247
    VBS XX(15)=468:YY(15)=247
    VBS XX(16)=469:YY(16)=247
    VBS XX(17)=457:YY(17)=248
    VBS XX(18)=458:YY(18)=248
    VBS XX(19)=469:YY(19)=248
    VBS XX(20)=470:YY(20)=248
    VBS XX(21)=456:YY(21)=249
    VBS XX(22)=457:YY(22)=249
    VBS XX(23)=458:YY(23)=249
    VBS XX(24)=470:YY(24)=249
    VBS XX(25)=471:YY(25)=249
    VBS XX(26)=456:YY(26)=250
    VBS XX(27)=457:YY(27)=250
    VBS XX(28)=470:YY(28)=250
    VBS XX(29)=471:YY(29)=250
    VBS XX(30)=455:YY(30)=251
    VBS XX(31)=456:YY(31)=251
    VBS XX(32)=457:YY(32)=251
    VBS XX(33)=470:YY(33)=251
    VBS XX(34)=471:YY(34)=251
    VBS XX(35)=472:YY(35)=251
    VBS XX(36)=455:YY(36)=252
    VBS XX(37)=456:YY(37)=252
    VBS XX(38)=471:YY(38)=252
    VBS XX(39)=472:YY(39)=252
    VBS XX(40)=454:YY(40)=253
    VBS XX(41)=455:YY(41)=253
    VBS XX(42)=456:YY(42)=253
    VBS XX(43)=471:YY(43)=253
    VBS XX(44)=472:YY(44)=253
    VBS XX(45)=473:YY(45)=253
    VBS XX(46)=454:YY(46)=254
    VBS XX(47)=455:YY(47)=254
    VBS XX(48)=456:YY(48)=254
    VBS XX(49)=471:YY(49)=254
    VBS XX(50)=472:YY(50)=254
    VBS XX(51)=473:YY(51)=254
    VBS XX(52)=454:YY(52)=255
    VBS XX(53)=455:YY(53)=255
    VBS XX(54)=456:YY(54)=255
    VBS XX(55)=471:YY(55)=255
    VBS XX(56)=472:YY(56)=255
    VBS XX(57)=473:YY(57)=255
    VBS XX(58)=454:YY(58)=256
    VBS XX(59)=455:YY(59)=256
    VBS XX(60)=456:YY(60)=256
    VBS XX(61)=471:YY(61)=256
    VBS XX(62)=472:YY(62)=256
    VBS XX(63)=473:YY(63)=256
    VBS XX(64)=454:YY(64)=257
    VBS XX(65)=455:YY(65)=257
    VBS XX(66)=456:YY(66)=257
    VBS XX(67)=471:YY(67)=257
    VBS XX(68)=472:YY(68)=257
    VBS XX(69)=473:YY(69)=257
    VBS XX(70)=453:YY(70)=258
    VBS XX(71)=454:YY(71)=258