ANSI cursor location

 BBS: Inland Empire Archive
Date: 01-10-93 (07:16)             Number: 292
From: DAVID COLSTON                Refer#: NONE
  To: DICK DENNISON                 Recvd: NO  
Subj: ANSI cursor  location          Conf: (2) Quik_Bas

I tried your code:
'$INCLUDE:'qb.bi' (or qbx.bi)
dim Reg as RegType
Reg.ax=&H3 *256
Reg.bx =0
Interrupt &H10, Reg, Reg
Row= Reg.dx\256 + 1
Col =  Reg.dx mod 256 +1

I tried this call. It works, by you must the immediately do this:
LOCATE Row, Col

or you have "locked" the cursor position and if you print one character
at a time, each one will over write the last, if you pull the function
after every print or console print.


 * OLX 2.1 TD * Help! The paranoids are after me!


--- WM v2.06/92-0178
 * Origin: Paradox of Arkansas *Wildcat 3.0* 501-646-7158 (1:3822/1)