SCROLL RELOCATE

[files: Relocate (PROG) + Textmc (CODE)]



One of the things I like about this column is the way readers often

send in and share modifications of previous programs. R. Dorsett of

Middlesex sent us a short cut which solves a problem he found with

Leif Kvernhusvik's Scroll program in the Dec'86 issue.



The original program is located in the printer buffer, not good news

for printer owners, so Mr. Dorsett's program will relocate it to

anywhere in memory that you may desire.



First (providing you have a M/C copy of the program on tape) CLEAR

ramtop to the new start address-1. As an example we will imagine that

we are going to move the routine to address 60000, therefore CLEAR

59999.



Now LOAD "SCROLL" CODE newaddress (EG. LOAD "SCROLL" CODE 60000).



Type in the RELOCATE program and RUN it.



Finally SAVE "SCROLL" CODE newaddress, 159.

(EG. SAVE "SCROLL" CODE 60000,159).



Don't forget to change the line in your program which defines the

function to call the new address (EG. DEF FN x(a$,l,w,a)=USR

newaddress.



Some alterations to the way in which the program works can also be made:

POKE start+125,201 will return the program to BASIC if a key is

pressed or when the scrolling is finished.

POKE start+118,0: POKE start+125,201 prevents the program from being

interrupted and returns to BASIC when finished.

POKE start+118,192: POKE start+125,195 and the program will only

return to BASIC when a key is pressed.