[TIB] Re: text scrolling


[Prev][Next][Index][Thread]

[TIB] Re: text scrolling




on 7/6/02 7:31 PM, Stephen Beck at nolekid@bellsouth.net wrote:
 
> I had an idea for a program that is basically just a bunch of fairly long (at
> least compared to the screen of my 86) passages. To read the entire passage at
> once, the user (probably me) would just press up or down when when they get to
> the top or bottom of the screen. My question: is there a more efficient way
> (in basic) to do this? Here is basically what I had in mind:
> 
> :Disp "G","H",..."N"; (fills up all line of screen, in middle of passage)
> :getky->x:If x==34; down arrow
> :Disp "H",..."J"
> :End
> :If x==25; up
> :Disp "F",..."M"
> etc., etc., etc.

I would also add a function for scrolling up or down a whole page at a time,
instead of just line by line.  Line by line could get slow.

To get rid of the etc., etc., etc. in your program I would store each
passage in a single string, instead of a separate string for each line of
text.  This would also make it easier to edit the text if you so desire.

And use some for loops and whatever the 86 command for returning a subset of
string is for writing the text to the screen.




References: