MediaWiki:Sitenotice:
2024-03-02: The wiki ran out of disk space, so things were not working. This has been resolved by adding another 5GB of quota ;-) Thanks to Tim Lindner for reporting the issues.
2020-05-17: If a page gives you an error about some revision not being found, just EDIT the page and the old page should appear in the editor. If it does, just SAVE that and the page should be restored. OS-9 Al (talk) 12:22, 17 May 2020 (CDT)
Graphics printer (Rainbow 1981-09)
As part of our continuity efforts to help with printer utilities, here is a screen printer for low-res graphics using the COLOR Computer and the LP VII.
This same logic will work with other printers, too. It is a little complicated with the LP VII because of the dot matrix graphics, a$ opposed to plain graphics characters.
If you want a fatter or thinner single graphics "block," just change the first CHR$(3) in Line 12 to another number. This number controls the number of times the dot-line is repeated. You will also have to change the record CHR$(3) in the same line to the value of the first so that the spaces and "blocks" match.
Here is the short program:
10 FOR X=0 TO 127 11 FOR Y=0 TO 63 12 IF POINT(Y,X) TNEN PRIHT#-2,CHR$(18)CHR$(28)CHR$(3)CHR$(255);ELSE PRINT#-2,CHR$(18)CHR$(28)CHR$(3)CHR$(128); 13 NEXT Y 14 PRINT#-2,CHR$(18) 15 NEXTX