File STAR1.E2
Directory of image this file is from
This file as a plain text file
10 DIM A$(6,6)
15 FOR I=1 TO 6\FOR J=1 TO 6\LET A$(I,J)="[ ]"\NEXT J
20 NEXT I
25 FOR I=1 TO 6\LET A$(1,I)="[ ** ]"\A$(6,I)="[ ++ ]"\NEXT I
190 GOSUB 210
200 GOTO 10
210 PRINT CHR(14);CHR(31)
220 PRINT
230 FOR I=1 TO 6\FOR J=1 TO 6
240 PRINT A$(I,J);\NEXT J
250 PRINT \NEXT I
300 RETURN
Feel free to contact me, David Gesswein djg@pdp8online.com
with any questions, comments on the web site, or if you have related equipment,
documentation, software etc. you are willing to part with. I am
interested in anything PDP-8
related, computers, peripherals used with them, DEC or third party, or
documentation.
PDP-8 Home Page
 PDP-8 Site Map
 PDP-8 Site Search