Creo que lo que estas intentanto hacer es imprimir en una impresora de matriz de puntos de la misma forma que se hace en DOS.
A mi me hicieron llegar este codigo que la verdad que me funcionó de maravilla. La idea es abril la imprsora como si fuera un archivo y escribir en ella de la misma forma. De esta forma lo hago yo:
OPEN "LPT1:" FOR OUTPUT ACCESS WRITE AS #1
PRINT #1, "Linea de Prueba"
CLOSE #1