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