home *** CD-ROM | disk | FTP | other *** search
- 1000 rem *** main overlay ***
- 1010 poke 43,1 : poke 44,8 : rem must be first line of overlay!
- 1020 if z=2 then 2000 : rem this was setby the overlay sub1.
- 1030 print"this is an example of a main"
- 1040 print"program."
- 1050 print:print"press any key to load in"
- 1060 print"the overlay."
- 1070 geta$ : if a$="" then 1070
- 1080 p$="sub1" : goto 10 : rem load overlay.
- 2000 print:print"and here we are back in the"
- 2010 print"main program."
- 2020 end
-