Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Posting-Version: version B 2.10.1 6/24/83; site ecsvax.UUCP Path: utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!decvax!mcnc!ecsvax!calway From: calway@ecsvax.UUCP (James Calloway) Newsgroups: net.micro.cbm Subject: Re: Next print location on the screen Message-ID: <465@ecsvax.UUCP> Date: Sun, 6-Jan-85 16:23:20 EST Article-I.D.: ecsvax.465 Posted: Sun Jan 6 16:23:20 1985 Date-Received: Tue, 8-Jan-85 02:58:43 EST References: <2@omovax.UUCP>, <18900003@hp-pcd.UUCP>, <461@ecsvax.UUCP> Organization: The News and Observer Lines: 51 x Below is a ML routine that will move the cursor without leaving parts of the screen in reverse video. The only instance I have found in which it does not work is on line 24, the last line (starting with 0). I'm not sure why. The routine assumes you already have loaded the X register with the row number (0-24) and the Y register with the column number (0-39). SEI LDA $CF BNE fixcrsr CLC goplot JSR FFF0 CLI RTS fixcrsr LDA #$01 STA $CD ckagain CLI NOP NOP NOP NOP NOP SEI LDA $CF BNE ckagain CLC BCC goplot This can be used with BASIC. Select an address that is safe from BASIC and POKE the following numbers into memory: 120,165,207,208,6,24, 32,240,255,88,96,169, 1,133,205,88,234,234,234, 234,234,120,165,207,208, 245,24,144,233 From BASIC you can POKE the column number into 782 and the row number into 781. Then SYS to the address you chose for the routine. It will move the cursor and return to BASIC. -- James Calloway The News and Observer Box 191 Raleigh, N.C. 27602 (919) 829-4570 {akgua,decvax}!mcnc!ecsvax!calway