A. Apéndice
'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
131