Oui mais ce n'est pas moi qui l'ai fait.
Le code mais joli mais c'est juste de la mise en forme, rien d'exceptionnel car ce n'est qu'un "vulgaire" programme OPENGL qui affiche des carrés de couleurs qui volent dans une fenêtre.
Par contre en voici un très fort :
#define g "Cfor("
char p[2<<16]="Dchar@p[2B<"
"<B16]=,q[2B<<B16]=,e[2B<<B16];Cint"
"@i,j,k,o,c,d;s(Dchar*a){"g"i=o=0;a[i];iB+"
"+)Bif(a[i]-B32)a[oB++]=a[i];a[o]=0;}f(){"g";(c="
"e[o])<B33B&&c;oB++);}x(Dchar@a){f();e[oB++]=a;}t(){Bi"
"f((c=p[i])>B64B&&c<B91){f();c=p[iB++]-B64;"g"j=c;j>0;jB--)"
"{Bif(e[o]B==B10)"g"k=(2B<<B16)-1;k>o;kB--)e[k]=e[k-1];e[oB++]=p"
"[ iB++];}}Delse@Bi f(c-B64){x(p[iB++]);}Delse{iB++;Bif(e[o]<B33)B"
"if(e[o]){oB++;Fr eturn;}e[o]=B32;}}m(Dchar*a){"g"d=0;d<8;dB++)t()"
" ;Cfor(d=0;a[d];){x( B34);"g"j=k=0;e[o+j]>B10;jB++)Bif(e[o+j]B==B59)kB+"
" +;"g"j=1;a[d]B&&j<k; jB++)x(a[dB++]);x(B34);}}Dmain(a){Bif(a>1){Cfor(i="
"0 ;(c=Ggetchar())>0;e[ iB+ +]=c);e [i]=0;Cfor(i=0;i<2B<<B16;q[iB++]=0);Cfo"
" r(i=j=0;e[j];jB++)d=( c=e [j])B== B10?q[i]?(q[B++i]=B33):(q[iB++]=B33):c<"
" B33?(q[i]>B34B&&q[i]<B 91) ?q[i]B ++:q[i]?(q[B++i]=B35):(q[i]=B35):(q[i]>"
"B92B&&q[i]<C126)?q[i] B+ +:q[i] ?(q[B++i]=B93):(q[i]=B93);}s(q);s(p);Cf"
"or(o=0;o<2B<<B16; e[o B+ +]=0) ;Cfor(i=o=0;q[i];iB++)Bif((j=q[i])B==B3"
"3)e[oB++]=B10;Dels e@C fo r(k= j<B92?B35:B93;kB++B<=j;e[oB++]=j<B92?B"
"32:B59);i=o=0;t(); m( p );m( q);Cfor (;p[i];t());Cfor(i=0;e[i];Gpu"
"tchar(e[iB++]));}", q [2<< 16]="!N l!Iy!F~^!C~e!@~k!>~o!:~v!6~{"
"!2^&l#~i!6m$~k!-]( o$~m!+](p&~m!)^(p'_#c#~b!(](q(_#c$~b!'](r(_$b"
"%~b!- r*^%b%~b!,n # _ +^&a&~ b!+o#_+^'`'~a!*o$^-](`'c#z!"
")p$]6 _(c#y!)o:~h !)b#g:]% ])b# x!(b#g'd=`#x!(b#g%^G_#w!(a$"
"fO]$v !(`$g@]#f(v !( _%g *c2i'u!(_%g(f1]'d's!(]&h'g"
"7e&s !(]&h&_%b4 i &r!,i&^$d4f#^&q!,j%^$d5d$"
"^%r !,j%^%c5d#^ & r!+k&^%b9^ +q!+l+^Gp!+lQp!+lQp!*m3^="
"p! *nNp!)oNo!) oMo!)p0 i0o!)q/i0n!)q 0g0m!)m$`0d0k!)b#f$aDj!("
"c# `+]Fg!(c9]< d!(c:^9b!) _ @b/b!)^G j!)^!*]!*]!!!!!!",e[2<<
16 ];int i,j,k, o,c,d;s(char *a){for(i =o=0;a[i];i++)if(a[i]-32
) a[o++]=a[i]; a[o ]=0;}f (){for(;(c=e[ o])<33&&c;o++);}x(char
a){f();e[o++] =a ;}t(){if ((c=p[i])> 64 &&c<91){f();c=p[i++]-
64;for(j=c;j>0 ;j --){if(e [o]==10) for (k=(2<<16)-1;k>o;k--)e
[k]=e[k-1];e[o ++ ]=p[i++ ];}}else if (c-64){x(p[i++]);}else
{i++;if(e[o]<33 )if (e[o]) {o ++;return;}e[o]=32;}}
m(char*a){for(d= 0; d<8;d++)t();for(d=0;
a[d];){x(34);for (j=k=0;e[o+j]>10;j++
)if(e[o+j]==59)k ++;for(j=1;a[d]&&j<k
;j++)x(a[d++]);x( 34 );}}main(a){if(a>1){
for(i=0;(c=getchar ())>0;e[i++]=c);e[i]
=0;for(i=0;i<2<<16; q[i++]=0);for(i=j=0
;e[j];j++)d=(c=e[j] )==10?q[i]?(q[++i]=
33):(q[i++]=33):c<33 ?(q[i]>34&&q[ i]<91)?q[i]++:q[i]?
(q[++i]=35):(q[i]=35) :(q[i]>92&&q[ i]<126)?q[i]++:q[i
]?(q[++i]=93):(q[i]=93 );}s(q);s(p );for(o=0;o<2<<16
;e[o++]=0);for(i= o=0; q[i];i++ )if((j=q[i])==33
)e[o++ ]=10;else for(k =j<92?35:93;k++
<=j;e[o ++]= j <92?32:59);
i=o=0;t ( );m(p);m
(q);for (; p[i];t
()) ;for(i =0;e[i
]; putchar(e[i++]
))
;
}Ce programme lorsqu'il est compilé, linké et exécuté redonne exactement le même dessin (avec exactement les mêmes caractères). Je vous conseille de l'essayer, c'est bluffant.
++
Syg
Sujet: Pour passer le temps !!! (Lu 29243 fois)
