home *** CD-ROM | disk | FTP | other *** search
- 10 if a=0 then a=1:load"dliner",8,1
- 20 poke53280,6:poke53281,6
- 30 print"[147]dliner ready"
- 40 a$="to use, type sys52386,s,e...":gosub50
- 44 a$="where s is the starting address":gosub50
- 46 a$="and e is the ending address.":gosub50
- 48 end
- 50 for x=1to (20-len(a$)/2):printchr$(32);:next
- 60 printa$:return
-