64'er 1990 January/64er_Magazin_90-01_1990_Markt__Technik_de_Side_A.d64/killer-generator

Commodore BASIC | 2022-10-26 | 2KB | 21 lines

1 a$=chr$(34)+chr$(34)+"[157]":print"[147]%h@@^[146]2087:o[146]"a$"mq[146]n r [195][146][200][193][210]-[203][146][201][204][204][197][210]!";
2 print" r[146]  q@@@)[146][205]e[187])[146]he[188])[146]@e[189])]e[190]"a$"[146]c [146]@1[187]q[189][200][208][185][166][188][166][190][202][208][178][146][204]@][146]h)[146]@";
3 print"e[146]7)]e[146]8"a$"[146]@=g_]@[146]c][192][146]c[168][160][146]?[208][178])[191]mv[146]cmy[146]cm\[146]cm_[146]c"a$"[146]@=[198]";
4 print"_[146] [210][191][168][160][146]s[208][181]"a$"[146]j)[146]@][181]_[202][208][186])[146]hm[146]n[208]-[146]p[208][146])[191]m[146]p[208]-[146]u[208][146]i@m[146]u[208]-[146]";
5 print"w[208][146])[191]m[146]w[208]-[146][[208][146])[191]m[146][[208]-[146]\[208][146])[191]m[146]\[208]-[146]][208][146])[191]m[146]][208])[146]gm[146].[208])[146]nm[191]";
6 print"[146]g)[146]om[146]x[212])bm[146]n[212])[146]hm[146]o[212])@m[146]r[212])[146]@m[146]s[212])[176]m[146]t[212]"a$"[146]i[202]=[217]_][146]@@[208][183]";
7 print")[200]m[146]xc)]m[146]yc-[146]tcm[182]_-[146]ucm[183]_[146][184])[146]tm[146]tc)^m[146]uc[216][160][200]j[146][200]x[146][200])[146][191]m[146]m[221]";
8 print",[146]m[221][146]0q <[182][146] [161][191][208][146]i #[189][146] x[165][146][172]b [146][204][178][190]n[146]v[208][146] #[189][146] [208][189][146] j[191][146] [219][191][146][216] [211]";
9 print"[164][146] ?[163][146] "a$"[164])[146][199]m[146]xc)[190]m[146]yc @][146][204]f[163]-[146]u[208][208][146]q[184]-[182]_m[146]tc-[183]_m[146]uc[216] @]-";
10 print"[184]_[208][146][213][174][185]_-[185]_[208][146]k-[186]_[205][187]_0[146]f[174][186]_[146][172][182]_[174][184]_%[204][176][146]l [163]_-[187]_m[188]_[146][204][221]^%[214]m[188]_[146]jjjx[169]";
11 print"-m[146]o[208])[146]@e[189])[146]de[190]"a$"[146](x%[189][146][173][188]_e[189]%[190][146][169]@e[190][202][208][175][146][172][182]_[174][189]_-[189]_[201][146]e[208][146]_)[146]";
12 print"@m[189]_-[191][146]g[201][146]o[176][146]k[174][191][146]g)@m[146]r[212][146][204]-^[206][191][146]g)am[146]r[212]-[146]p[208][146])@[208][146]r-[146]n[208][201][191][176]";
13 print"[146]c[204][205]^-[146]p[208][146]i@m[146]p[208]-[146]n[208][201][146][210][176][146][168][174][146]n[208]-[146]p[208][146])@[208][146]g-[146]n[208][201][146]jp[146]q-[190]_[201]";
14 print"[146]([176][146]j[174][191]_-[191]_[201][146]h[176][146]c[172][182]_)[146]@m[191]_%[204][208][146]-%[214][205][188]_[208][146]&%[211][146]:[205][190]_[176][146]w%[213][201][146]'[176][146]x";
15 print"%[211][201][146](p[146]r%[211][146]:8[169][146]([205][190]_[208][146]g)[146]@e[207][146]ze[204])[146] ,[190]_q[189][174][190]_[146][172][182]_)[146]@m[184]_m[190]_m[186]_";
16 print"m[191]_)[146]hm[146]n[208]-[146]p[208][146])[191]m[146]p[208])@m[146]r[212][146] [163]_-[187]_[146][202][202]m[187]_[146][172][182]_-[146][[212]m[187]_[201][186]0[182]"a$;
17 print"[146]@-[187]_[201][146]jp[146]m8-[187]_[169][146]jm[187]_[168][146][204][175]_n[187]_[146][160]@@@@@@@@@@@@@[184]@@[188][146]@a[190][146]@c[176][146]@c";
18 print"[160][146]@c[160][146]@c[184][146]@a[190][146]@@[188][146]@@[184]@@@@@@@@@@@@@@@@@@@@@@q[210][197][193][196][217]. ([212][207] [203][201][204][204]!)q[171]";
19 print"][146]t^[195][194][205][146]80@":open1,8,1,"the char-killer!":print#1,chr$(1);chr$(8);
20 fori=0to814:print#1,chr$(peek(1024+i));:next:close1:rem (c)'89 alex gevatter