110 PRINT"[147] VERIFYING DATA STATEMENTS...":LN=1000 120 FOR X=1 TO 111:CA=0:LN=LN+10 130 FOR Y=1 TO 12:READ BYTE 140 CA=CA+BYTE:NEXT Y 150 READ CS:IF CA<>CS THENPRINT"DATA STATEMENT ERROR AT LINE ";LN:END 160 NEXT X 200 RESTORE:PRINT"[147]";:A=49152 210 FOR X=1 TO 16:PRINT"";:NEXT:PRINT"_"; 250 FOR X=1 TO 111 260 FOR Y=1 TO 12:READ BYTE 270 POKE A,BYTE:A=A+1 280 IF T=1 THEN T=0:GOTO 290 285 PRINT"[166]";:T=1 290 NEXT Y:READ CS 300 NEXT X 310 SYS 49152:END 1010 DATA 32, 118, 192, 165, 125, 201, 243, 208, 15, 169, 76, 141, 1685 1020 DATA 41, 192, 169, 243, 141, 42, 192, 169, 204, 141, 43, 192, 1769 1030 DATA 169, 76, 133, 124, 169, 37, 133, 125, 169, 192, 133, 126, 1586 1040 DATA 96, 201, 255, 240, 10, 201, 58, 176, 3, 76, 128, 0, 1444 1050 DATA 76, 138, 0, 32, 118, 192, 32, 159, 255, 32, 228, 255, 1517 1060 DATA 201, 0, 240, 246, 201, 133, 208, 3, 76, 97, 193, 201, 1799 1070 DATA 137, 208, 3, 76, 226, 194, 201, 134, 208, 3, 76, 232, 1698 1080 DATA 195, 201, 138, 208, 3, 76, 56, 196, 201, 135, 208, 3, 1620 1090 DATA 76, 210, 196, 201, 139, 208, 207, 169, 201, 133, 124, 169, 2033 1100 DATA 58, 133, 125, 169, 176, 133, 126, 76, 134, 227, 162, 0, 1519 1110 DATA 189, 132, 192, 32, 210, 255, 232, 224, 219, 208, 245, 96, 2234 1120 DATA 13, 13, 32, 32, 32, 32, 69, 68, 73, 84, 47, 87, 582 1130 DATA 69, 68, 71, 69, 32, 40, 67, 41, 32, 49, 57, 56, 651 1140 DATA 53, 32, 77, 73, 75, 69, 32, 76, 69, 73, 68, 69, 766 1150 DATA 76, 13, 13, 32, 32, 32, 32, 32, 32, 32, 32, 83, 441 1160 DATA 72, 73, 70, 84, 32, 94, 32, 40, 82, 69, 84, 85, 817 1170 DATA 82, 78, 41, 32, 84, 79, 32, 69, 78, 84, 69, 82, 810 1180 DATA 13, 32, 32, 32, 32, 32, 32, 32, 32, 70, 49, 32, 420 1190 DATA 32, 61, 32, 83, 69, 65, 82, 67, 72, 13, 32, 32, 640 1200 DATA 32, 32, 32, 32, 32, 32, 70, 50, 32, 32, 61, 32, 469 1210 DATA 76, 73, 78, 69, 32, 78, 85, 77, 66, 69, 82, 83, 868 1220 DATA 13, 32, 32, 32, 32, 32, 32, 32, 32, 70, 51, 32, 422 1230 DATA 32, 61, 32, 82, 69, 80, 69, 65, 84, 32, 84, 79, 769 1240 DATA 71, 71, 76, 69, 13, 32, 32, 32, 32, 32, 32, 32, 524 1250 DATA 32, 70, 52, 32, 32, 61, 32, 67, 79, 76, 79, 82, 694 1260 DATA 83, 13, 32, 32, 32, 32, 32, 32, 32, 32, 70, 53, 475 1270 DATA 32, 32, 61, 32, 77, 69, 77, 79, 82, 89, 13, 32, 675 1280 DATA 32, 32, 32, 32, 32, 32, 32, 70, 54, 32, 32, 61, 473 1290 DATA 32, 68, 69, 76, 73, 78, 75, 32, 87, 69, 68, 71, 798 1300 DATA 69, 13, 13, 13, 13, 162, 0, 142, 44, 194, 169, 8, 840 1310 DATA 141, 45, 194, 142, 48, 194, 189, 49, 194, 32, 210, 255, 1693 1320 DATA 232, 224, 13, 208, 245, 162, 0, 32, 207, 255, 201, 13, 1792 1330 DATA 240, 7, 157, 62, 194, 232, 76, 123, 193, 142, 47, 194, 1667 1340 DATA 169, 13, 32, 210, 255, 32, 210, 255, 32, 35, 194, 201, 1638 1350 DATA 0, 208, 3, 76, 134, 227, 32, 35, 194, 162, 0, 32, 1103 1360 DATA 35, 194, 141, 221, 194, 141, 223, 194, 32, 35, 194, 141, 1745 1370 DATA 222, 194, 141, 224, 194, 32, 35, 194, 201, 0, 208, 23, 1668 1380 DATA 32, 35, 194, 201, 0, 240, 6, 32, 35, 194, 76, 161, 1206 1390 DATA 193, 32, 35, 194, 201, 0, 208, 209, 76, 134, 227, 221, 1730 1400 DATA 62, 194, 240, 5, 162, 0, 76, 181, 193, 232, 236, 47, 1628 1410 DATA 194, 208, 210, 238, 48, 194, 173, 48, 194, 201, 2, 208, 1918 1420 DATA 10, 169, 13, 32, 210, 255, 169, 0, 141, 48, 194, 169, 1410 1430 DATA 32, 32, 210, 255, 32, 210, 255, 32, 210, 255, 32, 122, 1677 1440 DATA 194, 169, 40, 32, 210, 255, 173, 44, 194, 141, 221, 194, 1867 1450 DATA 173, 45, 194, 141, 222, 194, 32, 122, 194, 169, 41, 32, 1559 1460 DATA 210, 255, 162, 0, 76, 181, 193, 238, 44, 194, 208, 3, 1764 1470 DATA 238, 45, 194, 173, 0, 8, 96, 0, 0, 13, 83, 69, 919 1480 DATA 65, 82, 67, 72, 32, 70, 79, 82, 63, 32, 32, 32, 708 1490 DATA 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 384 1500 DATA 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 384 1510 DATA 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 384 1520 DATA 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 384 1530 DATA 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 160, 0, 480 1540 DATA 140, 225, 194, 162, 0, 173, 221, 194, 56, 249, 213, 194, 2021 1550 DATA 141, 221, 194, 173, 222, 194, 200, 249, 213, 194, 144, 8, 2153 1560 DATA 141, 222, 194, 232, 136, 76, 129, 194, 136, 173, 221, 194, 2048 1570 DATA 121, 213, 194, 141, 221, 194, 138, 208, 7, 44, 225, 194, 1900 1580 DATA 48, 7, 16, 10, 162, 128, 142, 225, 194, 9, 48, 32, 1021 1590 DATA 210, 255, 200, 200, 192, 8, 144, 191, 173, 221, 194, 9, 1997 1600 DATA 48, 32, 210, 255, 173, 223, 194, 141, 221, 194, 173, 224, 2088 1610 DATA 194, 141, 222, 194, 96, 16, 39, 232, 3, 100, 0, 10, 1247 1620 DATA 0, 0, 0, 0, 0, 0, 169, 13, 32, 210, 255, 162, 841 1630 DATA 0, 189, 127, 195, 32, 210, 255, 232, 224, 27, 208, 245, 1944 1640 DATA 32, 179, 195, 144, 3, 76, 134, 227, 173, 231, 195, 141, 1730 1650 DATA 125, 195, 162, 0, 189, 154, 195, 32, 210, 255, 232, 224, 1973 1660 DATA 25, 208, 245, 32, 179, 195, 144, 3, 76, 134, 227, 173, 1641 1670 DATA 231, 195, 141, 110, 195, 169, 0, 141, 126, 195, 169, 1, 1673 1680 DATA 141, 67, 195, 169, 8, 141, 68, 195, 173, 67, 195, 201, 1620 1690 DATA 0, 208, 10, 173, 68, 195, 201, 0, 208, 3, 76, 134, 1276 1700 DATA 227, 162, 2, 173, 125, 195, 157, 1, 8, 173, 126, 195, 1544 1710 DATA 232, 224, 4, 208, 245, 173, 67, 195, 141, 94, 195, 173, 1951 1720 DATA 68, 195, 141, 95, 195, 162, 0, 160, 1, 189, 1, 8, 1215 1730 DATA 153, 66, 195, 200, 232, 224, 2, 208, 244, 24, 173, 125, 1846 1740 DATA 195, 105, 0, 141, 125, 195, 173, 126, 195, 105, 0, 141, 1501 1750 DATA 126, 195, 76, 44, 195, 0, 0, 69, 78, 84, 69, 82, 1018 1760 DATA 32, 51, 32, 68, 73, 71, 73, 84, 32, 66, 69, 71, 722 1770 DATA 73, 78, 73, 78, 71, 32, 78, 66, 82, 32, 13, 69, 745 1780 DATA 78, 84, 69, 82, 32, 51, 32, 68, 73, 71, 73, 84, 797 1790 DATA 32, 73, 78, 67, 82, 69, 77, 69, 78, 84, 32, 32, 773 1800 DATA 197, 195, 141, 231, 195, 32, 197, 195, 32, 211, 195, 32, 1853 1810 DATA 197, 195, 76, 211, 195, 32, 207, 255, 201, 48, 144, 249, 2010 1820 DATA 201, 58, 176, 245, 41, 15, 96, 141, 230, 195, 173, 231, 1802 1830 DATA 195, 10, 10, 109, 231, 195, 10, 109, 230, 195, 141, 231, 1666 1840 DATA 195, 96, 0, 0, 173, 138, 2, 201, 128, 240, 21, 169, 1363 1850 DATA 128, 141, 138, 2, 162, 0, 189, 25, 196, 32, 210, 255, 1478 1860 DATA 232, 224, 15, 208, 245, 76, 22, 196, 169, 0, 141, 138, 1666 1870 DATA 2, 162, 0, 189, 40, 196, 32, 210, 255, 232, 224, 16, 1558 1880 DATA 208, 245, 76, 134, 227, 13, 75, 69, 89, 32, 82, 69, 1319 1890 DATA 80, 69, 65, 84, 32, 79, 78, 46, 13, 75, 69, 89, 779 1900 DATA 32, 82, 69, 80, 69, 65, 84, 32, 79, 70, 70, 46, 778 1910 DATA 162, 0, 189, 103, 196, 32, 210, 255, 232, 224, 28, 208, 1839 1920 DATA 245, 32, 163, 196, 173, 208, 196, 141, 32, 208, 162, 0, 1756 1930 DATA 189, 131, 196, 32, 210, 255, 232, 224, 32, 208, 245, 32, 1986 1940 DATA 163, 196, 173, 208, 196, 141, 33, 208, 76, 134, 227, 13, 1768 1950 DATA 69, 78, 84, 69, 82, 32, 50, 32, 68, 73, 71, 73, 781 1960 DATA 84, 32, 66, 79, 82, 68, 69, 82, 32, 67, 79, 76, 816 1970 DATA 79, 82, 32, 13, 69, 78, 84, 69, 82, 32, 50, 32, 702 1980 DATA 68, 73, 71, 73, 84, 32, 66, 65, 67, 75, 71, 82, 827 1990 DATA 79, 85, 78, 68, 32, 67, 79, 76, 79, 82, 32, 32, 789 2000 DATA 175, 196, 141, 208, 196, 32, 175, 196, 76, 189, 196, 32, 1812 2010 DATA 207, 255, 201, 48, 144, 249, 201, 58, 176, 245, 41, 15, 1840 2020 DATA 96, 141, 209, 196, 173, 208, 196, 10, 10, 109, 208, 196, 1752 2030 DATA 10, 109, 209, 196, 141, 208, 196, 96, 0, 0, 169, 0, 1334 2040 DATA 141, 44, 194, 169, 8, 141, 45, 194, 32, 35, 194, 201, 1398 2050 DATA 0, 208, 249, 32, 35, 194, 201, 0, 208, 242, 32, 35, 1436 2060 DATA 194, 201, 0, 208, 235, 56, 169, 0, 237, 44, 194, 141, 1679 2070 DATA 221, 194, 169, 160, 237, 45, 194, 141, 222, 194, 162, 0, 1939 2080 DATA 189, 21, 197, 32, 210, 255, 232, 224, 10, 208, 245, 32, 1855 2090 DATA 122, 194, 76, 134, 227, 13, 77, 69, 77, 79, 82, 89, 1239 2100 DATA 32, 61, 32, 232, 208, 237, 224, 7, 176, 6, 32, 210, 1457 2110 DATA 255, 232, 208, 246, 32, 202, 194, 240, 186, 201, 32, 240, 2268