loserout = NEWOBJECT("MSCOMMLib.MSComm") WITH loserout .commport = 5 * adjust settings to suit .settings = '9600,N,8,1' .handshaking = 2 .rtsenable = .T. .portopen = .T. ENDWITH loserout.output = CHR(7)