Example Program Listings WIDTH "LPT1:",255 'CODE 39

LPRINT CHR$(27);"it0r1s0o0x00y00bCODE39?\"; 'Interleaved 2 of 5

LPRINT CHR$(27);"it1r1s0o0x00y20b123456?\"; 'FIM

LPRINT CHR$(27);"it3r1o0x00y40bA\"; 'Post Net

LPRINT CHR$(27);"it4r1o0x00y60b1234567890?\"; 'EAN-8

LPRINT CHR$(27);"it5r1o0x00y70b1234567?\"; 'UPC-A

LPRINT CHR$(27);"it5r1o0x50y70b12345678901?\"; 'EAN-13

LPRINT CHR$(27);"it5r1o0x100y70b123456789012?\"; 'UPC-E

LPRINT CHR$(27);"it6r1o0x150y70b0123456?\"; 'Codabar

LPRINT CHR$(27);"it9r1s0o0x00y100bA123456A\"; 'Code 128 set A

LPRINT CHR$(27);"it12r1o0x00y120bCODE128A12345?\"; 'Code 128 set B

LPRINT CHR$(27);"it13r1o0x00y140bCODE128B12345?\"; 'Code 128 set C

LPRINT CHR$(27);"it14r1o0x00y160b";CHR$(1);CHR$(2);"?\"; 'ISBN(EAN) LPRINTCHR$(27);"it130r1o0x00y180b123456789012?+12345\"; 'EAN 128 set A

LPRINT CHR$(27);"it132r1o0x00y210b1234567890?\"; LPRINT CHR$(12)

END

Appendix

A

158