1000 '**************************
1010 '**  YuYu-Shiki          **
1020 '**        Yukari        **
1030 '**          Yui         **
1040 '**        Yuzuko        **
1050 '**                      **
1060 '**           2013/06/01 **
1070 '**       PC-8001mk2(j80)**
1080 '**       by AyaoriThono **
1090 '**************************
1100 WIDTH 40,25:CONSOLE 0,25,0,1
1110 CMD SCREEN 3,0,6
1120 CMD VIEW(60,0)-(259,199)
1130 '
1140 CMD CLS 3
1150 COLOR 7:LOCATE  0,11:PRINT "YUKARI"
1160         LOCATE 32,11:PRINT "YUKARI"
1170 GOSUB 1310:GOSUB 1400
1180 FOR T=0 TO 4000:NEXT
1190 CMD CLS 3
1200 COLOR 7:LOCATE  1,11:PRINT "YUI"
1210         LOCATE 33,11:PRINT "YUI"
1220 GOSUB 1310:GOSUB 4890
1230 FOR T=0 TO 4000:NEXT
1240 CMD CLS 3
1250 COLOR 7:LOCATE  0,11:PRINT "YUZUKO"
1260         LOCATE 32,11:PRINT "YUZUKO"
1270 GOSUB 1310:GOSUB 8620
1280 FOR T=0 TO 4000:NEXT
1290 GOTO 1140
1300 '----- shitaji -----
1310 CMD LINE(0,0)-(199,199),3,BF
1320 '----- hada iro -----
1330 FOR I=0 TO 199 STEP 2
1340   CMD LINE(I,0)-(199,199-I),1
1350   CMD LINE(0,I)-(199-I,199),1
1360 NEXT
1370 RETURN
1380 '===== yukari =====
1390 '----- sen -----
1400 CMD LINE(102,0)-(93,5),0
1410 CMD LINE-(86,11),0
1420 CMD LINE-(79,18),0
1430 CMD LINE-(72,26),0
1440 CMD LINE-(66,35),0
1450 CMD LINE-(63,42),0
1460 CMD LINE(89,14)-(83,20),0
1470 CMD LINE-(78,27),0
1480 CMD LINE-(74,35),0
1490 CMD LINE-(69,47),0
1500 CMD LINE-(66,58),0
1510 CMD LINE(89,13)-(79,21),0
1520 CMD LINE-(69,31),0
1530 CMD LINE(76,37)-(72,46),0
1540 CMD LINE-(70,53),0
1550 CMD LINE-(70,60),0
1560 CMD LINE-(77,62),0
1570 CMD LINE-(83,65),0
1580 CMD LINE-(85,61),0
1590 CMD LINE-(85,66),0
1600 CMD LINE-(87,67),0
1610 CMD LINE-(76,82),0
1620 CMD LINE-(64,98),0
1630 CMD LINE-(53,114),0
1640 CMD LINE-(44,129),0
1650 CMD LINE-(39,140),0
1660 CMD LINE-(34,153),0
1670 CMD LINE-(30,169),0
1680 CMD LINE-(28,187),0
1690 CMD LINE-(29,199),0
1700 CMD LINE(73,42)-(69,50),0
1710 CMD LINE(84,84)-(77,96),0
1720 CMD LINE-(70,108),0
1730 CMD LINE-(64,120),0
1740 CMD LINE-(58,134),0
1750 CMD LINE-(54,145),0
1760 CMD LINE-(51,159),0
1770 CMD LINE-(48,175),0
1780 CMD LINE-(48,199),0
1790 CMD LINE(66,114)-(57,127),0
1800 CMD LINE-(50,139),0
1810 CMD LINE-(42,154),0
1820 CMD LINE-(36,167),0
1830 CMD LINE-(32,179),0
1840 CMD LINE-(31,188),0
1850 CMD LINE-(31,199),0
1860 CMD LINE(82,123)-(73,138),0
1870 CMD LINE-(66,152),0
1880 CMD LINE-(60,165),0
1890 CMD LINE-(56,178),0
1900 CMD LINE(82,123)-(75,141),0
1910 CMD LINE-(69,153),0
1920 CMD LINE-(59,174),0
1930 CMD LINE(48,176)-(44,188),0
1940 CMD LINE-(42,199),0
1950 CMD LINE(48,191)-(45,199),0
1960 CMD LINE(100,53)-(101,83),0
1970 CMD LINE-(99,92),0
1980 CMD LINE-(99,96),0
1990 CMD LINE-(100,100),0
2000 CMD LINE-(106,107),0
2010 CMD LINE-(116,116),0
2020 CMD LINE-(125,122),0
2030 CMD LINE-(135,128),0
2040 CMD LINE-(146,132),0
2050 CMD LINE-(149,132),0
2060 CMD LINE-(165,128),0
2070 CMD LINE-(177,123),0
2080 CMD LINE-(189,117),0
2090 CMD LINE(111,26)-(106,37),0
2100 CMD LINE-(104,45),0
2110 CMD LINE-(103,51),0
2120 CMD LINE-(100,53),0
2130 CMD LINE(110,41)-(111,26),0
2140 CMD LINE(110,38)-(114,26),0
2150 CMD LINE-(118,17),0
2160 CMD LINE-(121,12),0
2170 CMD LINE-(118,24),0
2180 CMD LINE-(117,36),0
2190 CMD LINE(129,29)-(134,19),0
2200 CMD LINE-(139,11),0
2210 CMD LINE-(145,4),0
2220 CMD LINE-(142,19),0
2230 CMD LINE-(141,33),0
2240 CMD LINE-(146,11),0
2250 CMD LINE-(150,0),0
2260 CMD LINE(152,0)-(153,11),0
2270 CMD LINE-(156,23),0
2280 CMD LINE-(158,30),0
2290 CMD LINE-(159,0),0
2300 CMD LINE(163,0)-(168,13),0
2310 CMD LINE-(170,20),0
2320 CMD LINE-(172,31),0
2330 CMD LINE-(172,22),0
2340 CMD LINE-(171,8),0
2350 CMD LINE-(175,21),0
2360 CMD LINE-(178,33),0
2370 CMD LINE(195,46)-(198,37),0
2380 CMD LINE-(199,33),0
2390 CMD LINE(199,90)-(193,108),0
2400 CMD LINE-(186,124),0
2410 CMD LINE-(181,134),0
2420 CMD LINE-(176,142),0
2430 CMD LINE-(170,151),0
2440 CMD LINE-(158,168),0
2450 CMD LINE-(152,177),0
2460 CMD LINE-(152,168),0
2470 CMD LINE-(153,160),0
2480 CMD LINE-(157,149),0
2490 CMD LINE-(164,133),0
2500 CMD LINE-(173,118),0
2510 CMD LINE-(181,106),0
2520 CMD LINE-(191,94),0
2530 CMD LINE-(199,87),0
2540 CMD LINE(199,81)-(192,89),0
2550 CMD LINE-(183,101),0
2560 CMD LINE-(175,114),0
2570 CMD LINE(160,140)-(154,154),0
2580 CMD LINE-(149,168),0
2590 CMD LINE-(145,182),0
2600 CMD LINE-(145,186),0
2610 CMD LINE-(137,199),0
2620 CMD LINE(150,199)-(164,181),0
2630 CMD LINE-(177,166),0
2640 CMD LINE-(170,183),0
2650 CMD LINE-(167,194),0
2660 CMD LINE-(165,199),0
2670 CMD LINE(169,199)-(179,174),0
2680 CMD LINE-(188,156),0
2690 CMD LINE-(199,161),0
2700 CMD LINE(133,127)-(132,148),0
2710 CMD LINE-(130,159),0
2720 CMD LINE(170,126)-(167,149),0
2730 CMD LINE(168,139)-(170,139),0
2740 CMD LINE-(174,144),0
2750 CMD LINE(169,144)-(164,153),0
2760 CMD LINE-(152,169),0
2770 CMD LINE(132,145)-(127,152),0
2780 CMD LINE-(123,162),0
2790 CMD LINE-(118,179),0
2800 CMD LINE-(116,184),0
2810 CMD LINE-(116,199),0
2820 CMD LINE(132,138)-(128,138),0
2830 CMD LINE-(120,142),0
2840 CMD LINE-(106,144),0
2850 CMD LINE-(92,147),0
2860 CMD LINE-(90,150),0
2870 CMD LINE-(86,150),0
2880 CMD LINE-(81,152),0
2890 CMD LINE-(77,156),0
2900 CMD LINE-(75,163),0
2910 CMD LINE-(75,181),0
2920 CMD LINE(76,157)-(69,163),0
2930 CMD LINE-(61,172),0
2940 CMD LINE-(55,179),0
2950 CMD LINE-(53,185),0
2960 CMD LINE-(51,199),0
2970 CMD LINE(43,191)-(31,198),0
2980 CMD LINE(122,165)-(130,172),0
2990 CMD LINE(137,173)-(148,172),0
3000 CMD LINE(118,180)-(125,178),0
3010 CMD LINE-(127,178),0
3020 CMD LINE-(137,187),0
3030 CMD LINE(146,176)-(128,199),0
3040 CMD LINE(95,146)-(96,162),0
3050 CMD LINE-(99,176),0
3060 CMD LINE-(103,187),0
3070 CMD LINE-(109,199),0
3080 CMD LINE(91,149)-(93,165),0
3090 CMD LINE-(96,177),0
3100 CMD LINE-(99,186),0
3110 CMD LINE-(103,196),0
3120 CMD LINE-(105,199),0
3130 CMD LINE(94,172)-(92,199),0
3140 CMD LINE(84,184)-(80,199),0
3150 CMD LINE(52,192)-(59,199),0
3160 CMD LINE(199,166)-(177,180),0
3170 CMD LINE(169,184)-(157,191),0
3180 CMD LINE(199,170)-(181,181),0
3190 CMD LINE-(176,184),0
3200 CMD LINE(168,189)-(153,197),0
3210 CMD LINE(104,51)-(108,45),0
3220 CMD LINE-(119,35),0
3230 CMD LINE-(127,29),0
3240 CMD LINE-(130,29),0
3250 CMD LINE-(137,37),0
3260 CMD LINE-(132,40),0
3270 CMD LINE-(131,64),0
3280 CMD LINE-(128,75),0
3290 CMD LINE-(117,77),0
3300 CMD LINE-(117,54),0
3310 CMD LINE-(120,44),0
3320 CMD LINE-(123,38),0
3330 CMD LINE-(113,47),0
3340 CMD LINE-(107,54),0
3350 CMD LINE-(104,51),0
3360 CMD LINE(169,38)-(180,33),0
3370 CMD LINE-(186,33),0
3380 CMD LINE-(195,46),0
3390 CMD LINE-(199,54),0
3400 CMD LINE-(199,66),0
3410 CMD LINE-(192,53),0
3420 CMD LINE-(191,67),0
3430 CMD LINE-(188,77),0
3440 CMD LINE-(184,85),0
3450 CMD LINE-(171,81),0
3460 CMD LINE-(172,67),0
3470 CMD LINE-(175,55),0
3480 CMD LINE-(178,47),0
3490 CMD LINE-(181,43),0
3500 CMD LINE-(185,40),0
3510 CMD LINE-(183,38),0
3520 CMD LINE-(182,38),0
3530 CMD LINE-(172,42),0
3540 CMD LINE-(169,38),0
3550 CMD LINE(141,83)-(141,84),0
3560 CMD LINE(137,110)-(154,112),0
3570 CMD LINE-(154,119),0
3580 CMD LINE-(153,122),0
3590 CMD LINE-(150,125),0
3600 CMD LINE-(148,126),0
3610 CMD LINE-(144,126),0
3620 CMD LINE-(141,125),0
3630 CMD LINE-(138,122),0
3640 CMD LINE-(137,118),0
3650 CMD LINE-(137,110),0
3660 CMD LINE(117,66)-(121,61),0
3670 CMD LINE-(122,67),0
3680 CMD LINE-(124,69),0
3690 CMD LINE-(126,69),0
3700 CMD LINE-(130,66),0
3710 CMD LINE(172,71)-(176,67),0
3720 CMD LINE-(176,72),0
3730 CMD LINE-(177,75),0
3740 CMD LINE-(178,76),0
3750 CMD LINE-(180,76),0
3760 CMD LINE-(182,74),0
3770 CMD LINE-(185,70),0
3780 CMD LINE-(186,70),0
3790 CMD LINE-(187,76),0
3800 CMD LINE(167,192)-(162,199),0
3810 '----- kami paint -----
3820 CMD PAINT(100, 20),0,0
3830 CMD PAINT(156,  6),0,0
3840 CMD PAINT(185,  6),0,0
3850 CMD PAINT(197, 87),0,0
3860 CMD PAINT(190,137),0,0
3870 CMD PAINT(174,130),0,0
3880 CMD PAINT(147,190),0,0
3890 CMD PSET( 76, 23),0
3900 CMD PSET( 75, 24),0
3910 CMD PSET( 74, 25),0
3920 CMD PSET( 73, 26),0
3930 CMD PSET( 72, 27),0
3940 CMD PAINT( 72, 42),0,0
3950 CMD PAINT( 71, 44),0,0
3960 CMD PAINT( 70, 46),0,0
3970 CMD PSET(188, 96),0
3980 CMD PAINT(186, 98),0,0
3990 CMD PSET(185,100),0
4000 CMD PSET(184,101),0
4010 CMD PSET(183,102),0
4020 CMD PSET(182,104),0
4030 CMD PAINT(152,162),0,0
4040 CMD PSET( 61,171),0
4050 CMD PAINT( 46,188),0,0
4060 '----- me -----
4070 CMD PAINT(127, 35),0,0
4080 CMD PAINT(182, 50),0,0
4090 CMD PAINT(121, 71),2,0
4100 CMD PAINT(182, 80),2,0
4110 '----- eri -----
4120 CMD PAINT(108,156),2,0
4130 CMD PAINT(169,148),2,0
4140 CMD PAINT(137,192),2,0
4150 CMD PAINT(190,165),2,0
4160 CMD PAINT(167,183),2,0
4170 CMD PSET(175,169),2
4180 CMD PSET(159,197),2
4190 CMD PSET(159,189),2
4200 '----- fuku -----
4210 FOR C=2 TO 3
4220  CMD PAINT( 93,150),C,0
4230  CMD PAINT( 95,185),C,0
4240  CMD PAINT( 82,167),C,0
4250  CMD PAINT( 53,198),C,0
4260  CMD PAINT( 46,198),C,0
4270  CMD PAINT( 37,197),C,0
4280  CMD PAINT(161,191),C,0
4290  CMD PAINT(182,179),C,0
4300  CMD PAINT(191,187),C,0
4310  CMD PAINT(159,197),C,0
4320  CMD PAINT(164,198),C,0
4330  CMD PAINT(125,187),C,0
4340 NEXT
4350 CMD PSET(176,183),3
4360 CMD PSET(169,185),3
4370 CMD PSET(153,196),3
4380 CMD PSET(166,195),3
4390 CMD PSET( 76,158),3
4400 '----- kuchi -----
4410 CMD PAINT(145,118),2,0
4420 CMD PAINT(145,118),1,0
4430 '----- haikei -----
4440 CMD PAINT( 10, 10),2,0
4450 CMD PAINT( 44,166),2,0
4460 CMD PAINT( 69,149),2,0
4470 CMD PSET( 86, 16),2
4480 CMD PSET( 85, 17),2
4490 CMD PSET( 84, 18),2
4500 CMD PSET( 83, 19),2
4510 CMD PSET( 71, 48),2
4520 CMD PAINT( 64,118),2,0
4530 CMD PSET( 65,117),2
4540 CMD PSET( 66,115),2
4550 CMD PAINT( 78,131),2,0
4560 CMD PSET( 79,129),2
4570 CMD PAINT( 59,171),2,0
4580 CMD PAINT( 58,174),2,0
4590 '----- shiage sen -----
4600 CMD LINE(79,77)-(54,100),0
4610 CMD LINE-(36,118),0
4620 CMD LINE-(26,131),0
4630 CMD LINE-(22,139),0
4640 CMD LINE-(19,149),0
4650 CMD LINE-(19,159),0
4660 CMD LINE-(21,167),0
4670 CMD LINE-(25,173),0
4680 CMD LINE-(32,180),0
4690 CMD LINE-(44,187),0
4700 CMD LINE(193,153)-(186,174),0
4710 CMD LINE-(181,187),0
4720 CMD LINE-(176,199),0
4730 '----- highlight -----
4740 CMD CIRCLE(120, 49), 5,3,,,5/3
4750 CMD PAINT(120, 49),3,3
4760 CMD CIRCLE(178, 53), 4,3,,, 4/3
4770 CMD PAINT(178, 53),3,3
4780 CMD CIRCLE(119, 72),2,3
4790 CMD PAINT(119, 72),3,3
4800 CMD CIRCLE(173, 76),2,3
4810 CMD PAINT(173, 76),3,3
4820 CMD CIRCLE(128, 51),1,3
4830 CMD PSET(128, 51),3
4840 CMD CIRCLE(185, 56),1,3
4850 CMD PSET(185, 56),3
4860 RETURN
4870 '===== yui =====
4880 '----- sen -----
4890 CMD LINE(51,10)-(46,19),0
4900 CMD LINE-(41,33),0
4910 CMD LINE-(37,54),0
4920 CMD LINE-(37,73),0
4930 CMD LINE-(38,94),0
4940 CMD LINE-(41,110),0
4950 CMD LINE-(44,122),0
4960 CMD LINE-(48,134),0
4970 CMD LINE(61,55)-(57,71),0
4980 CMD LINE-(55,91),0
4990 CMD LINE-(55,118),0
5000 CMD LINE(52,80)-(51,96),0
5010 CMD LINE-(55,116),0
5020 CMD LINE(48,133)-(51,99),0
5030 CMD LINE(65,16)-(62,25),0
5040 CMD LINE-(60,37),0
5050 CMD LINE-(60,48),0
5060 CMD LINE-(62,61),0
5070 CMD LINE-(64,69),0
5080 CMD LINE-(68,77),0
5090 CMD LINE(91,2)-(86,6),0
5100 CMD LINE-(78,16),0
5110 CMD LINE-(72,27),0
5120 CMD LINE-(68,39),0
5130 CMD LINE-(66,49),0
5140 CMD LINE-(66,58),0
5150 CMD LINE-(68,76),0
5160 CMD LINE(111,3)-(105,7),0
5170 CMD LINE-(99,13),0
5180 CMD LINE-(93,20),0
5190 CMD LINE-(89,28),0
5200 CMD LINE-(101,19),0
5210 CMD LINE-(111,12),0
5220 CMD LINE-(117,9),0
5230 CMD LINE(70,33)-(79,24),0
5240 CMD LINE-(89,17),0
5250 CMD LINE-(100,11),0
5260 CMD LINE(120,1)-(116,15),0
5270 CMD LINE-(114,29),0
5280 CMD LINE-(113,41),0
5290 CMD LINE-(114,62),0
5300 CMD LINE(121,17)-(117,32),0
5310 CMD LINE-(115,46),0
5320 CMD LINE-(114,58),0
5330 CMD LINE(121,14)-(121,34),0
5340 CMD LINE-(125,65),0
5350 CMD LINE-(125,41),0
5360 CMD LINE-(128,14),0
5370 CMD LINE(129,8)-(129,21),0
5380 CMD LINE-(131,34),0
5390 CMD LINE-(134,46),0
5400 CMD LINE-(138,57),0
5410 CMD LINE(134,13)-(134,31),0
5420 CMD LINE-(138,56),0
5430 CMD LINE(135,22)-(137,39),0
5440 CMD LINE-(140,53),0
5450 CMD LINE-(142,59),0
5460 CMD LINE(155,26)-(153,50),0
5470 CMD LINE-(151,63),0
5480 CMD LINE(155,32)-(154,64),0
5490 CMD LINE-(159,43),0
5500 CMD LINE(160,31)-(158,65),0
5510 CMD LINE-(156,78),0
5520 CMD LINE-(151,93),0
5530 CMD LINE(167,50)-(166,62),0
5540 CMD LINE-(163,72),0
5550 CMD LINE-(159,80),0
5560 CMD LINE-(153,89),0
5570 CMD LINE(142,0)-(149,5),0
5580 CMD LINE-(158,15),0
5590 CMD LINE-(167,28),0
5600 CMD LINE-(174,42),0
5610 CMD LINE-(183,64),0
5620 CMD LINE-(190,79),0
5630 CMD LINE-(199,92),0
5640 CMD LINE(176,61)-(178,78),0
5650 CMD LINE-(178,94),0
5660 CMD LINE-(176,109),0
5670 CMD LINE-(173,124),0
5680 CMD LINE(178,68)-(182,75),0
5690 CMD LINE-(188,82),0
5700 CMD LINE-(192,86),0
5710 CMD LINE-(197,91),0
5720 CMD LINE(166,75)-(164,96),0
5730 CMD LINE-(161,110),0
5740 CMD LINE-(156,128),0
5750 CMD LINE(166,83)-(169,97),0
5760 CMD LINE-(172,114),0
5770 CMD LINE-(172,126),0
5780 CMD LINE(157,90)-(156,127),0
5790 CMD LINE(157,91)-(152,107),0
5800 CMD LINE-(147,121),0
5810 CMD LINE-(140,134),0
5820 CMD LINE-(129,152),0
5830 CMD LINE(142,116)-(140,125),0
5840 CMD LINE-(135,134),0
5850 CMD LINE-(129,143),0
5860 CMD LINE-(117,157),0
5870 CMD LINE-(126,125),0
5880 CMD LINE(140,126)-(130,150),0
5890 CMD LINE(40,33)-(34,38),0
5900 CMD LINE-(26,42),0
5910 CMD LINE-(15,46),0
5920 CMD LINE-(2,47),0
5930 CMD LINE-(20,49),0
5940 CMD LINE-(30,48),0
5950 CMD LINE-(38,45),0
5960 CMD LINE(21,44)-(23,34),0
5970 CMD LINE-(28,22),0
5980 CMD LINE-(35,12),0
5990 CMD LINE-(41,5),0
6000 CMD LINE-(47,0),0
6010 CMD LINE(19,49)-(18,67),0
6020 CMD LINE-(20,86),0
6030 CMD LINE-(24,101),0
6040 CMD LINE-(29,112),0
6050 CMD LINE-(34,121),0
6060 CMD LINE-(36,127),0
6070 CMD LINE-(49,157),0
6080 CMD LINE-(56,173),0
6090 CMD LINE-(61,189),0
6100 CMD LINE-(64,199),0
6110 CMD LINE(42,121)-(44,125),0
6120 CMD LINE-(49,138),0
6130 CMD LINE-(57,155),0
6140 CMD LINE-(65,172),0
6150 CMD LINE-(70,184),0
6160 CMD LINE-(73,195),0
6170 CMD LINE-(74,199),0
6180 CMD LINE(84,130)-(84,135),0
6190 CMD LINE-(92,151),0
6200 CMD LINE-(101,170),0
6210 CMD LINE-(108,187),0
6220 CMD LINE-(111,199),0
6230 CMD LINE(97,182)-(104,199),0
6240 CMD LINE(155,77)-(132,112),0
6250 CMD LINE-(130,116),0
6260 CMD LINE-(129,122),0
6270 CMD LINE-(125,125),0
6280 CMD LINE-(110,128),0
6290 CMD LINE-(81,130),0
6300 CMD LINE-(74,125),0
6310 CMD LINE-(65,116),0
6320 CMD LINE-(56,104),0
6330 CMD LINE(80,131)-(77,140),0
6340 CMD LINE-(77,144),0
6350 CMD LINE-(78,148),0
6360 CMD LINE(77,142)-(89,165),0
6370 CMD LINE(30,49)-(29,53),0
6380 CMD LINE-(29,59),0
6390 CMD LINE-(31,66),0
6400 CMD LINE-(33,70),0
6410 CMD LINE-(37,74),0
6420 CMD LINE(35,47)-(33,53),0
6430 CMD LINE-(33,59),0
6440 CMD LINE-(35,64),0
6450 CMD LINE-(37,66),0
6460 CMD LINE(74,45)-(76,28),0
6470 CMD LINE-(86,29),0
6480 CMD LINE-(95,33),0
6490 CMD LINE-(103,39),0
6500 CMD LINE-(109,46),0
6510 CMD LINE-(106,49),0
6520 CMD LINE-(103,45),0
6530 CMD LINE-(97,39),0
6540 CMD LINE-(95,38),0
6550 CMD LINE-(95,45),0
6560 CMD LINE-(94,51),0
6570 CMD LINE-(90,60),0
6580 CMD LINE-(84,69),0
6590 CMD LINE-(79,72),0
6600 CMD LINE-(77,72),0
6610 CMD LINE-(74,70),0
6620 CMD LINE-(72,66),0
6630 CMD LINE-(72,60),0
6640 CMD LINE-(75,51),0
6650 CMD LINE-(79,42),0
6660 CMD LINE-(84,37),0
6670 CMD LINE-(88,35),0
6680 CMD LINE-(84,33),0
6690 CMD LINE-(79,32),0
6700 CMD LINE-(75,42),0
6710 CMD LINE(134,58)-(143,60),0
6720 CMD LINE-(150,64),0
6730 CMD LINE-(156,69),0
6740 CMD LINE-(144,82),0
6750 CMD LINE-(151,70),0
6760 CMD LINE-(148,66),0
6770 CMD LINE-(142,63),0
6780 CMD LINE-(141,71),0
6790 CMD LINE-(139,76),0
6800 CMD LINE-(135,84),0
6810 CMD LINE-(129,91),0
6820 CMD LINE-(126,94),0
6830 CMD LINE-(123,94),0
6840 CMD LINE-(121,93),0
6850 CMD LINE-(121,90),0
6860 CMD LINE-(124,82),0
6870 CMD LINE-(128,74),0
6880 CMD LINE-(133,66),0
6890 CMD LINE-(137,62),0
6900 CMD LINE-(134,62),0
6910 CMD LINE-(134,58),0
6920 CMD LINE(109,97)-(109,99),0
6930 CMD LINE(82,124)-(85,124),0
6940 CMD LINE(49,135)-(68,158),0
6950 CMD LINE-(82,175),0
6960 CMD LINE-(98,198),0
6970 CMD LINE-(95,169),0
6980 CMD LINE-(92,166),0
6990 CMD LINE-(84,165),0
7000 CMD LINE-(76,167),0
7010 CMD LINE(92,150)-(104,162),0
7020 CMD LINE-(105,178),0
7030 CMD LINE(101,159)-(102,172),0
7040 CMD LINE(0,151)-(2,148),0
7050 CMD LINE-(2,144),0
7060 CMD LINE-(5,140),0
7070 CMD LINE-(10,137),0
7080 CMD LINE-(28,135),0
7090 CMD LINE-(36,129),0
7100 CMD LINE(15,137)-(27,139),0
7110 CMD LINE-(35,142),0
7120 CMD LINE-(41,147),0
7130 CMD LINE-(47,153),0
7140 CMD LINE(66,172)-(72,178),0
7150 CMD LINE-(78,183),0
7160 CMD LINE-(97,197),0
7170 CMD LINE(98,197)-(100,191),0
7180 CMD LINE(105,164)-(111,171),0
7190 CMD LINE-(115,178),0
7200 CMD LINE-(119,191),0
7210 CMD LINE-(123,194),0
7220 CMD LINE-(124,199),0
7230 CMD LINE(61,148)-(72,150),0
7240 CMD LINE-(76,154),0
7250 CMD LINE(73,59)-(77,57),0
7260 CMD LINE-(76,63),0
7270 CMD LINE-(77,66),0
7280 CMD LINE-(79,67),0
7290 CMD LINE-(82,65),0
7300 CMD LINE-(85,60),0
7310 CMD LINE-(87,65),0
7320 CMD LINE(124,84)-(126,84),0
7330 CMD LINE-(125,87),0
7340 CMD LINE-(126,89),0
7350 CMD LINE-(127,89),0
7360 CMD LINE-(132,84),0
7370 CMD LINE-(133,86),0
7380 '----- me paint -----
7390 CMD PAINT( 86, 45),0,0
7400 CMD PAINT(135, 73),0,0
7410 CMD PSET(147, 78),0
7420 '----- eri paint -----
7430 CMD PAINT( 34,137),0,0
7440 CMD PAINT( 68,166),0,0
7450 CMD PAINT( 98,158),0,0
7460 CMD PAINT( 98,191),0,0
7470 CMD PAINT(101,167),0,0
7480 CMD PSET( 49,136),0
7490 CMD PSET( 94,194),0
7500 CMD PSET( 93,152),0
7510 '----- fuku paint -----
7520 CMD PAINT( 21,158),2,0
7530 CMD PAINT( 81,194),2,0
7540 CMD PAINT(111,182),2,0
7550 CMD PAINT( 87,170),2,0
7560 CMD PAINT(102,164),2,0
7570 CMD PSET( 66,173),2
7580 '----- kami paint -----
7590 FOR C=2 TO 3
7600   CMD PAINT( 60,  7),C,0
7610   CMD PAINT( 26, 84),C,0
7620   CMD PAINT( 31, 43),C,0
7630   CMD PAINT( 85,147),C,0
7640   CMD PSET( 91, 26),C
7650   CMD PAINT( 43,121),C,0
7660   CMD PSET( 44,124),C
7670   CMD PSET(154, 86),C
7680   CMD PSET(195, 88),C
7690   CMD PSET(196, 89),C
7700   CMD PSET(197, 90),C
7710   CMD PAINT(155, 78),C,0
7720   CMD PAINT(135,140),C,0
7730   CMD PAINT(134,142),C,0
7740   CMD PAINT( 78, 68),C,0
7750   CMD PAINT(125, 91),C,0
7760 NEXT
7770 '----- sen tsuika -----
7780 CMD LINE(35,122)-(37,120),0
7790 CMD LINE-(41,120),0
7800 CMD LINE(37,126)-(39,125),0
7810 CMD LINE-(43,126),0
7820 CMD LINE(79,137)-(83,136),0
7830 CMD LINE(79,143)-(81,141),0
7840 CMD LINE-(84,140),0
7850 CMD LINE-(85,140),0
7860 CMD LINE(24,73)-(26,90),0
7870 CMD LINE-(30,106),0
7880 CMD LINE-(35,121),0
7890 CMD LINE(34,84)-(37,114),0
7900 CMD LINE-(38,119),0
7910 CMD LINE(42,131)-(52,155),0
7920 CMD LINE-(58,172),0
7930 CMD LINE-(62,190),0
7940 CMD LINE(61,167)-(65,179),0
7950 CMD LINE-(69,193),0
7960 CMD LINE-(70,199),0
7970 CMD LINE(81,142)-(92,164),0
7980 CMD LINE(3,146)-(7,142),0
7990 CMD LINE-(12,140),0
8000 CMD LINE-(17,140),0
8010 CMD LINE-(30,143),0
8020 CMD LINE-(37,147),0
8030 CMD LINE-(43,152),0
8040 CMD LINE-(49,160),0
8050 CMD LINE(68,177)-(75,184),0
8060 CMD LINE-(88,193),0
8070 CMD LINE-(98,199),0
8080 CMD LINE(99,199)-(102,194),0
8090 CMD LINE(2,149)-(6,148),0
8100 CMD LINE(10,148)-(19,156),0
8110 CMD LINE-(33,170),0
8120 CMD LINE-(37,176),0
8130 CMD LINE-(39,181),0
8140 CMD LINE(41,166)-(39,191),0
8150 CMD LINE-(37,199),0
8160 CMD LINE(23,177)-(0,184),0
8170 CMD LINE(109,170)-(113,186),0
8180 CMD LINE(48,160)-(50,166),0
8190 CMD LINE-(54,176),0
8200 CMD LINE-(59,186),0
8210 CMD LINE(79,190)-(75,189),0
8220 CMD LINE-(75,190),0
8230 CMD LINE-(80,195),0
8240 CMD LINE-(85,199),0
8250 '----- me highlight -----
8260 CMD LINE(92,54)-(90,54),3
8270 CMD LINE-(89,53),3
8280 CMD LINE-(89,51),3
8290 CMD LINE-(91,47),3
8300 CMD LINE-(93,46),3
8310 CMD LINE-(95,47),3
8320 CMD LINE-(94,52),3
8330 CMD LINE-(92,54),3
8340 CMD LINE(137,78)-(137,75),3
8350 CMD LINE-(140,71),3
8360 CMD LINE-(140,74),3
8370 CMD LINE-(138,78),3
8380 CMD PAINT( 92, 49),3,3
8390 CMD PAINT(139, 74),3,3
8400 CMD CIRCLE( 85, 47),1,3
8410 CMD PSET( 85, 47),3
8420 CMD CIRCLE(134, 73),1,3
8430 CMD PSET(134, 73),3
8440 '----- ribbon -----
8450 CMD PAINT( 54,171),3,0
8460 CMD PAINT( 58,182),3,0
8470 CMD PAINT( 71,182),3,0
8480 CMD PAINT(102,198),3,0
8490 CMD PSET( 68,178),3
8500 CMD PSET( 76,190),3
8510 '----- haikei -----
8520 FOR C=2 TO 3
8530   CMD PAINT( 10, 10),C,0
8540   CMD PAINT(183, 14),C,0
8550   CMD PAINT(164,148),C,0
8560   CMD PAINT(135,135),C,0
8570   CMD PSET(136,134),C
8580 NEXT
8590 RETURN
8600 '===== yuzuko =====
8610 '----- sen -----
8620 CMD LINE(0,32)-(2,39),0
8630 CMD LINE-(5,43),0
8640 CMD LINE-(6,44),0
8650 CMD LINE-(10,44),0
8660 CMD LINE-(14,42),0
8670 CMD LINE-(19,40),0
8680 CMD LINE-(15,48),0
8690 CMD LINE-(13,56),0
8700 CMD LINE-(11,74),0
8710 CMD LINE-(11,87),0
8720 CMD LINE-(13,101),0
8730 CMD LINE-(19,122),0
8740 CMD LINE-(19,83),0
8750 CMD LINE-(24,102),0
8760 CMD LINE-(30,119),0
8770 CMD LINE-(36,131),0
8780 CMD LINE-(49,152),0
8790 CMD LINE-(44,133),0
8800 CMD LINE-(42,119),0
8810 CMD LINE-(48,126),0
8820 CMD LINE-(59,138),0
8830 CMD LINE-(72,149),0
8840 CMD LINE-(84,158),0
8850 CMD LINE(71,140)-(81,156),0
8860 CMD LINE(73,142)-(81,146),0
8870 CMD LINE-(91,149),0
8880 CMD LINE-(99,150),0
8890 CMD LINE-(94,145),0
8900 CMD LINE-(89,138),0
8910 CMD LINE(21,52)-(24,74),0
8920 CMD LINE-(28,89),0
8930 CMD LINE-(34,102),0
8940 CMD LINE-(40,111),0
8950 CMD LINE(27,74)-(32,86),0
8960 CMD LINE-(38,96),0
8970 CMD LINE-(45,106),0
8980 CMD LINE-(53,115),0
8990 CMD LINE(29,81)-(32,91),0
9000 CMD LINE-(36,102),0
9010 CMD LINE-(38,107),0
9020 CMD LINE(31,44)-(34,54),0
9030 CMD LINE-(38,62),0
9040 CMD LINE-(44,71),0
9050 CMD LINE-(40,54),0
9060 CMD LINE-(37,28),0
9070 CMD LINE-(44,41),0
9080 CMD LINE-(51,51),0
9090 CMD LINE-(57,59),0
9100 CMD LINE(37,62)-(40,78),0
9110 CMD LINE-(45,95),0
9120 CMD LINE-(52,113),0
9130 CMD LINE(43,29)-(51,39),0
9140 CMD LINE-(59,46),0
9150 CMD LINE-(69,53),0
9160 CMD LINE(45,32)-(49,43),0
9170 CMD LINE-(55,56),0
9180 CMD LINE(67,51)-(60,40),0
9190 CMD LINE-(55,28),0
9200 CMD LINE-(52,20),0
9210 CMD LINE-(63,30),0
9220 CMD LINE-(70,35),0
9230 CMD LINE-(79,40),0
9240 CMD LINE-(70,30),0
9250 CMD LINE-(60,18),0
9260 CMD LINE-(56,13),0
9270 CMD LINE-(72,21),0
9280 CMD LINE-(87,26),0
9290 CMD LINE-(102,30),0
9300 CMD LINE(80,0)-(88,7),0
9310 CMD LINE-(97,17),0
9320 CMD LINE-(107,30),0
9330 CMD LINE(98,17)-(107,23),0
9340 CMD LINE-(118,31),0
9350 CMD LINE-(124,38),0
9360 CMD LINE-(129,48),0
9370 CMD LINE-(133,63),0
9380 CMD LINE-(133,68),0
9390 CMD LINE(124,21)-(128,29),0
9400 CMD LINE-(131,41),0
9410 CMD LINE-(133,55),0
9420 CMD LINE-(133,65),0
9430 CMD LINE(133,45)-(139,56),0
9440 CMD LINE-(146,71),0
9450 CMD LINE-(151,86),0
9460 CMD LINE-(154,100),0
9470 CMD LINE-(154,104),0
9480 CMD LINE-(156,92),0
9490 CMD LINE-(157,79),0
9500 CMD LINE-(157,70),0
9510 CMD LINE-(160,87),0
9520 CMD LINE-(162,73),0
9530 CMD LINE-(162,66),0
9540 CMD LINE-(160,52),0
9550 CMD LINE-(157,39),0
9560 CMD LINE-(152,26),0
9570 CMD LINE-(145,14),0
9580 CMD LINE-(137,4),0
9590 CMD LINE(148,18)-(156,21),0
9600 CMD LINE-(165,21),0
9610 CMD LINE-(175,19),0
9620 CMD LINE-(172,22),0
9630 CMD LINE-(165,27),0
9640 CMD LINE-(158,30),0
9650 CMD LINE(155,0)-(161,6),0
9660 CMD LINE-(166,13),0
9670 CMD LINE-(169,20),0
9680 CMD LINE(171,23)-(173,30),0
9690 CMD LINE-(175,38),0
9700 CMD LINE-(177,40),0
9710 CMD LINE-(180,40),0
9720 CMD LINE-(183,38),0
9730 CMD LINE-(185,36),0
9740 CMD LINE-(185,33),0
9750 CMD LINE-(187,41),0
9760 CMD LINE-(186,46),0
9770 CMD LINE-(184,49),0
9780 CMD LINE-(179,52),0
9790 CMD LINE-(187,54),0
9800 CMD LINE-(179,55),0
9810 CMD LINE-(185,59),0
9820 CMD LINE-(188,62),0
9830 CMD LINE-(172,62),0
9840 CMD LINE-(178,67),0
9850 CMD LINE-(176,67),0
9860 CMD LINE-(171,65),0
9870 CMD LINE-(170,72),0
9880 CMD LINE-(167,78),0
9890 CMD LINE-(166,72),0
9900 CMD LINE-(163,67),0
9910 CMD LINE(0,25)-(1,19),0
9920 CMD LINE-(5,14),0
9930 CMD LINE-(9,11),0
9940 CMD LINE-(15,11),0
9950 CMD LINE-(18,13),0
9960 CMD LINE(12,12)-(8,15),0
9970 CMD LINE-(6,18),0
9980 CMD LINE-(6,22),0
9990 CMD LINE-(9,26),0
10000 CMD LINE-(12,28),0
10010 CMD LINE-(16,28),0
10020 CMD LINE-(20,27),0
10030 CMD LINE-(25,24),0
10040 CMD LINE-(31,16),0
10050 CMD LINE-(41,5),0
10060 CMD LINE-(47,0),0
10070 CMD LINE(46,97)-(70,123),0
10080 CMD LINE-(72,127),0
10090 CMD LINE-(75,133),0
10100 CMD LINE-(78,136),0
10110 CMD LINE-(83,137),0
10120 CMD LINE-(92,137),0
10130 CMD LINE-(101,136),0
10140 CMD LINE-(118,133),0
10150 CMD LINE-(133,128),0
10160 CMD LINE-(141,118),0
10170 CMD LINE-(148,106),0
10180 CMD LINE-(152,97),0
10190 CMD LINE(148,106)-(157,108),0
10200 CMD LINE(154,30)-(157,30),0
10210 CMD LINE-(162,32),0
10220 CMD LINE-(165,35),0
10230 CMD LINE-(167,41),0
10240 CMD LINE-(167,51),0
10250 CMD LINE-(165,58),0
10260 CMD LINE-(162,63),0
10270 CMD LINE(46,92)-(44,86),0
10280 CMD LINE-(43,81),0
10290 CMD LINE-(43,78),0
10300 CMD LINE-(44,75),0
10310 CMD LINE-(47,71),0
10320 CMD LINE-(52,69),0
10330 CMD LINE-(58,69),0
10340 CMD LINE-(59,72),0
10350 CMD LINE-(58,73),0
10360 CMD LINE-(65,79),0
10370 CMD LINE-(72,88),0
10380 CMD LINE-(76,96),0
10390 CMD LINE-(77,99),0
10400 CMD LINE-(76,102),0
10410 CMD LINE-(74,103),0
10420 CMD LINE-(71,103),0
10430 CMD LINE-(67,101),0
10440 CMD LINE-(61,96),0
10450 CMD LINE-(56,89),0
10460 CMD LINE-(53,84),0
10470 CMD LINE-(51,79),0
10480 CMD LINE-(51,76),0
10490 CMD LINE-(53,73),0
10500 CMD LINE-(51,73),0
10510 CMD LINE-(48,75),0
10520 CMD LINE-(47,78),0
10530 CMD LINE-(46,82),0
10540 CMD LINE-(47,87),0
10550 CMD LINE-(49,91),0
10560 CMD LINE-(46,92),0
10570 CMD LINE(80,50)-(80,45),0
10580 CMD LINE-(83,38),0
10590 CMD LINE-(88,33),0
10600 CMD LINE-(95,30),0
10610 CMD LINE-(107,30),0
10620 CMD LINE-(114,33),0
10630 CMD LINE-(118,36),0
10640 CMD LINE-(116,39),0
10650 CMD LINE-(113,37),0
10660 CMD LINE-(108,35),0
10670 CMD LINE-(114,41),0
10680 CMD LINE-(119,48),0
10690 CMD LINE-(122,56),0
10700 CMD LINE-(122,62),0
10710 CMD LINE-(121,65),0
10720 CMD LINE-(117,67),0
10730 CMD LINE-(114,68),0
10740 CMD LINE-(111,68),0
10750 CMD LINE-(107,65),0
10760 CMD LINE-(102,61),0
10770 CMD LINE-(97,56),0
10780 CMD LINE-(94,50),0
10790 CMD LINE-(92,45),0
10800 CMD LINE-(92,39),0
10810 CMD LINE-(93,35),0
10820 CMD LINE-(89,38),0
10830 CMD LINE-(86,42),0
10840 CMD LINE-(84,46),0
10850 CMD LINE-(84,51),0
10860 CMD LINE-(80,50),0
10870 CMD LINE(64,98)-(64,94),0
10880 CMD LINE-(69,97),0
10890 CMD LINE-(73,97),0
10900 CMD LINE-(74,94),0
10910 CMD LINE(106,64)-(106,59),0
10920 CMD LINE-(111,62),0
10930 CMD LINE-(114,63),0
10940 CMD LINE-(117,61),0
10950 CMD LINE-(118,60),0
10960 CMD LINE-(118,57),0
10970 CMD LINE-(116,51),0
10980 CMD LINE-(120,51),0
10990 CMD LINE(92,108)-(93,109),0
11000 CMD LINE(116,133)-(108,128),0
11010 CMD LINE-(113,120),0
11020 CMD LINE-(125,109),0
11030 CMD LINE-(136,102),0
11040 CMD LINE-(139,101),0
11050 CMD LINE-(142,104),0
11060 CMD LINE-(145,110),0
11070 CMD LINE(118,133)-(127,137),0
11080 CMD LINE-(123,132),0
11090 CMD LINE(183,57)-(190,57),0
11100 CMD LINE-(197,62),0
11110 CMD LINE-(199,62),0
11120 CMD LINE(167,78)-(163,86),0
11130 CMD LINE-(159,99),0
11140 CMD LINE-(157,114),0
11150 CMD LINE-(156,123),0
11160 CMD LINE-(158,128),0
11170 CMD LINE-(161,131),0
11180 CMD LINE(179,115)-(173,117),0
11190 CMD LINE-(167,120),0
11200 CMD LINE-(163,125),0
11210 CMD LINE-(161,132),0
11220 CMD LINE-(161,142),0
11230 CMD LINE-(163,153),0
11240 CMD LINE-(166,163),0
11250 CMD LINE(170,152)-(163,173),0
11260 CMD LINE-(159,190),0
11270 CMD LINE-(159,195),0
11280 CMD LINE-(161,199),0
11290 CMD LINE(163,196)-(161,194),0
11300 CMD LINE-(164,189),0
11310 CMD LINE-(178,179),0
11320 CMD LINE-(185,176),0
11330 CMD LINE-(189,176),0
11340 CMD LINE-(199,177),0
11350 CMD LINE(169,185)-(169,199),0
11360 CMD LINE(157,118)-(162,108),0
11370 CMD LINE-(169,98),0
11380 CMD LINE-(176,92),0
11390 CMD LINE-(183,89),0
11400 CMD LINE-(199,88),0
11410 '----- me paint -----
11420 CMD PAINT( 60, 85),0,0
11430 CMD PAINT(107, 45),0,0
11440 '----- eri paint -----
11450 CMD PAINT(184, 79),0,0
11460 '----- pink paint -----
11470 FOR C=2 TO 1 STEP -1
11480   CMD PAINT( 26, 34),C,0
11490   CMD PAINT( 85, 18),C,0
11500   CMD PAINT(138, 25),C,0
11510   CMD PAINT(159, 17),C,0
11520   CMD PAINT(156, 25),C,0
11530   CMD PAINT(174, 46),C,0
11540   CMD PAINT(122,134),C,0
11550   CMD PAINT( 34, 99),C,0
11560   CMD PAINT( 47,147),C,0
11570   CMD PAINT( 51, 49),C,0
11580   CMD PAINT( 31, 85),C,0
11590   CMD PAINT( 71,100),C,0
11600   CMD PAINT(111, 64),C,0
11610   CMD PSET( 36,104),C
11620   CMD PSET( 51,112),C
11630   CMD PSET( 52, 51),C
11640   CMD PSET( 53, 53),C
11650   CMD PSET( 65, 49),C
11660   CMD PSET( 75, 37),C
11670   CMD PSET(149, 19),C
11680   CMD PSET(173, 20),C
11690   CMD PAINT(126,120),C,0
11700 NEXT
11710 '----- yellow paint -----
11720 FOR C=2 TO 3
11730   CMD PAINT(182,105),C,0
11740 NEXT
11750 '----- shiage sen -----
11760 CMD LINE(159,126)-(162,117),0
11770 CMD LINE-(168,108),0
11780 CMD LINE-(174,101),0
11790 CMD LINE-(180,97),0
11800 CMD LINE-(186,94),0
11810 CMD LINE-(191,93),0
11820 CMD LINE-(199,93),0
11830 CMD LINE(162,178)-(182,163),0
11840 CMD LINE-(188,161),0
11850 CMD LINE-(194,161),0
11860 CMD LINE-(199,163),0
11870 CMD LINE(156,34)-(157,34),0
11880 CMD LINE-(161,36),0
11890 CMD LINE(161,55)-(163,52),0
11900 CMD LINE-(164,49),0
11910 CMD LINE(29,61)-(30,55),0
11920 CMD LINE-(33,51),0
11930 CMD LINE-(35,48),0
11940 CMD LINE(56,22)-(60,17),0
11950 CMD LINE-(66,14),0
11960 CMD LINE-(73,12),0
11970 CMD LINE(56,85)-(57,85),3
11980 CMD LINE-(60,88),3
11990 CMD LINE-(61,90),3
12000 CMD LINE-(60,92),3
12010 CMD LINE-(59,92),3
12020 CMD LINE-(55,88),3
12030 CMD LINE-(55,86),3
12040 CMD LINE(96,49)-(98,49),3
12050 CMD LINE-(101,52),3
12060 CMD LINE-(102,54),3
12070 CMD LINE-(102,55),3
12080 CMD LINE-(102,56),3
12090 CMD LINE-(101,57),3
12100 CMD LINE-(99,57),3
12110 CMD LINE-(95,53),3
12120 CMD LINE-(95,50),3
12130 '----- me paint -----
12140 CMD PAINT( 57, 88),3,3
12150 CMD PAINT( 98, 52),3,3
12160 CMD LINE( 61, 83)-( 63, 83),3
12170 CMD LINE( 62, 82)-( 62, 84),3
12180 CMD LINE(103, 45)-(105, 45),3
12190 CMD LINE(104, 44)-(104, 46),3
12200 CMD LINE( 70,101)-( 71,102),3,BF
12210 CMD LINE(111, 65)-(112, 66),3,BF
12220 '----- haikei paint -----
12230 FOR C=2 TO 1 STEP -1
12240   CMD PAINT( 14, 20),C,0
12250   CMD PAINT(  5, 66),C,0
12260   CMD PAINT(187, 10),C,0
12270   CMD PAINT( 43,121),C,0
12280 NEXT
12290 RETURN