Example program:
DOWNLOAD "OPEN1.BAS"
SIZE 4.00,4.00
GAP 0.12,0.0
CLS
SPEED 2
DENSITY 13
SET CUTTER OFF
SET PEEL OFF
SET DEBUG LABEL
DIRECTION 0
REFERENCE 0,0
OPEN "DATA1",1
SEEK 1,0 :B
READ 1,ITEM$,PRICE,QTY TEXT 10,10,"4",0,1,1,"
OPEN, READ, EOF() COMMAND
TEST" BOX 98,48,502,514,2 A$="ITEMS:"+ITEM$ B$="PRICE:"+STR$(PRICE)
C$="QTY:"+STR$(QTY) TEXT 128,114,"2",0,1,1,A$
TEXT 130,198,"2",0,1,1,B$
EXT 132,268,"2",0,1,1,C$
BARCODE 132,365,"39",96,1,0,2,4,"PRICE-2000"
PRINT 1
I=EOF(1)
IF I=0 THEN GOTO B
EOP
MOVE
Example of data file:
DOWNLOAD "DATA1",59,
COMPUTER 2000 15
MONITOR 3000 30
KEYBOARD 4000 40
Note:
1. Each data field is separated by 0Dh and 0Ah.
2. Please download the program file to printer first then send the data file DATA1 to printer.
To print label file, please enter following command to recall program.
C:>COPY CON LPT1
OPEN1
C:>