Te mando el codigo, aguanta
procedure open_caja()
* para el puerto Com1
run mode com1:150
run mode lpt1=com1
set device to print
set printer to lPt1
@0,0 say " ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U "
SET DEVICE TO SCREEN
SET CONSOLE ON
* puerto com2
run mode com2:150
run mode lpt1=com2
set device to print
set printer to lPt1
@0,0 say " ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U ¬ U "
SET DEVICE TO SCREEN
SET CONSOLE ON
****esto es para otro puerto
* Puerto TM
@ 12,49 SAY "TM-T60 / TM-T80 / TM-L60"
@ 13,49 SAY "TM-300 / TM-U370 / TM-270"
set device to print
@0,0 SAY CHR(27)+"p"+CHR(0)+CHR(62)+CHR(250)
SET DEVICE TO SCREEN
SET CONSOLE ON
@ 14,49 say "TM-290 / TM-930 / TM-950"
set device to print
@0,0 SAY CHR(27)+"p"+CHR(0)+CHR(7)+CHR(30)
SET DEVICE TO SCREEN
SET CONSOLE ON
