Hi Greg.

08-Aug-03 05:41:00, Greg Easthom wrote to Brian Iglesias

 GE>   ''' Read the whole line off the screen a character at a time,
 GE>   ''' and put it into string "Oneline"
 GE>   FOR Char = 1 TO 80
 GE>     MID$(Oneline, Char, 1) = CHR$(SCREEN(L, Char))
 GE>   NEXT Char
 GE>   ''' Now print that line one line lower on the screen
 GE>   LOCATE L + 1, 1: PRINT Oneline;

that is the same as

 locate L+1,1
 for char = 1 to 80
  print chr$(screen(l,char);
 next char

which is simpler and may even be faster.

 -=> Bye <=-

---