|
Informatique
|
|
|
Poème (up)
“Notre Gates, qui est a Seattle,
Que ton Windows soit débogué,
Que ton monopole s’impose,
Que tes commandes soient exécutées
Sur le web comme sur le disque dur
Donne-nous aujourd’hui
Nos mises a jour quotidiennes
Et pardonne-nous nos utilisations de Linux
Comme nous pardonnons aussi
A ceux qui ont utilisé des Macs.
Et ne nous soumets pas au Dr Norton
Mais délivre nous du plantage
Car c’est a toi qu’appartiennent
Le Copyright, les Mégahertz et les Capitaux
Au moins jusqu’à l’an 2000.
Amen”
Programmes “self-reproducteurs” (up)
David Madore avait proposé dans les virus n°11 et n°12 trois programmes affichant leur propre listing :
Turbo Pascal
const
p=#32+#32+#32+#32+#39; q=#39+#44+#13+#10; r=#13+#10; qq=#39+#13+#10;
procedure _(s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,sa,sb : string);
begin
write(s1,r,s2,r,s3,r,s4,r,s5,r,s6,r,s7,r,s8,r,s9,r,s10,r,
p,s1,q,p,s2,q,p,s3,q,p,s4,q,p,s5,q,p,s6,q,p,s7,q,
p,s8,q,p,s9,q,p,s10,q,p,sa,q,p,sb,qq,sa,r,sb,r);
end;
begin
_(
'const',
' p=#32+#32+#32+#32+#39; q=#39+#44+#13+#10; r=#13+#10; qq=#39+#13+#10;',
'procedure _(s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,sa,sb : string);',
'begin',
' write(s1,r,s2,r,s3,r,s4,r,s5,r,s6,r,s7,r,s8,r,s9,r,s10,r,',
' p,s1,q,p,s2,q,p,s3,q,p,s4,q,p,s5,q,p,s6,q,p,s7,q,',
' p,s8,q,p,s9,q,p,s10,q,p,sa,q,p,sb,qq,sa,r,sb,r);',
'end;',
'begin',
' _(',
' );',
'end.'
);
end.C
#include <stdio.h>
main(){char *s=
"#include <stdio.h>%cmain(){char *s=%c%c%s%c;%cprintf(s,10,10,34,s,34,10);}";
printf(s,10,10,34,s,34,10);}BASIC
10 LIST