
Revision C 16/01/96
Chapter 2 "PCL" - 76
Gray scale example
10 ESC$ = CHR$(27)
20 WIDTH "LPT1:", 255
30 REM --- DRAW A PATTERN USING 64 GRAY SCALES ---
40 X = 50: Y = 100: XL=50 :YL=200
50 FOR GRAY = 0 TO 100 STEP 2
60 GOSUB 220
70 X=GRAY*10+50 :XL=X-XL
80 GOSUB 260
90 XL=X
100 NEXT GRAY
110 REM --- DRAW A PATTERN USING 8 GRAY SCALES ---
120 Y=400
130 FOR GRAY = 0 TO 100 STEP 2
140 GOSUB 220
150 X=GRAY*10+50 :XL=X-XL
160 GOSUB 320
170 XL=X
180 NEXT GRAY
190 REM --- PAPER EJECT ---
200 LPRINT CHR$(12)
210 END
220 REM --- SET THE CURSOR POSITION ---
230 LPRINT ESC$; "*p"; X; "X";
240 LPRINT ESC$; "*p"; Y; "Y";
250 RETURN
260 REM --- PRINT 64-GRAY SCALE PATTERN ---
270 LPRINT ESC$; "*c"; XL; "A";
280 LPRINT ESC$; "*c"; YL; "B";
290 LPRINT ESC$; "*c"; GRAY; "G";
300 LPRINT ESC$; "*c130P";
310 RETURN
320 REM --- PRINT 8-GRAY SCALE PATTERN ---
330 LPRINT ESC$; "*c"; XL; "A";
340 LPRINT ESC$; "*c"; YL; "B";
350 LPRINT ESC$; "*c"; GRAY; "G";
360 LPRINT ESC$; "*c2P";
370 RETURN
< Sample file 7 >
Содержание HL- SERIES
Страница 13: ...Revision A 16 01 96 Chapter 1 Introduction ...
Страница 16: ...Revision C 16 01 96 Chapter 2 PCL 1 Chapter 2 PCL ...
Страница 123: ...Revision C 16 01 96 Chapter 2 PCL 3 W width raster area 78 Y y offset raster 79 ...
Страница 124: ...Revision C 16 01 96 Chapter 3 PJL 1 Chapter 3 PJL Printer Job Language ...
Страница 180: ...Revision C 16 01 96 Chapter 4 Diablo 630 1 Chapter 4 Diablo 630 ...
Страница 200: ...Revision C 16 01 96 Chapter 5 EPSON FX 850 1 Chapter 5 EPSON FX 850 ...
Страница 237: ...Revision C 16 01 96 Chapter 6 IBM Proprinter XL 1 Chapter 6 IBM Proprinter XL ...
Страница 259: ...Revision C 16 01 96 Chapter 7 Bar Codes Control 1 Chapter 7 Bar Code Control ...
Страница 267: ...Revision C 16 01 96 Chapter 8 HP GL2 1 CHAPTER 8 HP GL 2 Graphics Language ...
Страница 280: ...Revision C 16 01 96 Chapter 8 HP GL2 14 220 END Sample 21 ...
Страница 328: ...Revision C 16 01 96 Chapter 9 HP GL 1 CHAPTER 9 HP GL Graphics Language ...
Страница 332: ...Revision C 16 01 96 Chapter 9 HP GL 5 1 3 2 Printing Area a b d c a b c d mm A4 4 5 5 5 Letter 6 5 5 5 Legal 6 5 5 5 ...
Страница 342: ...Revision C 16 01 96 Chapter 9 HP GL 15 Sample 68 ...
Страница 387: ...Revision C 16 01 96 APPENDIX A COMPALISON LIST 24 RESOLUTION 300 600 300 600 300 600 ...