impresora,Star SP212 (TearBar) on LPT1:
/impresora,Star SP212 (TearBar) on LPT1:
/********************************
variable4=0
$
tipo,Arial
tamaņo,8
estilo,negrita
@1,1,VINOS Y LICORES
@3,2,ABARROTES LA CONCHITA
@4,3,ATLACOMULCO N.4 COL. LA LOMA TLALNEMEX
@5,4,CP54070 TLANEPANTLA EDO. DE MEX.
@6,5,TELS. 5397-5614,5362-7558
@7,6,R.F.C. ROMJ-700723-1Q7
estilo,normal
@1,7,HORA +HORAX_F
@10,7,FECHA +FEDOC_F
@1,8,CAJA +CLVEN_F
@1,10,DESCRIPCION              IMPORTE
@1,11,----------------------------------
saltar(1)
tamaņo,9
$
&
@0,1,producto
sql(25,1,CODIG_I,INVENTAR,CLPRO_I=,CLAVE)
saltar(1)
formato(##0.00)
moneda(1,1,cantidad)
formato(#,##0.00)
@8,1,X
moneda(16,1,precio)
moneda(24,1,importe)
saltar(1)
&
saltar(2)
@1,1,SUBTOTAL
moneda(25,1,SUBTO_F,$)
@1,2,I.V.A.
moneda(25,2,IMIM2_F,$)
@1,3,TOTAL
moneda(25,3,IMTOD_F,,,3)

moneda(25,4,variable6,$,Arial Bold)
saltar(1)
tamaņo,7
traduce(1,4,IMTOD_F)
tamaņo,8
saltar(4)
@1,1,------------------------------------
@10,1,GRACIAS POR SU COMPRA......
@11,2,LOS MEJORES PRODUCTOS
@10,3,A LOS MEJORES PRECIOS....                           
saltar(4)
@1,1,UNIDADES
moneda(40,1,variable1)
@1,2,PRODUCTOS
moneda(40,2,variable2)
/**********************************
saltar(1)
@1,1,
@1,2,
@1,3, ---------------------------------
@1,5,      
@1,6,  
@1,7,        
@1,8,      
@1,9,.