beautypg.com

Genicom GEK 00031B User Manual

Page 120

background image

Chapter 5. Proprinter Emulation

GEK-00029B

120

Weight

Wire

Graphics Dot Pattern

128

1

! ! !

! ! !

64

2

!

!

!

!

32

3

!

!

!

16

4

!

!

!

8

5

!

!

4

6

!

!

2

7

!

!

1

8

! ! !

0

0

0

112 136 132 130 65

49

65 130 132 136 112

0

0

Programming Example
The following BASIC program will produce the graphic shown above.

100

WIDTH "LPT1:",255

110

FOR N = 1 TO 4

115

LPRINT CHR$(27);"K";CHR$(80);CHR$(0);

120

FOR K = 1 TO 5

140

LPRINT CHR$(0);CHR$(0);CHR$(0);CHR$(112);

150

LPRINT CHR$(136);CHR$(132);CHR$(130);

160

LPRINT CHR$(65);CHR$(49);CHR$(65);

170

LPRINT CHR$(130);CHR$(132);CHR$(136);

180

LPRINT CHR$(112);CHR$(0);CHR$(0);

190

NEXT K

200

LPRINT

210

NEXT N

220

LPRINT "DONE"

230

END

ESC K nl n2 v1…vn Normal Density Graphics: This sequence sets a density of 60 dpi

horizontally and 72 dpi vertically.

Decimal:

27 75 . . .

Hex:

1B 4B . . .

BASIC:

CHR$(27);"K";

ESC L n1 n2 v1…vn Low Speed Double-Density Graphics: This sequence sets a density

of 120 dpi horizontally and 72 dpi vertically.

Decimal:

27 76 ...

Hex:

1B 4C ...

BASIC:

CHR$(27);"L";

ESC Y n1 n2 v1…vn High-Speed Double-Density Graphics: This sets a density of 120 dpi

horizontally and 72 dpi vertically. If horizontally adjacent dots are
specified, then the second dot is not printed.

Decimal:

27 89 ...

Hex:

1B 59

BASIC:

CHR$(27);"Y";