Michael J. Kudelka
[address omitted]
Editors
Update Magazine
P.O. Box 1095
Peru, Indiana 46970
Dear Editors:
I read with special interest the column titled, “LIGHTHOUSE, QL GRAPHICS”, by Taylor Penrose. I own a Radio Shack CGP 220 Color ink jet printer.
I entered the program listing on page 31 on my QL. Everything came out fine with the exception of the lighthouse. Although the lighthouse windows appeared where they should, the lighthouse did not appear at all. After experimenting a little bit, I discovered that each of the high parameter numbers on program lines 930, 935, and 940 had to be reduced by exactly 25 to line up the lighthouse with the windows.
The screen dump program listed would not run my CGP 220 printer. I would like to know how Mr. Penrose got his CGP 220 printer to work with the program. The interface I use is the Miracle Systems Centronics Printer Interface for the QL. The serial interface on CGP 220 is a non-standard 4-pin din serial interface designed primarily for the TRS80 computer so I never use it. According to the CGP 220 printer manual, writing a screen dump program in basic is a complex process, 640 dots per line has to be addressed and consumes a lot of memory space.
I have a CGP 220 screen dump program in machine code written for the QL, by Mr. Don Thompson of DW Thompson Computer Consultants, and distributed by Curry Computer, which I purchased in 1986. Three other printer drivers were included for the price of $10 on a cartridge.
The enclosed screen dump was accomplished with Mr. Thompson’s program. Also listed below are the changes I made for the LIGHTHOUSE to appear on my QL monitor screen.
I hope you can communicate to Mr. Penrose concerning my comments above on his screen dump program for the CGP 220, and would like to hear back from him.
Sincerely,
Michael J. Kudelka
HAPPY QL COMPUTING!
930 INK 2:FILL 1:LINE 140,35 TO 142,90;154,35 TO 152,90:ARC 140,35 TO 154,35,PI/3:INK 7:FILL 1:ARC 142,90 TO 154,90,PI/3:REMark Tower
935 INK 0:FILL 0:LINE 142.5,89 TO 143,95;151.5,89 TO 151,95:ARC 142.5,89 TO 151.5,89,PI/3
940 INK 2:FILL 1:CIRCLE 147,95,5.5,.2,-PI/2:REMark Top