10 CLOSE #1
20 OPEN #1,8,0,"P:"
30 FOR N =1 TO 10
40 READ A:PUT #1;A
50 NEXT N
60 CLOSE #1
100 DATA 1,2,3,4,5,ANY NUMBER TO 10 ENTRIES
THE DATA SHOULD BE THE ASCII CODES FOR THE CHARACTER YOU WANT TO SEND.
EG. 65 FOR A "A"
It has been a long time, so I think it is correct.
The 850 should recognize the "P:" device.
You don't want to use "LPT"s.
The 'A's in line 40 could be any letter, like "X"
I got around to entering my print program in Altirra.
Everything was OK, except line 40 PUT #1;A. .... The PUT statement needs a comma, not a semicolon. .... 40 READ A:PUT #1,A
Line 100 could be
100 DATA 65,66,67,68,69,70,71,72,73,74 to print "ABCDEFGHIJ"
You could have ATASCII strings in the DATA.
You'd need a 5 DIM A$(10):A$="F":A$(10)=A$:A$(2)=A$. This gives a A$ inited with 10 'F's to access any part of the string, up to 10 characters.
That sequence of code comes from 'Your Atari Computer' Poole and McNiff, a way to initialize a string variable and fill it with characters.
I forget why that is necessary lots of times, initing a string variable. After initing, you can access any part of the string eg. ? A$(2,9).
You could use the string to store stuff and access any part of it in your program.
Then 100 DATA STRING1,STR2, STR3,S4,S5,S6,S7,S8,S9,S10
You could READ A$ in the FOR NEXT loop. Atari BASIC knows where you are in the DATA statements, doesn't repeat the STRING1.