Rev. A Application 2-3
TM–U200/200P Information Manual
Programming Example
PRINT #1, CHR$(&H1B);"@";
←
Initializes the printer
GOSUB stamp
←
Prints stamp
PRINT #1, CHR$(&H1B);"a";CHR$(1);
←
Specifies a centered printing position
PRINT #1, CHR$(&H1B);"!";CHR$(0);
←
Specifies 9 x 9 font
PRINT #1, “September 10, 1995 15:00”;
PRINT #1, CHR$(&H1B);"d";CHR$(3);
PRINT #1, CHR$(&H1B);"a";CHR$(0);
←
Selects the left print position
PRINT #1, CHR$(&H1B);"!";CHR$(1);
←
Selects 7 x 9 font
PRINT #1, "TM-U200B $22.00"; CHR$(&HA);
PRINT #1, "TM-U200D $21.00"; CHR$(&HA);
PRINT #1, "PS-150 $15.00"; CHR$(&HA);
PRINT #1, CHR$(&HA);
PRINT #1, CHR$(&H1B);”!”;CHR$(17);
←
Selects double-height mode
PRINT #1, CHR$(&H1B);”U”;CHR$(1);
←
Selects uni-directional printing
PRINT #1, "TOTAL $58.00"; CHR$(&HA);
PRINT #1, CHR$(&H1B);"U";CHR$(0);
←
Cancels uni-directional printing
PRINT #1, CHR$(&H1B);"!";CHR$(0);
← Cancels double-height mode
PRINT #1, "------------------------------"; CHR$(&HA);
PRINT #1, "PAID $60.00";CHR$(&HA);
PRINT #1, "CHANGE $ 2.00";CHR$(&HA);
PRINT #1, CHR$(&H1D);"V";CHR$(66);CHR$(0);
←
Feeds paper to the cutting position
and cuts paper
END
Stamp:
PRINT #1, CHR$(&H1B);"3";CHR$(18);
←
Sets line spacing
PRINT #1, CHR$(&H1B);"U";CHR$(1);
←
Selects uni-directional printing
PRINT #1, CHR$(&H1B);"a";CHR$(1);
←
Selects center print position
PRINT #1, CHR$(&H1B);"!";CHR$(48);
←
Selects double-height and double-width modes
For I = 1 T0 14*2
READ d$: PRINT #1, CHR$ (VAL (“&H”+d$));
NEXT I
PRINT #1, CHR$ (&H1B);”!”; CHR$ (32);
←
Cancels double-height and double-width modes
FOR I = 1 TO 19
READ d$: PRINT #1, CHR$ (VAL (“&H”+d$));
NEXT I : PRINT #1, CHR$(&HD);
Prints date and time
Item B
Item A
Prints stamp