home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 9
/
009.d81
/
hail
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
553b
|
16 lines
0 poke53280,5:poke53281,1:poke646,0
1 print"[147]":s=2003:b=s:k=203:l=64:d=214:x=1984:f=40:h=81:c=198:e$(0)="win":e$(1)="lose
2 s[178]s[170]([194](k)[178]l)[172]2[170]1:[151]d,23:[153]:[153][163]s[171]x)"(NULL)"
3 [139]t[178]k[176][194](s[171]f)[178]h[167][137]60000
4 t[178]t[170].5:s[178]s[170]((s[177]b[170]18)[171](s[179]b[171]18))[172]3:[153]""[163]39[172][187](0))"(NULL)cmdsave":[151]218,132:[137]2
40000 :
50000 :
60000 [153]"":[153]e$((t[178]k)[170]1)t:[151]c,0
60005 [153]" "
60010 t[178]0:[153]"want to play again?";
60020 [151]198,0:[146]198,1:[161]a$:[139]a$[179][177]"y"[175]a$[179][177]"n"[167]60020
60030 [139]a$[178]"y"[167]1
63000 [143] connect back to l.s.
63002 [153]"loadload"[199](34)"c.payload"[199](34)",8":[153]"run"
63004 [151]198,0:[151]631,13:[151]632,13:[151]198,2:[128]