impresora,Star SP212 Line Mode Printer
///impresora,epson
///impresora,Generic / Text Only
/********************************
variable4=0
****lineasmaximo,100
$
si(variable4=0)
tipo,Arial
tamaņo,8
estilo,negrita
@4,0,"CREMERIA LUPITA"
@3,1,Itzin Erandy Perez Delgado
@4,2,Av.Toltecas No.303 Col.Romana
@5,3,Tlalnepantla, Edo. de Mexico
@5,4,TEL. 53 90 21 20
@1,5,HORA +HORAX_F
@20,5,FECHA +FEDOC_F
@25,6,No: +CLDOC_F
@1,6,R.F.C: PEDI850225317
saltar(1)
@1,6,DESCRIPCION              IMPORTE
@1,7,---------------------------------------
saltar(7)
variable1=0
variable2=0
tamaņo,9
variable4=1
variable3=10
terminacondicion
$
&
variable2=variable2+1
@1,1,variable2
@4,1,producto
saltar(1)
formato(##0.00)
moneda(1,1,cantidad)
formato(#,##0.00)
@8,1,X
moneda(12,1,precio)
moneda(25,1,importe)
saltar(1)
variable1=variable1+[000]
&
saltar(1)
@1,1,SUBTOTAL
moneda(22,1,SUBTO_F,$)
@1,2,I.V.A.
moneda(22,2,IMIM2_F,$)
@1,3,TOTAL
moneda(22,3,IMTOD_F,$,Arial Bold)
tamaņo,5
traduce(0,4,IMTOD_F)
tamaņo,8
saltar(4)
@1,1,UNIDADES
moneda(12,1,variable1)
@1,2,PRODUCTOS
moneda(12,2,variable2)
/**********************************
saltar(1)
@1,1,
@1,2,
@1,3, ------------------------------------
@1,4,        
@1,5,      
@1,6,  
@1,7,        
@1,8,      
@1,9,
@1,10,.