Example Program Listings; Expanded character data start; A - 13- Page 168

APPENDIX (SPECIFICATIONS, FONTS AND BAR CODE)   A - 13

Expanded character data start

n = 'l' or 'L'

Data that follows 'l' or 'L' is read as expanded character data (or labeling data). Expanded character data 
must end with the ' \ ' code (5CH), which also ends this command.

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