Nerd Scrollin'

 BBS: Inland Empire Archive
Date: 02-10-93 (02:10)             Number: 311
From: DIK COATES                   Refer#: NONE
  To: ZACK JONES                    Recvd: NO  
Subj: Nerd Scrollin'                 Conf: (2) Quik_Bas

Sorry for my hasty and 'wrong' reply!  Even 1 character past the 1920
count will cause it to scroll... Overcome by writing two strings... think
the original problem is one of them thar 'undocumented features'...
Check the smiple code below...

a$ = STRING$(1920, 176)
b$ = STRING$(80, 176)
c$ = STRING$(1921, 176)

CLS
PRINT a$;
LOCATE 24, 1
PRINT "This is on line 24";
LOCATE 25, 1
PRINT "This is on line 25";
dummy$ = INPUT$(1)
CLS                              'this is likely the fastest way
PRINT a$;                        'without poking stuff into the
LOCATE 25, 1                     'screen buffer...
PRINT b$;
LOCATE 25, 1
PRINT "This is on line 25";
dummy$ = INPUT$(1)
CLS
PRINT c$;                        'even 1 character on line 25
'LOCATE 25, 1                    'causes it to scroll
'PRINT "This is on line 25";
dummy$ = INPUT$(1)

END

Sure glad my original comment wasn't real snooty... even more egg to
wash off...

With regard to programming project... take your best kick at the cat...
will try to help any way I can... Whatever the project, try to set it
up so that a robust library can be created... 'nudder 2 cents... 3 in
Canada, due to excessive taxation!

Regards Dik, Oshawa, Canada

... "Push to test."... <click>... "Release to detonate."
___ Blue Wave/QWK v2.10

--- Maximus 2.00
 * Origin: Durham Systems (ONLINE!) (1:229/110)