a

 BBS: Inland Empire Archive
Date: 02-22-93 (23:30)             Number: 384
From: JANUSZ SUCHOROLSKI           Refer#: NONE
  To: JOE NEGRON                    Recvd: NO  
Subj: a                              Conf: (2) Quik_Bas

JS> Problem:   when the saving starts, another accidental
  > hitting of "any" key locks up the rest of the program.

JN>Well, I don't understand just what it is you're trying to do, but here
  >is a SUB that will clear the keyboard buffer:

Thanx a lot Joe, will try y/SUB.. My approach to screen saving requires to
pick up just a "square" of ASCII screen and saving it to a disk/HD. I.e. not
the whole screen saver (trivial), but just a "window" of text to be saved.
There must be a correlation between screen memory and row/col locations. Or
is it just not universal enough, i.e. varies from one video card to another.
Hope, you might have come across something of that nature in the past.
----------------- slow, slow, slow,.... ----------------------------------
OPEN flnm$ FOR OUTPUT AS #1
        FOR ROW = 2 TO 17                ' scan from row 2 to 17
        FOR COL = 2 TO 73                ' scan from col 2 to 73 (PCBoard)
        X = SCREEN(ROW, COL)             ' get character
        PRINT #1, CHR$(X);               ' save it to file
        NEXT COL                         ' proceed
        PRINT #1, CHR$(13) + CHR$(10);   ' enter <CR> <LF> after each line
        NEXT ROW                         ' skip to next row
CLOSE #1
--------

--- Maximus 2.01wb
 * Origin: RJ's Byteline =[HST/DS]= Calgary (403)247-3180 CANADA (1:134/75)