Classic Computer Magazine Archive PROGRAM LISTING: 87-08/TOPDOT1.LST


10 REM TAPELESS
12 REM BY ROBERT GRUNBOK
14 REM (c)1987, ANTIC PUBLISHING INC.
16 REM TOPDOT1
210 REM filename = TOPDOT1.LST
220 REM CHARACTER SET DATA FOR:       GEMINI 10/15X AND OKIDATA 92/93       (PRINTHEAD TOP DOT VALUE = 1)
230 DATA 33,8,0,0,0,8,0,8,0,8
240 DATA 34,0,0,0,0,0,0,20,0,20
250 DATA 35,20,0,20,107,20,0,127,0,20
260 DATA 36,8,55,72,0,127,0,9,118,8
270 DATA 37,49,72,51,4,8,16,102,9,70
280 DATA 38,94,33,16,41,78,16,2,16,12
290 DATA 39,0,0,0,0,0,0,8,0,8
300 DATA 40,32,16,8,0,8,0,8,16,32
310 DATA 41,2,4,8,0,8,0,8,4,2
320 DATA 42,0,34,20,8,119,8,20,34,0
330 DATA 43,0,8,0,8,119,8,0,8,0
340 DATA 44,4,8,0,12,0,0,0,0,0
350 DATA 45,0,0,0,0,127,0,0,0,0
360 DATA 46,12,0,12,0,0,0,0,0,0
370 DATA 47,0,1,2,4,8,16,32,64,0
380 DATA 48,28,34,69,8,65,8,81,34,28
390 DATA 49,28,0,8,0,8,0,8,4,8
400 DATA 50,127,0,1,2,60,64,0,65,62
410 DATA 51,62,65,0,64,32,28,32,64,63
420 DATA 52,32,0,127,1,34,4,40,16,32
430 DATA 53,31,32,64,0,65,62,1,0,127
440 DATA 54,28,34,65,0,67,60,1,2,60
450 DATA 55,4,0,4,8,16,32,64,0,127
460 DATA 56,62,65,0,65,28,34,0,34,28
470 DATA 57,14,16,32,64,62,65,0,65,62
480 DATA 58,12,0,12,0,0,12,0,12,0
490 DATA 59,4,8,0,12,0,0,12,0,12
500 DATA 60,32,16,8,4,2,4,8,16,32
510 DATA 61,0,0,127,0,0,127,0,0,0
520 DATA 62,2,4,8,16,32,16,8,4,2
530 DATA 63,8,0,0,8,16,32,0,33,30
540 DATA 64,126,1,0,57,68,57,64,33,30
550 DATA 65,65,0,65,62,65,0,65,34,28
560 DATA 66,63,64,1,96,31,32,65,32,31
570 DATA 67,60,66,1,0,1,0,65,66,60
580 DATA 68,31,32,65,0,65,0,65,32,31
590 DATA 69,127,0,1,0,31,0,1,0,127
600 DATA 70,1,0,1,0,31,0,1,0,127
610 DATA 71,124,2,65,0,121,0,1,66,60
620 DATA 72,65,0,65,0,127,0,65,0,65
630 DATA 73,62,0,8,0,8,0,8,0,62
640 DATA 74,28,34,64,0,64,0,64,0,96
650 DATA 75,65,32,17,8,7,8,17,32,65
660 DATA 76,127,0,1,0,1,0,1,0,1
670 DATA 77,65,0,65,0,65,8,85,34,65
680 DATA 78,97,16,65,8,65,4,65,2,65
690 DATA 79,62,65,0,65,0,65,0,65,62
700 DATA 80,1,0,1,0,63,64,1,64,63
710 DATA 81,94,33,16,73,0,65,0,65,62
720 DATA 82,65,32,17,0,63,64,1,64,63
730 DATA 83,62,65,0,64,62,1,0,65,62
740 DATA 84,8,0,8,0,8,0,8,0,127
750 DATA 85,92,34,65,0,65,0,65,0,65
760 DATA 86,8,20,34,0,65,0,65,0,65
770 DATA 87,65,34,85,8,65,8,65,0,65
780 DATA 88,65,34,20,8,0,8,20,34,65
790 DATA 89,8,0,8,0,28,34,65,0,65
800 DATA 90,127,0,2,4,8,16,32,0,127
810 DATA 91,56,0,8,0,8,0,8,0,56
820 DATA 92,0,64,32,16,8,4,2,1,0
830 DATA 93,14,0,8,0,8,0,8,0,14
840 DATA 94,0,0,0,0,0,0,34,20,8
850 DATA 95,127,0,127,0,0,0,0,0,0
860 DATA 97,94,33,0,49,14,32,17,14,0
870 DATA 98,63,64,1,64,63,0,1,0,1
880 DATA 99,62,1,0,1,0,33,30,0,0
890 DATA 100,126,1,64,1,126,0,64,0,64
900 DATA 101,62,1,0,127,0,65,62,0,0
910 DATA 102,4,0,4,0,30,0,4,8,48
920 DATA 103,60,64,0,124,2,64,2,124,0
930 DATA 104,33,0,33,0,33,30,1,0,1
940 DATA 105,28,0,8,0,12,0,0,0,12
950 DATA 106,14,17,0,16,0,24,0,0,24
960 DATA 107,34,16,10,4,10,16,34,0,2
970 DATA 108,28,0,8,0,8,0,8,0,12
980 DATA 109,73,0,73,0,73,54,0,0,0
990 DATA 110,66,0,66,0,66,61,0,0,0
1000 DATA 111,28,34,65,0,65,34,28,0,0
1010 DATA 112,2,0,2,60,64,2,64,62,0
1020 DATA 113,96,0,32,30,33,0,33,30,0
1030 DATA 114,2,0,2,0,34,29,0,0,0
1040 DATA 115,63,64,32,28,2,1,126,0,0
1050 DATA 116,16,40,4,0,4,26,4,0,4
1060 DATA 117,94,33,0,33,0,33,0,0,0
1070 DATA 118,8,20,34,65,0,65,0,0,0
1080 DATA 119,54,73,0,73,0,73,0,0,0
1090 DATA 120,65,34,20,8,20,34,65,0,0
1100 DATA 121,30,32,64,60,66,0,66,0,0
1110 DATA 122,61,2,4,8,16,47,0,0,0
1120 DATA 124,12,0,12,0,12,0,12,0,12

Back to previous page