FoxPro/Visual FoxPro - Problemas de Tickets

hola amigos de la web ya me hice pelotas con la impresion de tickets problema 1.-tengo el sig codigo:

SET DEVICE TO FILE C:\SALIDA.TXT
@1,15SAY EMPRE
@2,13SAY COMPRIN.EVENTO
@3,10SAY datetime()
@4,2SAY "No Comanda"
@4,24 say "Mesero"
@5,2SAY comprin.comanda
mese=comprin.nmesero
@5,24 say mese
@8,2 say "Cant."
@8,10 say "Producto"
@8,33 say "Importe"
coco=1
do while !eof()
if coco=1
@9,2 say comprin.cantidad
@9,10 say comprin.descrip
@9,22 say comprin.importe
@10,2say comprin.especifi
@11,2 say comprin.cortesia
skip 1
coco=coco+1
else
@1,2 say comprin.cantidad
@1,10 say comprin.descrip
@1,22 say comprin.importe
@2,2say comprin.especifi
@3,2 say comprin.cortesia
skip 1
endif
enddo
unlock
close tables all
set exclusive off
use comprin
select sum(comprin.importe);
from comprin;
into cursor totis
sumita=totis.sum_importe
@1,1 say "Total"
@1,4 say str(sumita)
@2,5 say ""
@3,5 say ""
@4,5 say ""
@4,24 say mese
@6,5 say ""
@7,5 say ""
@8,5 say ""
@9,5 say ""
close tables all
SET DEVICE TO FILE C:\SALIDAF.TXT
RUN /2 type C:\SALIDA.TXT >PRN
set printer on
set printer to
close tables all
set safety on


bueno y esto si funciona en ticketeras epson, star y algunas otras pero cuando conecto una star sp500 imprime y al final saca un ticketsote del tamaño del mundo que pasa ahi que hago mal o mas bien que se podria hacer para que no siguiera sacando el ticket despues de que imprime. ya mande de varias maneras a set device to print ,etcc...... y otra como hacerle para imprimir de encabezado un logo pero sin report form gracias ojala y no pida mucho y me puedan ayudar