home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 15
/
015.d81
/
secret-2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
208b
|
7 lines
0 rem l __ change this to a <shift l> to disable listing
1 poke808,225
2 print"[147]"
3 print"type in our secret code word";:inputsc$
4 ifsc$<>chr$(77)+chr$(79)+chr$(78)+chr$(75)+chr$(69)+chr$(89)thenprint"you lose":new
5 poke808,237