1 PRINT CHR$(147)
2 POKE 53281, 0
3 POKE 646, 13
10 PRINT "G";
20 PRINT "H";
30 PRINT "O";
40 PRINT "S";
50 PRINT "T";
60 PRINT "";
61 GOSUB 15000
70 PRINT "G";
80 PRINT "H";
90 PRINT "O";
100 PRINT "S";
110 PRINT "T";
120 PRINT "";
121 GOSUB 15000
130 PRINT "G";
140 PRINT "H";
150 PRINT "O";
160 PRINT "S";
170 PRINT "T";
180 PRINT "";
181 GOSUB 15000
190 PRINT "G";
200 PRINT "H";
210 PRINT "O";
220 PRINT "S";
230 PRINT "T";
240 PRINT "";
241 GOSUB 15000
250 PRINT "G";
260 PRINT "H";
270 PRINT "O";
280 PRINT "S";
290 PRINT "T";
300 PRINT "";
301 GOSUB 15000
310 PRINT "G";
320 PRINT "H";
330 PRINT "O";
340 PRINT "S";
350 PRINT "T";
360 PRINT "";
361 GOSUB 15000
370 PRINT "G";
380 PRINT "H";
390 PRINT "O";
400 PRINT "S";
410 PRINT "T";
420 PRINT "";
421 GOSUB 15000
430 PRINT "G";
440 PRINT "H";
450 PRINT "O";
460 PRINT "S";
470 PRINT "T";
480 PRINT "";
481 GOSUB 15000
490 PRINT "G";
500 PRINT "H";
510 PRINT "O";
520 PRINT "S";
530 PRINT "T";
540 PRINT "";
541 GOSUB 15000
550 PRINT "G";
560 PRINT "H";
570 PRINT " ";
580 PRINT " ";
590 PRINT " ";
600 PRINT " ";
610 PRINT " ";
620 PRINT " ";
630 PRINT " ";
640 PRINT " ";
650 PRINT " ";
660 PRINT " ";
670 PRINT " ";
680 PRINT " ";
690 PRINT " ";
700 PRINT "O";
710 PRINT "S";
720 PRINT "T";
730 PRINT "";
731 GOSUB 15000
740 PRINT "G";
750 PRINT "H";
760 PRINT "O";
770 PRINT "S";
780 PRINT "T";
790 PRINT "";
791 GOSUB 15000
800 PRINT "G";
810 PRINT "H";
820 PRINT "O";
830 PRINT "S";
840 PRINT "T";
850 PRINT "";
851 GOSUB 15000
860 PRINT "G";
870 PRINT "H";
880 PRINT "O";
890 PRINT "S";
900 PRINT "T";
910 PRINT "";
911 GOSUB 15000
920 PRINT " ";
930 PRINT " ";
940 PRINT " ";
950 PRINT " ";
960 PRINT " ";
970 PRINT " ";
980 PRINT " ";
990 PRINT " ";
1000 PRINT " ";
1010 PRINT " ";
1020 PRINT " ";
1030 PRINT " ";
1040 PRINT " ";
1050 PRINT " ";
1060 PRINT " ";
1070 PRINT " ";
1080 PRINT " ";
1090 PRINT " ";
1100 PRINT " ";
1110 PRINT " ";
1120 PRINT " ";
1130 PRINT " ";
1140 PRINT "G";
1150 PRINT "H";
1160 PRINT "O";
1170 PRINT "S";
1180 PRINT "T";
1190 PRINT "";
1191 GOSUB 15000
1200 PRINT "G";
1210 PRINT "H";
1220 PRINT "O";
1230 PRINT "S";
1240 PRINT "T";
1250 PRINT "";
1251 GOSUB 15000
1260 PRINT "G";
1270 PRINT "H";
1280 PRINT "O";
1290 PRINT " ";
1300 PRINT " ";
1310 PRINT " ";
1320 PRINT " ";
1330 PRINT " ";
1340 PRINT " ";
1350 PRINT " ";
1360 PRINT " ";
1370 PRINT " ";
1380 PRINT " ";
1390 PRINT " ";
1400 PRINT " ";
1410 PRINT " ";
1420 PRINT " ";
1430 PRINT " ";
1440 PRINT " ";
1450 PRINT " ";
1460 PRINT " ";
1470 PRINT " ";
1480 PRINT " ";
1490 PRINT " ";
1500 PRINT " ";
1510 PRINT " ";
1520 PRINT " ";
1530 PRINT " ";
1540 PRINT " ";
1550 PRINT " ";
1560 PRINT " ";
1570 PRINT "S";
1580 PRINT "T";
1590 PRINT "";
1591 GOSUB 15000
1600 PRINT "G";
1610 PRINT "H";
1620 PRINT "O";
1630 PRINT "S";
1640 PRINT "T";
1650 PRINT "";
1651 GOSUB 15000
1660 PRINT "G";
1670 PRINT "H";
1680 PRINT " ";
1690 PRINT " ";
1700 PRINT " ";
1710 PRINT " ";
1720 PRINT " ";
1730 PRINT " ";
1740 PRINT " ";
1750 PRINT " ";
1760 PRINT " ";
1770 PRINT " ";
1780 PRINT " ";
1790 PRINT " ";
1800 PRINT " ";
1810 PRINT " ";
1820 PRINT " ";
1830 PRINT " ";
1840 PRINT " ";
1850 PRINT " ";
1860 PRINT " ";
1870 PRINT " ";
1880 PRINT " ";
1890 PRINT " ";
1900 PRINT " ";
1910 PRINT " ";
1920 PRINT " ";
1930 PRINT " ";
1940 PRINT " ";
1950 PRINT " ";
1960 PRINT " ";
1970 PRINT " ";
1980 PRINT "O";
1990 PRINT "S";
2000 PRINT "T";
2010 PRINT "";
2011 GOSUB 15000
2020 PRINT "G";
2030 PRINT "H";
2040 PRINT "O";
2050 PRINT "S";
2060 PRINT " ";
2070 PRINT " ";
2080 PRINT " ";
2090 PRINT " ";
2100 PRINT " ";
2110 PRINT " ";
2120 PRINT " ";
2130 PRINT " ";
2140 PRINT " ";
2150 PRINT " ";
2160 PRINT " ";
2170 PRINT " ";
2180 PRINT " ";
2190 PRINT " ";
2200 PRINT " ";
2210 PRINT " ";
2220 PRINT " ";
2230 PRINT " ";
2240 PRINT " ";
2250 PRINT " ";
2260 PRINT "T";
2270 PRINT "";
2271 GOSUB 15000
2280 PRINT "G";
2290 PRINT "H";
2300 PRINT "O";
2310 PRINT "S";
2320 PRINT "T";
2330 PRINT " ";
2340 PRINT " ";
2350 PRINT " ";
2360 PRINT " ";
2370 PRINT " ";
2380 PRINT " ";
2390 PRINT " ";
2400 PRINT "";
2401 GOSUB 15000
2410 PRINT "G";
2420 PRINT "H";
2430 PRINT "O";
2440 PRINT "S";
2450 PRINT " ";
2460 PRINT " ";
2470 PRINT " ";
2480 PRINT " ";
2490 PRINT " ";
2500 PRINT " ";
2510 PRINT " ";
2520 PRINT " ";
2530 PRINT " ";
2540 PRINT " ";
2550 PRINT " ";
2560 PRINT " ";
2570 PRINT " ";
2580 PRINT " ";
2590 PRINT " ";
2600 PRINT " ";
2610 PRINT " ";
2620 PRINT " ";
2630 PRINT " ";
2640 PRINT "T";
2650 PRINT "";
2651 GOSUB 15000
2660 PRINT "G";
2670 PRINT "H";
2680 PRINT "O";
2690 PRINT "S";
2700 PRINT "T";
2710 PRINT "";
2711 GOSUB 15000
2720 PRINT "G";
2730 PRINT "H";
2740 PRINT " ";
2750 PRINT " ";
2760 PRINT " ";
2770 PRINT " ";
2780 PRINT " ";
2790 PRINT " ";
2800 PRINT "O";
2810 PRINT "S";
2820 PRINT "T";
2830 PRINT "";
2831 GOSUB 15000
2840 PRINT " ";
2850 PRINT " ";
2860 PRINT " ";
2870 PRINT " ";
2880 PRINT " ";
2890 PRINT " ";
2900 PRINT " ";
2910 PRINT " ";
2920 PRINT "G";
2930 PRINT " ";
2940 PRINT " ";
2950 PRINT " ";
2960 PRINT " ";
2970 PRINT " ";
2980 PRINT " ";
2990 PRINT " ";
3000 PRINT " ";
3010 PRINT " ";
3020 PRINT " ";
3030 PRINT "H";
3040 PRINT "O";
3050 PRINT "S";
3060 PRINT "T";
3070 PRINT "";
3071 GOSUB 15000
3080 PRINT "G";
3090 PRINT "H";
3100 PRINT "O";
3110 PRINT "S";
3120 PRINT "T";
3130 PRINT "";
3131 GOSUB 15000
3140 PRINT " ";
3150 PRINT " ";
3160 PRINT " ";
3170 PRINT " ";
3180 PRINT " ";
3190 PRINT " ";
3200 PRINT "G";
3210 PRINT "H";
3220 PRINT "O";
3230 PRINT " ";
3240 PRINT " ";
3250 PRINT " ";
3260 PRINT " ";
3270 PRINT " ";
3280 PRINT " ";
3290 PRINT " ";
3300 PRINT "S";
3310 PRINT "T";
3320 PRINT "";
3321 GOSUB 15000
3330 PRINT "G";
3340 PRINT "H";
3350 PRINT "O";
3360 PRINT " ";
3370 PRINT " ";
3380 PRINT " ";
3390 PRINT " ";
3400 PRINT " ";
3410 PRINT " ";
3420 PRINT " ";
3430 PRINT "S";
3440 PRINT "T";
3450 PRINT "";
3451 GOSUB 15000
3460 PRINT "G";
3470 PRINT "H";
3480 PRINT "O";
3490 PRINT "S";
3500 PRINT "T";
3510 PRINT "";
3511 GOSUB 15000
3520 PRINT "G";
3530 PRINT "H";
3540 PRINT " ";
3550 PRINT " ";
3560 PRINT " ";
3570 PRINT " ";
3580 PRINT " ";
3590 PRINT " ";
3600 PRINT "O";
3610 PRINT "S";
3620 PRINT " ";
3630 PRINT " ";
3640 PRINT " ";
3650 PRINT " ";
3660 PRINT " ";
3670 PRINT " ";
3680 PRINT "T";
3690 PRINT "";
3691 GOSUB 15000
3700 PRINT "G";
3710 PRINT "H";
3720 PRINT "O";
3730 PRINT "S";
3740 PRINT "T";
3750 PRINT "";
3751 GOSUB 15000
3760 PRINT "G";
3770 PRINT "H";
3780 PRINT " ";
3790 PRINT " ";
3800 PRINT " ";
3810 PRINT " ";
3820 PRINT " ";
3830 PRINT " ";
3840 PRINT "O";
3850 PRINT "S";
3860 PRINT "T";
3870 PRINT "";
3871 GOSUB 15000
3880 PRINT "G";
3890 PRINT "H";
3900 PRINT "O";
3910 PRINT "S";
3920 PRINT " ";
3930 PRINT " ";
3940 PRINT " ";
3950 PRINT " ";
3960 PRINT " ";
3970 PRINT " ";
3980 PRINT " ";
3990 PRINT "T";
4000 PRINT "";
4001 GOSUB 15000
4010 PRINT "G";
4020 PRINT " ";
4030 PRINT " ";
4040 PRINT " ";
4050 PRINT " ";
4060 PRINT " ";
4070 PRINT " ";
4080 PRINT "H";
4090 PRINT "O";
4100 PRINT "S";
4110 PRINT "T";
4120 PRINT "";
4121 GOSUB 15000
4130 PRINT "G";
4140 PRINT "H";
4150 PRINT "O";
4160 PRINT "S";
4170 PRINT " ";
4180 PRINT " ";
4190 PRINT " ";
4200 PRINT " ";
4210 PRINT " ";
4220 PRINT " ";
4230 PRINT " ";
4240 PRINT " ";
4250 PRINT " ";
4260 PRINT " ";
4270 PRINT "T";
4280 PRINT "";
4281 GOSUB 15000
4290 PRINT " ";
4300 PRINT " ";
4310 PRINT " ";
4320 PRINT " ";
4330 PRINT " ";
4340 PRINT " ";
4350 PRINT " ";
4360 PRINT " ";
4370 PRINT " ";
4380 PRINT "G";
4390 PRINT "H";
4400 PRINT "O";
4410 PRINT " ";
4420 PRINT " ";
4430 PRINT " ";
4440 PRINT " ";
4450 PRINT " ";
4460 PRINT " ";
4470 PRINT " ";
4480 PRINT "S";
4490 PRINT "T";
4500 PRINT "";
4501 GOSUB 15000
4510 PRINT "G";
4520 PRINT "H";
4530 PRINT "O";
4540 PRINT "S";
4550 PRINT "T";
4560 PRINT "";
4561 GOSUB 15000
4570 PRINT " ";
4580 PRINT " ";
4590 PRINT "G";
4600 PRINT "H";
4610 PRINT " ";
4620 PRINT " ";
4630 PRINT " ";
4640 PRINT " ";
4650 PRINT " ";
4660 PRINT " ";
4670 PRINT " ";
4680 PRINT " ";
4690 PRINT " ";
4700 PRINT " ";
4710 PRINT " ";
4720 PRINT " ";
4730 PRINT " ";
4740 PRINT " ";
4750 PRINT " ";
4760 PRINT " ";
4770 PRINT "O";
4780 PRINT "S";
4790 PRINT "T";
4800 PRINT "";
4801 GOSUB 15000
4810 PRINT "G";
4820 PRINT " ";
4830 PRINT " ";
4840 PRINT " ";
4850 PRINT " ";
4860 PRINT " ";
4870 PRINT " ";
4880 PRINT " ";
4890 PRINT " ";
4900 PRINT "H";
4910 PRINT "O";
4920 PRINT " ";
4930 PRINT "S";
4940 PRINT "T";
4950 PRINT "";
4951 GOSUB 15000
4960 PRINT " ";
4970 PRINT " ";
4980 PRINT "G";
4990 PRINT "H";
5000 PRINT "O";
5010 PRINT "S";
5020 PRINT "T";
5030 PRINT " ";
5040 PRINT " ";
5050 PRINT " ";
5060 PRINT " ";
5070 PRINT " ";
5080 PRINT " ";
5090 PRINT " ";
5100 PRINT " ";
5110 PRINT " ";
5120 PRINT " ";
5130 PRINT " ";
5140 PRINT " ";
5150 PRINT "";
5151 GOSUB 15000
5160 PRINT "G";
5170 PRINT "H";
5180 PRINT "O";
5190 PRINT "S";
5200 PRINT "T";
5210 PRINT "";
5211 GOSUB 15000
5220 PRINT " ";
5230 PRINT " ";
5240 PRINT " ";
5250 PRINT " ";
5260 PRINT " ";
5270 PRINT " ";
5280 PRINT " ";
5290 PRINT " ";
5300 PRINT " ";
5310 PRINT " ";
5320 PRINT " ";
5330 PRINT " ";
5340 PRINT " ";
5350 PRINT " ";
5360 PRINT " ";
5370 PRINT " ";
5380 PRINT "G";
5390 PRINT "H";
5400 PRINT "O";
5410 PRINT "S";
5420 PRINT "T";
5430 PRINT " ";
5440 PRINT " ";
5450 PRINT " ";
5460 PRINT " ";
5470 PRINT " ";
5480 PRINT " ";
5490 PRINT " ";
5500 PRINT " ";
5510 PRINT " ";
5520 PRINT "";
5521 GOSUB 15000
5530 PRINT "G";
5540 PRINT "H";
5550 PRINT "O";
5560 PRINT "S";
5570 PRINT "T";
5580 PRINT "";
5581 GOSUB 15000
5590 PRINT "G";
5600 PRINT "H";
5610 PRINT "O";
5620 PRINT "S";
5630 PRINT "T";
5640 PRINT " ";
5650 PRINT " ";
5660 PRINT " ";
5670 PRINT " ";
5680 PRINT " ";
5690 PRINT " ";
5700 PRINT " ";
5710 PRINT " ";
5720 PRINT " ";
5730 PRINT " ";
5740 PRINT " ";
5750 PRINT " ";
5760 PRINT " ";
5770 PRINT "";
5771 GOSUB 15000
5780 PRINT "G";
5790 PRINT "H";
5800 PRINT " ";
5810 PRINT " ";
5820 PRINT " ";
5830 PRINT " ";
5840 PRINT " ";
5850 PRINT " ";
5860 PRINT " ";
5870 PRINT " ";
5880 PRINT " ";
5890 PRINT " ";
5900 PRINT "O";
5910 PRINT "S";
5920 PRINT "T";
5930 PRINT "";
5931 GOSUB 15000
5940 PRINT "G";
5950 PRINT "H";
5960 PRINT "O";
5970 PRINT "S";
5980 PRINT "T";
5990 PRINT "";
5991 GOSUB 15000
6000 PRINT "G";
6010 PRINT "H";
6020 PRINT "O";
6030 PRINT "S";
6040 PRINT "T";
6050 PRINT "";
6051 GOSUB 15000
6060 PRINT "G";
6070 PRINT "H";
6080 PRINT "O";
6090 PRINT " ";
6100 PRINT " ";
6110 PRINT " ";
6120 PRINT " ";
6130 PRINT " ";
6140 PRINT " ";
6150 PRINT " ";
6160 PRINT " ";
6170 PRINT " ";
6180 PRINT " ";
6190 PRINT " ";
6200 PRINT " ";
6210 PRINT " ";
6220 PRINT " ";
6230 PRINT " ";
6240 PRINT " ";
6250 PRINT " ";
6260 PRINT " ";
6270 PRINT " ";
6280 PRINT " ";
6290 PRINT " ";
6300 PRINT "S";
6310 PRINT "T";
6320 PRINT "";
6321 GOSUB 15000
6330 PRINT "G";
6340 PRINT "H";
6350 PRINT "O";
6360 PRINT "S";
6370 PRINT "T";
6380 PRINT "";
6381 GOSUB 15000
6390 PRINT "G";
6400 PRINT "H";
6410 PRINT "O";
6420 PRINT "S";
6430 PRINT "T";
6440 PRINT "";
6441 GOSUB 15000
6450 PRINT "G";
6460 PRINT "H";
6470 PRINT "O";
6480 PRINT "S";
6490 PRINT "T";
6500 PRINT "";
6501 GOSUB 15000
6510 PRINT "G";
6520 PRINT "H";
6530 PRINT " ";
6540 PRINT " ";
6550 PRINT " ";
6560 PRINT " ";
6570 PRINT "O";
6580 PRINT " ";
6590 PRINT " ";
6600 PRINT " ";
6610 PRINT " ";
6620 PRINT " ";
6630 PRINT " ";
6640 PRINT "S";
6650 PRINT "T";
6660 PRINT " ";
6670 PRINT " ";
6680 PRINT " ";
6690 PRINT "";
6691 GOSUB 15000
6700 PRINT "G";
6710 PRINT "H";
6720 PRINT "O";
6730 PRINT "S";
6740 PRINT "T";
6750 PRINT "";
6751 GOSUB 15000
6760 PRINT "G";
6770 PRINT "H";
6780 PRINT "O";
6790 PRINT "S";
6800 PRINT "T";
6810 PRINT "";
6811 GOSUB 15000
6820 PRINT "G";
6830 PRINT "H";
6840 PRINT "O";
6850 PRINT "S";
6860 PRINT "T";
6870 PRINT "";
6871 GOSUB 15000
6880 PRINT "G";
6890 PRINT "H";
6900 PRINT "O";
6910 PRINT "S";
6920 PRINT "T";
6930 PRINT " ";
6940 PRINT " ";
6950 PRINT " ";
6960 PRINT "";
6961 GOSUB 15000
6970 PRINT "G";
6980 PRINT "H";
6990 PRINT " ";
7000 PRINT " ";
7010 PRINT " ";
7020 PRINT " ";
7030 PRINT " ";
7040 PRINT "O";
7050 PRINT "S";
7060 PRINT "T";
7070 PRINT " ";
7080 PRINT " ";
7090 PRINT " ";
7100 PRINT "";
7101 GOSUB 15000
7110 PRINT "G";
7120 PRINT "H";
7130 PRINT "O";
7140 PRINT "S";
7150 PRINT "T";
7160 PRINT "";
7161 GOSUB 15000
7170 PRINT "G";
7180 PRINT "H";
7190 PRINT "O";
7200 PRINT "S";
7210 PRINT "T";
7220 PRINT "";
7221 GOSUB 15000
7230 PRINT "G";
7240 PRINT "H";
7250 PRINT "O";
7260 PRINT "S";
7270 PRINT "T";
7280 PRINT "";
7281 GOSUB 15000
7290 PRINT "G";
7300 PRINT "H";
7310 PRINT "O";
7320 PRINT "S";
7330 PRINT " ";
7340 PRINT " ";
7350 PRINT " ";
7360 PRINT "T";
7370 PRINT "";
7371 GOSUB 15000
7380 PRINT " ";
7390 PRINT " ";
7400 PRINT " ";
7410 PRINT " ";
7420 PRINT "G";
7430 PRINT "H";
7440 PRINT "O";
7450 PRINT "S";
7460 PRINT "T";
7470 PRINT "";
7471 GOSUB 15000
7480 PRINT "G";
7490 PRINT " ";
7500 PRINT "H";
7510 PRINT "O";
7520 PRINT "S";
7530 PRINT "T";
7540 PRINT "";
7541 GOSUB 15000
7550 PRINT "G";
7560 PRINT "H";
7570 PRINT "O";
7580 PRINT "S";
7590 PRINT "T";
7600 PRINT "";
7601 GOSUB 15000
7610 PRINT "G";
7620 PRINT "H";
7630 PRINT "O";
7640 PRINT "S";
7650 PRINT "T";
7660 PRINT "";
7661 GOSUB 15000
7670 PRINT "G";
7680 PRINT "H";
7690 PRINT "O";
7700 PRINT "S";
7710 PRINT "T";
7720 PRINT " ";
7730 PRINT " ";
7740 PRINT " ";
7750 PRINT " ";
7760 PRINT "";
7761 GOSUB 15000
7770 PRINT "G";
7780 PRINT "H";
7790 PRINT "O";
7800 PRINT "S";
7810 PRINT "T";
7820 PRINT "";
7821 GOSUB 15000
7830 PRINT "G";
7840 PRINT "H";
7850 PRINT "O";
7860 PRINT "S";
7870 PRINT " ";
7880 PRINT " ";
7890 PRINT " ";
7900 PRINT " ";
7910 PRINT "T";
7920 PRINT "";
7921 GOSUB 15000
7930 PRINT "G";
7940 PRINT "H";
7950 PRINT "O";
7960 PRINT "S";
7970 PRINT "T";
7980 PRINT "";
7981 GOSUB 15000
7990 PRINT "G";
8000 PRINT "H";
8010 PRINT "O";
8020 PRINT "S";
8030 PRINT "T";
8040 PRINT "";
8041 GOSUB 15000
8050 PRINT "G";
8060 PRINT "H";
8070 PRINT "O";
8080 PRINT "S";
8090 PRINT "T";
8100 PRINT "";
8101 GOSUB 15000
8110 PRINT "G";
8120 PRINT " ";
8130 PRINT " ";
8140 PRINT "H";
8150 PRINT "O";
8160 PRINT "S";
8170 PRINT "T";
8180 PRINT " ";
8190 PRINT " ";
8200 PRINT " ";
8210 PRINT " ";
8220 PRINT " ";
8230 PRINT " ";
8240 PRINT " ";
8250 PRINT "";
8251 GOSUB 15000
8260 PRINT "G";
8270 PRINT " ";
8280 PRINT " ";
8290 PRINT " ";
8300 PRINT " ";
8310 PRINT "H";
8320 PRINT "O";
8330 PRINT "S";
8340 PRINT "T";
8350 PRINT "";
8351 GOSUB 15000
8360 PRINT "G";
8370 PRINT "H";
8380 PRINT "O";
8390 PRINT "S";
8400 PRINT "T";
8410 PRINT "";
8411 GOSUB 15000
8420 PRINT "G";
8430 PRINT "H";
8440 PRINT "O";
8450 PRINT "S";
8460 PRINT "T";
8470 PRINT "";
8471 GOSUB 15000
8480 PRINT "G";
8490 PRINT "H";
8500 PRINT "O";
8510 PRINT "S";
8520 PRINT " ";
8530 PRINT " ";
8540 PRINT " ";
8550 PRINT " ";
8560 PRINT " ";
8570 PRINT "T";
8580 PRINT " ";
8590 PRINT " ";
8600 PRINT "";
8601 GOSUB 15000
8610 PRINT "G";
8620 PRINT "H";
8630 PRINT "O";
8640 PRINT " ";
8650 PRINT " ";
8660 PRINT " ";
8670 PRINT " ";
8680 PRINT " ";
8690 PRINT " ";
8700 PRINT " ";
8710 PRINT " ";
8720 PRINT "S";
8730 PRINT "T";
8740 PRINT "";
8741 GOSUB 15000
8750 PRINT "G";
8760 PRINT "H";
8770 PRINT "O";
8780 PRINT "S";
8790 PRINT "T";
8800 PRINT "";
8801 GOSUB 15000
8810 PRINT "G";
8820 PRINT "H";
8830 PRINT "O";
8840 PRINT "S";
8850 PRINT "T";
8860 PRINT "";
8861 GOSUB 15000
8870 PRINT "G";
8880 PRINT "H";
8890 PRINT "O";
8900 PRINT "S";
8910 PRINT "T";
8920 PRINT " ";
8930 PRINT " ";
8940 PRINT " ";
8950 PRINT " ";
8960 PRINT "";
8961 GOSUB 15000
8970 PRINT "G";
8980 PRINT "H";
8990 PRINT "O";
9000 PRINT "S";
9010 PRINT "T";
9020 PRINT "";
9021 GOSUB 15000
9030 PRINT "G";
9040 PRINT "H";
9050 PRINT "O";
9060 PRINT "S";
9070 PRINT "T";
9080 PRINT "";
9081 GOSUB 15000
9090 PRINT "G";
9100 PRINT "H";
9110 PRINT " ";
9120 PRINT "O";
9130 PRINT "S";
9140 PRINT "T";
9150 PRINT "";
9151 GOSUB 15000
9160 PRINT "G";
9170 PRINT "H";
9180 PRINT "O";
9190 PRINT "S";
9200 PRINT "T";
9210 PRINT "";
9211 GOSUB 15000
9220 PRINT "G";
9230 PRINT "H";
9240 PRINT "O";
9250 PRINT "S";
9260 PRINT "T";
9270 PRINT "";
9271 GOSUB 15000
9280 PRINT "G";
9290 PRINT "H";
9300 PRINT "O";
9310 PRINT "S";
9320 PRINT "T";
9330 PRINT "";
9331 GOSUB 15000
9340 PRINT "G";
9350 PRINT "H";
9360 PRINT "O";
9370 PRINT "S";
9380 PRINT "T";
9390 PRINT "";
9391 GOSUB 15000
9400 PRINT "G";
9410 PRINT "H";
9420 PRINT "O";
9430 PRINT "S";
9440 PRINT "T";
9450 PRINT "";
9451 GOSUB 15000
9460 PRINT "G";
9470 PRINT "H";
9480 PRINT "O";
9490 PRINT "S";
9500 PRINT "T";
9510 PRINT "";
9511 GOSUB 15000
9520 PRINT "G";
9530 PRINT "H";
9540 PRINT "O";
9550 PRINT "S";
9560 PRINT "T";
9570 PRINT "";
9571 GOSUB 15000
9580 PRINT "G";
9590 PRINT "H";
9600 PRINT "O";
9610 PRINT "S";
9620 PRINT "T";
9630 PRINT "";
9631 GOSUB 15000
9640 PRINT "G";
9650 PRINT "H";
9660 PRINT "O";
9670 PRINT "S";
9680 PRINT "T";
9690 PRINT "";
9691 GOSUB 15000
9700 PRINT "G";
9710 PRINT "H";
9720 PRINT "O";
9730 PRINT "S";
9740 PRINT "T";
9750 PRINT "";
9751 GOSUB 15000
9760 PRINT "G";
9770 PRINT "H";
9780 PRINT "O";
9790 PRINT "S";
9800 PRINT "T";
9810 PRINT "";
9811 GOSUB 15000
9820 PRINT "G";
9830 PRINT "H";
9840 PRINT "O";
9850 PRINT "S";
9860 PRINT "T";
9870 PRINT "";
9871 GOSUB 15000
9880 PRINT "G";
9890 PRINT "H";
9900 PRINT "O";
9910 PRINT "S";
9920 PRINT "T";
9930 PRINT "";
9931 GOSUB 15000
9940 PRINT "G";
9950 PRINT "H";
9960 PRINT "O";
9970 PRINT "S";
9980 PRINT "T";
9990 PRINT "";
9991 GOSUB 15000
9992 PRINT "G";
9993 GOTO 10





10000 T=500 : GOSUB 20000

15000 C = RND(1)*16 : R = RND(1)*16 : W = RND(1)*16
15003 POKE 53280, R
15005 RETURN

20000 T0=TI: FOR T=T0T*60 TO T: T=TI:T=T-5184E3*(T<T0): NEXT: RETURN