A - 51

HL7050_US_UG_FM5.5

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