1. Weiterleitung zu NetzLiving.de
  2. Forum
    1. Unerledigte Themen
  3. zum neuen Forum
  • Anmelden
  • Suche
Dieses Thema
  • Alles
  • Dieses Thema
  • Dieses Forum
  • Seiten
  • Forum
  • Erweiterte Suche
  1. Informatik Forum
  2. Webmaster & Internet
  3. Entwicklung

Frohe Weihnachten!

  • gelbasack
  • 20. Dezember 2005 um 14:30
  • Unerledigt
Hallo zusammen,

das Informatik-Forum geht in den Archivmodus, genaue Informationen kann man der entsprechenden Ankündigung entnehmen. Als Dankeschön für die Treue bekommt man von uns einen Gutscheincode (informatikforum30) womit man bei netzliving.de 30% auf das erste Jahr sparen kann. (Genaue Infos sind ebenfalls in der Ankündigung)

Vielen Dank für die Treue und das Verständnis!
  • gelbasack
    Punkte
    6.525
    Beiträge
    1.241
    • 20. Dezember 2005 um 14:30
    • #1

    Bin grad beim Aufräumen zufällig drauf gestoßen und da ja bald Weihnachten ist...

    Code
    #include <stdio.h>
    main(t,_,a)
    char *a;
    {
    return!0<t?t<3?main(-79,-13,a+main(-87,1-_,main(-86,0,a+1)+a)):
    1,t<_?main(t+1,_,a):3,main(-94,-27+t,a)&&t==2?_<13?
    main(2,_+1,"%s %d %d\n"):9:16:t<0?t<-72?main(_,t,
    "@n'+,#'/*{}w+/w#cdnr/+,{}r/*de}+,/*{*+,/w{%+,/w#q#n+,/#{l+,/n{n+,/+#n+,/#\
    ;#q#n+,/+k#;*+,/'r :'d*'3,}{w+K w'K:'+}e#';dq#'l \
    q#'+d'K#!/+k#;q#'r}eKK#}w'r}eKK{nl]'/#;#q#n'){)#}w'){){nl]'/+#n';d}rw' i;# \
    ){nl]!/n{n#'; r{#w'r nc{nl]'/#{l,+'K {rw' iK{;[{nl]'/w#q#n'wk nw' \
    iwk{KK{nl]!/w{%'l##w#' i; :{nl]'/*{q#'ld;r'}{nlwb!/*de}'c \
    ;;{nl'-{}rw]'/+,}##'*}#nc,',#nw]'/+kd'+e}+;#'rdq#w! nr'/ ') }+}{rl#'{n' ')# \
    }'+}##(!!/")
      :t<-50?_==*a?putchar(a[31]):main(-65,_,a+1):main((*a=='/')+t,_,a+1)
        :0<t?main(2,2,"%s"):*a=='/'||main(0,main(-61,*a,
    "!ek;dc i@bK'(q)-[w]*%n+r3#l,{}:\nuwloca-O;m .vpbks,fxntdCeghiry"),a+1);
    }
    Alles anzeigen
  • a9bejo
    Punkte
    4.697
    Beiträge
    913
    • 21. Dezember 2005 um 21:34
    • #2
    Code
    s="IyBUaGFua3MgZm9yIGxvb2tpbmcgYXQgbXkgY29kZ
    S4KIwojIENvcHlyaWdodCAoQykgMjAwMiAgQ2hyaXN0a
    WFuI      E       5       l       d     Wtpc                                
    mNoZ  W       4      gP       G       N obmV
    1a2l      y       Y 2hlb  k       B     nbWF
    pbC5  j       b    20+CiM     K       I yBUa
    GlzI      H       Byb2dyYW        0     gaXM
    gZnJ  l       Z  SBzb2Z0d2F   y       Z Tsge
    W91I      G     NhbiByZWRpc3      R     yaWJ
    1dGU  g        aXQgYW5kL29yCi M       g bW9k
    aWZ5      I   Gl0IHVuZGVyIHRoZ    S     B0ZX
    Jtcy  B      vZiB0aGUgR05VIEdlb       m VyYW
    wgUH      V      ibGljIExpY       2     Vuc2
    UuCg  p       T VERPVVQuc3lu  Y       y A9IH
    RydW      U    KZDEsIGQyID0gM     C     4xNS
    wgMC  4       wNgpzID0gIk1lcnJ        5 IGNo
    cmlz      d  G1hcywgLi4uIGFuZCB   h     IGhh
    cHB5  I     G5ldyB5ZWFyIgptID0gJ      X d7LC
    AuID       ogISArICogMCBPIEB9CnUg P     SAiI
    CIgK  i   BzLnNpemUKCnByaW50ICJcci    A gI3t
    1fVx      y   IjsKCigwLi4ocy5z    a     XplL
    TEpK  S      50b19hLnNvcnRfYnkg       e yByY
    W5kI      H 0uZWFjaCB7IHxyfAogIH  N     sZWV
    wIGQ  x    CiAgbmV4dCBpZiBzW3JdID     0 9ICI
    gIls      wXQogIG0uZWFjaCB7IHxrfAo      gICA
    gdVt  y  XSA9IGsKICAgIHByaW50ICIgIC   N 7dX1
    cciI    KICAgIHNsZWVwIGQyCiAgfQogIHV    bcl0
    gPSB   zW3JdCiAgcHJpbnQgIiAgI3t1fVxyI g p9Cg
    pzbG  VlcCBkMgpwcmludCAiICAje3V9IVxyI   jsKc
    2xlZ  X       A    gMwpwc     m       l udCA
    iICA      j        e3V9IS A       g     LS1j
    aHJp  c       z    JcbiI7     C       g ojIG
    ZpbG      x        lciBzc G       F     jZSA
    jIyM  j       I    yMjIyM     j       I yMjI
    yMjI      y       M       j       I     yMjI
    yMK";eval s.delete!(" \n").unpack("m*")[0]##
    ### Copyright (C) 2004  Christian Neukirchen
    Alles anzeigen

    auszufuehren mit einem ruby interpreter > 1.8

    anleitung

  • ComSubVie
    Punkte
    230
    Beiträge
    42
    • 23. Dezember 2005 um 23:29
    • #3

    vermutlich kennt das schon der eine oder andere, aber egal. gesteuert wird mit j und k.

    Perl
    #!/usr/bin/perl
                                                $x=chr(0x20);sub
                                       P{print@_}$D=qq(/X\\);sub
                          S{substr($_[0],$_[1],$_[2])=$_[3]};sub
            i{$n=1;$L++;$X=40-($Y=2);$V=0.01;$S=4}$Z=sqrt(2);sub
             d{$t="X$_[0]X";$t=~s/X/$x/g;map{S($o,$_,15,"*"x15)}
             (822,980);S($o,901,15,"*".$t."*");}$Z=1/$Z;/./;sub
             l{system('stty',($_[0]?"":"-").'cbreak',($_[0]?"-"
             :"").'echo');$_[0]&&P("\e[H\eJ')}$A=(('$x'x78).''.
             '\n')x23;$b=[[[3,3,3,3,0],',,,||'],[[3,3,3,3,0],''
             .'..x//'],[[3,3,0,7,0],q(`====')],[[3,3,0,3,6],"x"
             .'xx\\\\//``'],[[3,3,0,3,3],q/||||||''/],[[3,3,0,6
             ,3],q,././//'',],[[3,3,0,7,0],'===`=='],[[3,3,3,3,
              0],',,.\\\\']];$E="LXEXVXEXLX";$y=32767;$z=96;sub
              v{$V*=0.85;$i=$S%4?($S<4?1:-1):0;$j=($S-2)%4?(($S
              -2)%8<4?1:-1):0;$t=$S%1?$Z:1;$V+=$j*($j<0?0.0200:
              0.05-0.01*($S%1));$X+=$i*$t*$V;$Y+=$j*$t*$V};;sub
              o{for$k(0..$_[0]->[0]->[0]-1){for$l(1..$_[0]->[0
              ]->[1]){($_[0]->[2]->[$l-1]&(2**$k))&&$_[1]+$k<=
              77&&$_[1]+$k>=0&&$_[2]+$l-$_[0]->[0]->[1]>=0&&($
               O->[$_[2]+$l-$_[0]->[0]->[1]]->[$_[1]+$k]=1)}}}
               $B="CXRXAXSXHX!";$z=16385;$a=[[[3,4,2,7,7,2],""
               ."X.X$D$D.|",[0,0,2,2]],[[3,2,2,7],'(_)(_)',[0,
               7]],[[6,4,12,30,63,12],"///\\////XX\\|/____\\_"
               .".||",[0,0,12,12]],[[15,06,$y,$y,$y,$z,$z,$z],
               ".".("_"x13).".|XFXIXNXIXSXHX||".("_"x13).q,|,.
               ("|".("X"x13)."|")x3,[0,0,0,0,0,$z]]];/mbm/;sub
                C{($k,$l)=(int($X),int$Y);($k<0||$k>77)&&$c++;
                for$i(0..2){for$j(0..2){($$b[$S][0][2+$j]&(02
            **$i))&&$l-$j>=00&&$$O[$l+1-$j][$k+$i]&&$c++}
            }$c&&d($B)};$W="keys_are_j_and_k.q-_quit";sub
                 R{$o=$A;$l=($_[1]-4<0)?0:($_[1]+19>@$C)?@$C-
                 23:$_[1]-4;for$j(0..$#$C){$$C[$j+$l]||next;;
                 for$i(0..$#{$$C[$l+$j]}){$$C[$j+$l][$i]&&r($
                 i,$j,$$C[$j+$l][$i])}$j+$l-$_[1]||r($_[0],$j
                 ,$b->[$S])}}sub#V{return(int(rand(482)));};;
                 r{($g,$h)=@_;$f=$_[2][0][1];while($h>=0&&$f
                 >0){$f--;for$e(0..$_[2][0][00]-1){if($h<=22
                 &&$e+$g>=0&&$e+$g<=77&&((2**$e)&$_[2][0][2+
                 $f])){$t=substr($_[2][1],$f*$_[2][0][0]+$e,
                 1);$t=~s/X/$x/g;S($o,79*$h+$e+$g,1,$t)}}--$
                 h}}sub#f{$S++;$e=$j+$$b[$S][0];$f=$i+2}sub
                  L{l(1);&i;for(;!$d;++$v>999?$v=0:do{/./;(
                  select$_=chr(1),"","",0)[0]||next;sysread
                  STDIN,$_,1}){$S=($S+(/j/?1:/k/?-1:0))%8;;
                  /q/&&($d=1);$n&&p();&v;R(int($X),int$Y);$
                  n&&B();&C;P("\e[;H$o');$n&&($n--,sleep(2)
                  );$c&&($d++,sleep(2));int$Y==@$C&&(i,($L-
                  10||$d++),sleep(2))}l()}sub#k{$_[0]+9}sub
                  p{$t=int(sqrt($L)*45);$C=[];$O=[];;for$i(0
                 ..$t){push(@$C,[]);push(@$O,[])}for$i(0..(40
                 *$L)){$$C[U($t)][U(78)]=$$a[U(3)]}$$C[-2][U(20)
                +20]=$$a[3];for$j(0..$t){for$i(0..$#{$$C[$j]}){$$C
                [$j]->[$i]&&o($C->[$j]->[$i],$i,$j);}}}/#######/;sub
                B{d($E.$L)}sub#_{$W=$W.qq.\n_-_downhill__racer_-\n\n.}
                U{int(rand($_[0]))};L()#______________________________##
                 #______________________________________________________###
                 #_________________________________________________________###
                  #_____________D_O_W_N_H_I_L_L___R_A_C_E_R___________________##
                   #____________________________________________________________#
                    ####__________by__mbm__Christmas_2004________________________#
                        #######__________________________________________________#
                              ###_______Happy_Christmas,_Perlmongers____________##
                                 ###__________________________________________##
                                    ##_____j_-_clockwise__________________####
                                      ###__k_-_anticlockwise__________####
                                         ########_q_-_quit_____#######
                                                 ##############
    Alles anzeigen
  • Maximilian Rupp 27. Dezember 2024 um 12:06

    Hat das Thema aus dem Forum Programmieren nach Entwicklung verschoben.

  1. Datenschutzerklärung
  2. Impressum