[TIB] text scrolling


[Next][Index][Thread]

[TIB] text scrolling




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.




Follow-Ups: