; PRINT "SAVEing *** CHAINDEM.BAS":SAVE "a:CHAINDEM",A$ demo of chaining and merging! cl()"E"()"H"-rvso()"p" reverse video on .rvsof()"q" reverse video offQ( pos(,)()"Y"( )( ) position cursor2" Anne " F cl/Po()"b"" 65 " of()"b"Z cl nd pos( ,)rvso" A demonstration of the CHAIN and CHAIN MERGE commands "rvsof" CHAINDEM";n pos( ,)" 1) CHAIN " (")" newprog "(")"@x pos( ,)" 2) CHAIN "(")" newprog "(")",2220"D pos( ,)" 3) CHAIN "(")" newprog "(")",2220,ALL"A pos( , )" 4) CHAIN MERGE "(")" newprog "(")"F pos( , )" 5) CHAIN MERGE "(")" newprog "(")",1600J pos( ,)" 6) CHAIN MERGE "(")" newprog "(")",2200,all[ pos( ,)" 7) CHAIN MERGE "(")" newprog "(")",1600,all,delete 1650-1670T pos(,)" Press the number of the command you want then [RETURN] =>"; . pos(,)revso "*** NOTES ***"*  ,,,,,,X, - pos( ,)rvso" 1)"rvsof F pos(,)"'newprog' will be loaded and run from the start". "'chaindem' will be erased from memory"  -, pos( ,)rvso" 2)"rvsof L6 pos(,)"'newprog' will be loaded and run from the quoted line".@ "'chaindem' will be erased from memory"J  - pos( ,)rvso" 3)"rvsof L pos(,)"'newprog' will be loaded and run from the quoted line". "'chaindem' will be erased from memory"' "ALL variables will be retained"  . pos( , )rvso" 4)"rvsof ^ pos(,)"'newprog' will be loaded and run combined with 'chaindem'from the start"  . pos( , )rvso" 5)"rvsof e pos(,)"'newprog' will be loaded and run combined with 'chaindem' from the quoted line"&  .X pos( ,)rvso" 6)"rvsof eb pos(,)"'newprog' will be loaded and run combined with 'chaindem' from the quoted line"'l "ALL variables will be retained"  . pos( ,)rvso" 7)"rvsof e pos(,)"'newprog' will be loaded and run combined with 'chaindem' from the quoted line"' "ALL variables will be retained"I "Any line(s) quoted after DELETE will be removed before execution"  $ "newprog" "newprog", "newprog",,  "newprog",  "newprog",@ "newprog",,"$ "newprog",@,, r/ "Press any key to execute the command" u"" $@ ()"E"()"H" IJ ()"@@@@@@@@@@@@ This is line 1600 of Chaindem.bas @@@@@@@@@@@@@cT " It prints because the command line specified that the program should start from line 1600"Or "This is line 1650; it prints in option 3) but it will be deleted in 7)"N| "This is line 1660; //////////////////////ditto\\\\\\\\\\\\\\\\\\\\\\\"N "This is line 1670; \\\\\\\\\\\\\\\\\\\\\\ditto///////////////////////"M "This is line 1680;In option 7) the above lines 1650-1670 are deleted"\\\\\\\\\\\\\\\\\\ditto///////////////////////"M "This is line 1680;In option 7) the above lines 1650-1670 are deleted