home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cracknews
/
Cracknews_1989-02_Welfare_Software_Boys.d64
/
.2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
3KB
|
77 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][155] [208]aper [201]nfos: [144][221]"
60 print" [221] [215]ell, today we tell ya some- [144][221]
70 [153]" (NULL) thing about different lenomputer-stop(NULL)
80 print" [221] magazines! [144][221]
120 [153]" /tantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp
130 gosub720
140 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]
150 [153]" (NULL) 1.) atn(NULL)(NULL)(NULL)val(NULL)(NULL)val(NULL) (NULL)(NULL)asc(NULL)(NULL)atn(NULL)val (NULL)atn(NULL)(NULL)(NULL) stop(NULL)
151 print" [221] [193] [199]erman magazine, which costs [144][221]
160 [153]" (NULL) 6.50 str$eutschmarks! stop(NULL)
161 print" [221] [206]ive [210]eviews(not the newest, [144][221]
170 [153]" (NULL) but not the oldest (NULL)tuff) stop(NULL)
171 print" [221] [195]ool [195]ompetitions,famous [200]ints![144][221]
172 [153]" (NULL) (NULL)hit atndv.(no (NULL)(NULL)(NULL), or (NULL)(NULL))! stop(NULL)
173 print" [221] [198]ucking lame [195]omic([196]onald [194][213][199]).[144][221]
174 [153]" (NULL) left$ot right$nfos and cool (NULL)eviewer!!!.stop(NULL)
175 print" [221] [207]verall: 84 % [144][221]
230 [153]" /tantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp";
240 [141]720
250 [153]" ortantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantan^
260 print" [221] 2.) [218]zap! [144][221]
270 [153]" (NULL) atn british lenomputerpaper. stop(NULL)
271 print" [221] [208]rice: \1.25(with megacassette [144][221]
272 [153]" (NULL) it costs \1.50) stop(NULL)
273 print" [221] [212]he stuff they review is to old[144][221]
274 [153]" (NULL) (val.chr$: ascast peekreak in mid$anuary 89)stop(NULL)
275 print" [221] [195]ool [208]resentation, but lame [144][221]
276 [153]" (NULL) left$ints(the maps are ok, but the stop(NULL)
277 print" [221] [210]est......) [144][221]
278 [153]" (NULL) (NULL)verall: 79 % stop(NULL)
320 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]"
321 print" ";
330 gosub720
340 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]
350 [153]" (NULL) 3.) lenomputer and (NULL)ideo chr$ames stop(NULL)
360 print" [221] [193] [194]ritish [208]aper, which costs [144][221]
370 [153]" (NULL) \1.20, and which is personally stop(NULL)
375 print" [221] the best i know([203][201][206][204][197][217]). [144][221]
380 [153]" (NULL) (NULL)he (NULL)tuff, which len(NULL)chr$ review stop(NULL)
385 print" [221] is [200][207][212]! [144][221]
386 [153]" (NULL) (NULL)o adv.(thats lame!), but if stop(NULL)
387 print" [221] you want know, whats going on [144][221]
388 [153]" (NULL) in the softwarecompanys, read stop(NULL)
389 print" [221] [195][207][205][208][213][212][197][210] + [214][201][196][197][207][199][193][205][197][211]! [144][221]
390 [153]" (NULL) (NULL)(NULL)val(NULL)atn(NULL)(NULL): 91 % stop(NULL)
391 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]";
400 gosub720
410 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]
420 [153]" (NULL) 4.) lenatn(NULL)atnstr$atn(NULL) len(NULL)(NULL)(NULL)(NULL)(NULL)val(NULL) stop(NULL)
430 print" [221] [193] [195]anadian paper, which costs [144][221]
440 [153]" (NULL) nothing! stop(NULL)
450 print" [221] [212]his magazine is telling about [144][221]
460 [153]" (NULL) (NULL)echnical news! (NULL)o reviews, stop(NULL)
461 print" [221] no hints, but very interesting![144][221]
470 [153]" (NULL) (NULL)(NULL)val(NULL)atn(NULL)(NULL): 70 % stop(NULL)
500 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]":gosub720
510 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]
520 [153]" (NULL)print (NULL)(NULL)(NULL)val right$(NULL)asc(NULL)(NULL) atnpeek(NULL)(NULL)(NULL) len(NULL)(NULL)(NULL)(NULL)(NULL)val(NULL) - print stop(NULL)
530 print" [221][153] [208][193][208][197][210][211] in the next [195][210][193][195][203][206][197][215][211]! [144][221]
560 [153]" /tantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp":[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]