home *** CD-ROM | disk | FTP | other *** search
/ Mail Madness! 6 / Mail_Madness_06_19xx_-_Side_A.d64 / galactic-viewer (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  495b  |  10 lines
  1. 1 print"[147] erste seite: 0[157]";
  2. 2 geta$:ifa$="" then2
  3. 3 printa$:print"letzte seite: 0[157][157]";
  4. 4 getb$:ifb$="" then4
  5. 5 a=val(a$):b=val(b$):printb
  6. 6 print"druckerausgabe j/n ? n[157][157]"
  7. 7 geta$:ifa$=""then7
  8. 8 ifa$="j"thenopen 1,4,1:sys02304,a,b:close1
  9. 9 forn=atob:sys02314,n,n:wait203,60,0:print"[147]":next:rem     mr.linger
  10.