HP PCL 5 Comparison Manual page 95

#include <stdio.h>
#include <fcntl.h>
#define MONTH "\214\216"
#define TILDE "\201\140"
#define DAY "\223\372"
#define CLUSTER "\201\100\033&f0S\033&a0P%s%d\033&a270P\033&f1S"
FILE *prn;
main()
{
int point_size=24;
int offset;
char OFFSET[40];
prn = fopen("lpt1","wb");
offset = ( 36 * point_size * 300)
/* ---- ----------
( 256 *
sprintf(OFFSET,"\33*p-%dx-%dY",offset,offset);
place cluster */
fprintf(prn,"\33%%-12345X");
fprintf(prn,"@PJL ENTER LANGUAGE=PCL\n");
fprintf(prn,"\33E");
fprintf(prn,"\33&t31P");
fprintf(prn,"\33(19K");
fprintf(prn,"\33&a270P");
fprintf(prn,"\33*p500x1300Y");
fprintf(prn,"\33(s1p%dv0s0b28752T",point_size);
fprintf(prn,"\33&c-1T");
fprintf(prn, CLUSTER MONTH, OFFSET, 11);
fprintf(prn, CLUSTER DAY, OFFSET, 16);
fprintf(prn, TILDE);
fprintf(prn, CLUSTER MONTH, OFFSET, 11);
fprintf(prn, CLUSTER DAY, OFFSET, 17);
fprintf(prn,"\f");
fprintf(prn,"\33%%-12345X");
}
/* open lpt1 for writing */
/
*/
72 );
/* send UEL to get to PJL */
/* Enter PCL */
/* Esc E to reset printer */
/* text parsing = Shift-JIS */
/* symbol set = Win3.1J */
/* print direction = 270 */
/* set CAP position */
/* select vertical writing mode */
/* send UEL to get to PJL */
Printer-Specific Differences 2-59
/* used to
/* MS-Mincho */
/* print month */
/* print day */
/* print tilde */
/* print month */
/* print day */
/* formfeed */