Fundamentals of Dot Matrix Prlntlng
!O | RESTORE |
|
|
|
|
| ||
15 | WIDTH | “LPI!:“,255 |
|
| ||||
20 | LPRINT | CHR$(??):“@“:CHR~(27):“~” |
|
| ||||
30 | FORL - | 1 TO | 2 |
|
| |||
40 | LPPINT | CHRt~27):“K”:CHRS~114)1CHR((O!: |
|
| ||||
50 | FOR | SPACE | * | f | TO 100: LPRJNT CHMIO):: | NEXT | SPACE | |
60 | FOR | COL!! | = | 1 | TO !4 : RERD C : LPRINT | CHRSX):: | NEXT COLtf | |
70 | LPSINT | : | NEXT | L |
|
| ||
80 | DllTA |
| 14,16,34,64,140,140,!2~,!28,!40,140,64,!4,16,14 |
|
90DATt? 224,!6.232,68,34,18,1~~1~,18,34,6~,232,16,224
!.OO LPR!NT CHRS(27~:“~“:LPRINT:LPRIN?:LPRINT
Let’s run the program and see if we can get a smile both on the paper and on the face of the Gemini operator who’s creating dot matrix graphics.
. | . | ..:. |
|
:. |
| ./.:. | |
:’.,: :..:.. | |||
.:’; .: :,::. ..: | i | ||
.., | .,.: | ||
.:. | |||
:. :.,. ,.:.:: |
| ||
|
| >)> |
|
..: .. :.,::: |
| ||
| ,. | .. |
|
::, | ., :.: |
|
.. :.
Now, if you want to try a little something different, change line
40 to:
40 LPRINT CHR$(27); “L”; CHR$(114); CHR!§(O);
and run the program again.
By this time, you probably have a good idea of how Gemini works and how to make use of its extensive features. You might want to take some time now and explore your own ideas, based on the information presented thus far. In the next chapter, we’ll consider the use of special symbol characters, block graphics, and some advanced graphic techniques.
97