Condensado na TM t-20

[kebe1969]

Boa tarde !

Como faço para imprimir COMPRIMIDO na Epson TM T-20 ?
As configuracoes padrao não funcionam ( chr(15) )

Att

[paiva_dbdc]

bom dia

tente

* MP-4200 Bematech Termica

PRIVATE mp_4200_INICIO :=chr(29) + chr(249) + chr(32) + chr(0) + chr(27) + chr(116) + chr(8)
PRIVATE mp_4200_EXPANDE :=chr(27) + chr(87) + chr(1)
PRIVATE mp_4200_cancelaEXPANDE:=chr(27) + chr(87) + chr(0)
PRIVATE mp_4200_CONDENSA:=chr(15)
PRIVATE mp_4200_NORMAL :=CHR(18)
PRIVATE mp_4200_NEGRITO :=chr(27) + chr(69)
PRIVATE mp_4200_cancelaNEGRITO:=chr(27) + chr(70)
PRIVATE mp_4200_DIREITA :=CHR(27) + CHR(97) + CHR(2) // ALINHA A DIREITA
PRIVATE mp_4200_CENTRO :=CHR(27) + CHR(97) + CHR(1) // ALINHA CENTRO
PRIVATE mp_4200_ESQUERDA:=CHR(27) + CHR(97) + CHR(0) // ALINHA A ESQUERDA
PRIVATE mp_4200_CORTA :=CHR(27) + CHR(119)

do case
case pcgc = [xx.xxx.xxx/0001-xx] .or. ; && tela & tela
tinte_15 = .or. ; && Pedido em Bobina /N: Pedido impresso em Bobina de Papel "
tinte_15 = && Pedido em Bobina /N: Pedido impresso em Bobina de Papel "
if tinte_15 = && Pedido em Bobina /N: Pedido impresso em Bobina de Papel "
@ prow()+1, 00 say mp_4200_INICIO + [ ]+ mp_4200_CONDENSA && +[ ok 001]
else
@ prow()+1, 00 say chr(27)+chr(77)+[ ]+prt_15
endif


if tloja2_01_12 = && Loja 29 "EPSON TM - T20 S/N: Impressora TERMICA EPSON TM - T20 c grilhotina "
vdet = CHR(27)+CHR(109)
@ prow()+1,00 say vdet && comando de grilhotina
endif

[alaminojunior]

Para Epson:

Código: Selecionar todos

CHR(27) + CHR(33) + CHR(1)