home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cracknews
/
Cracknews_1989-02_Welfare_Software_Boys.d64
/
.9
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
2KB
|
49 lines
5 poke808,252
10 mt$=" "
20 print"[147]":poke53280,12:poke53281,12
30 print" [195][210][193][195][203][206][197][215][211]! [201][211][211][213][197] [198][197][194][210][213][193][210][217] 1989
40 [153]"stop ortantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantan^
50 print" [221] ** [201][211] [212][200][201][211] [210][213][211][211][201][193] ** [144][221]"
60 print" [221] [204]atest [206]ews, about the [199]erman [144][221]
70 [153]" (NULL) 'peek(NULL)(NULL)'! stop(NULL)
120 print" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]
130 [141]720
140 [153]" ortantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantan^
150 print" [221][153] [215]ell, its [212]rue, the [194][208][211] [144][221]
160 [153]" (NULL)print scratched one of the best stop(NULL)
170 print" [221][153] [195]omputerpapers from the [144][221]
171 [153]" (NULL)print chr$erman market! stop(NULL)
172 print" [221][153] [215]e ask the [194][208][211], why, but we [144][221]
173 [153]" (NULL)print got as answer: (NULL)o (NULL)ime! stop(NULL)
230 print" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]";
240 gosub720
250 print" [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]
260 [153]" (NULL) (NULL)e hope, we get some news from stop(NULL)
270 print" [221] the [195]+[214][199] [195]rew himself, to tell [144][221]
271 [153]" (NULL) you in the next right$ssue, the stop(NULL)
272 print" [221] [210]eason! [144][221]
320 [153]" /tantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp"
321 [153]" ";
330 [141]720
340 [153]" ortantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantan^
350 print" [221] [215]hen you are 18 [217]ears old, [144][221]
360 [153]" (NULL) you can ask your newsagent stop(NULL)
370 print" [221] for [195][207][205][208][213][212][197][210]+[214][201][196][197][207] [199][193][205][197][211]! [144][221]
375 [153]" (NULL) right$n str$ecember 1989, the peek(NULL)(NULL) stop(NULL)
380 print" [221] will look again...... [144][221]
385 [153]" (NULL) ((NULL)right$(NULL)val '(NULL)(NULL)(NULL)(NULL)(NULL)right$(NULL)' right$(NULL) chr$str$(NULL)!) stop(NULL)
386 print" [221] [[203][201][206][204][197][217]/[215][211][194]] [144][221]
390 [153]" /tantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp";
400 [141]720
670 [153]"load"
680 s$[178]"l(NULL)"[170][199](34)[170]"tan0,s,r"[170][199](34)[170]",8:"[170][199](131)
690 [129]i[178]1[164][195](s$):[151]630[170]i,[198]([202](s$,i)):[130]:[151]198,i
700 [151]53281,15:[151]53280,15
710 [153][199](142)"on reloading the menulist":[128]
720 [129]w[178]1[164]2000:[161]a$:[139]a$[178]""[167][130]w
730 [141]910:[142]
740 [129]w[178]1[164]2000:[161]a$:[139]a$[178]""[167][130]w
750 [142]
900 [142]
910 [153]"":[129]i[178]1[164]10:[153] mt$:[130]:[153]mt$"":[142]