Möglich natürlich auch das mein EPL-"Testprogrammerl" fehlerhaft ist. Hat da jemand Erfahrung. Z. B. sollte das LineFeed 1:1 durchgereicht werden, da ja schon ASCII.

Fqsysprt O F 40 printer
d lf S 1 LF
d txt S 40 Textzeile
c eval lf = x'0A'
O* N Command - Clear Image Buffer
c eval txt = lf
c except prt01
c eval txt = 'N' + lf
c except prt01
O* A Command - ASCII Text
c eval txt = 'A10,1,0,5,1,1,N,"Testdaten"' + lf
c except prt01
O* B Command - Barcode drucken
c eval txt = 'B50,1,0,1,1,7,50,B,"2X00001"' + lf
c except prt01
O* P Command - Print Buffer (P1 = number of labels, P2 = number of copies)
c eval txt = 'P1' + lf
c except prt01
* end
c eval *inlr = *on
Oqsysprt e prt01 1
O txt