Weird programming
Programmieren, wie es die Welt nicht braucht


Inhaltsübersicht

Hello World

Hello-World-Exoten:

"hello polyglot" in 7 Sprachen

---cut here--(two blank lines are MANDATORY)---

                                                                         (*O/*_/
Cu  #%* )pop mark/CuG 4 def/# 2 def%%%%@@P[TX---P\P_SXPY!Ex(mx2ex("SX!Ex4P)Ex=
CuG #%*                                                                  *+Ex=
CuG #%*------------------------------------------------------------------*+Ex=
CuG #%*   POLYGLOT - a program in seven languages      15 February 1991  *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*   Written by Kevin Bungard, Peter Lisle, and Chris Tham          *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*   We have successfully run this program using the following:     *+Ex=
CuG #%*     ANSI COBOL:            MicroFocus COBOL85 (not COBOL74)      *+Ex=
CuG #%*     ISO  Pascal:           Turbo Pascal (DOS & Mac), Unix PC,    *+Ex=
CuG #%*                            AIX VS Pascal                         *+Ex=
CuG #%*     ANSI Fortran:          Unix f77, AIX VS Fortran              *+Ex=
CuG #%*     ANSI C (lint free):    Microsoft C, Unix CC, GCC, Turbo C++, *+Ex=
CuG #%*                            Think C (Mac)                         *+Ex=
CuG #%*     PostScript:            GoScript, HP/Adobe cartridge,         *+Ex=
CuG #%*                            Apple LaserWriter                     *+Ex=
CuG #%*     Shell script:          gnu bash, sh (SysV, BSD, MKS), ksh    *+Ex=
CuG #%*     8086 machine language: MS-DOS 2.00, 3.03, 4.01, 5.00 beta    *+Ex=
CuG #%*                            VPix & DOS Merge (under unix)         *+Ex=
CuG #%*                            SoftPC (on a Mac), MKS shell          *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*   Usage:                                                         *+Ex=
CuG #%*     1. Rename this file to polyglot.[cob|pas|f77|c|ps|sh|com]    *+Ex=
CuG #%*     2. Compile and/or run with appropriate compiler and          *+Ex=
CuG #%*        operating system                                          *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*   Notes:                                                         *+Ex=
CuG #%*     1. We have attempted to use only standard language features. *+Ex=
CuG #%*        Without the -traditional flag gcc will issue a warning.   *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*     2. This text is a comment block in all seven languages.      *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*     3. When run as a .COM file with MS-DOS it makes certain      *+Ex=
CuG #%*        (not unreasonable) assumptions about the contents of      *+Ex=
CuG #%*        the registers.                                            *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*     4. When transfering from Unix to DOS make sure that a LF     *+Ex=
CuG #%*        is correctly translated into a CR/LF.                     *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*   Please mail any comments, corrections or additions to          *+Ex=
CuG #%*   peril@extro.ucc.su.oz.au                                       *+Ex=
CuG #%*                                                                  *+Ex=
CuG #%*------------------------------------------------------------------*QuZ=
CuG #%*                                                                  *+Ex=
CuG #%*!Mx)ExQX4ZPZ4SP5n#5X!)Ex+ExPQXH,B+ExP[-9Z-9Z)GA(W@'UTTER_XYZZY'CPK*+
CuG #(*                                                                  *(
C   # */);                                                              /*(
C   # *)  program        polyglot (output);                             (*+
C   #     identification division.
C   #     program-id.    polyglot.
C   #
C   #     data           division.
C   #     procedure      division.
C   #
C   # * ))cleartomark   /Bookman-Demi findfont 36 scalefont setfont     (
C   # *                                                                 (
C   #
C   # *                  hello polyglots$
C   #     main.
C   #         perform
C     * ) 2>_$$; echo   "hello polyglots"; rm _$$; exit
              print
C             stop run.
     -*,                'hello polyglots'
C
C         print.
C             display   "hello polyglots".                              (
C     */  int i;                                                        /*
C     */  main () {                                                     /*
C     */      i=printf ("hello polyglots\n"); O= &i; return *O;         /*
C     *)                                                                (*
C     *)  begin                                                         (*
C     *)      writeln  ('hello polyglots');                             (*
C     *)                                                                (* )
C     * ) pop 60 360                                                    (
C     * ) pop moveto    (hello polyglots) show                          (
C     * ) pop showpage                                                  ((
C     *)
           end                                                          .(* )
C)pop%     program       polyglot.                                      *){*/}

99 Bottles of Beer

99 Bottles of Beer

99 Bottles of Beer

Quines

Einfache Quines

Multilingual Quine

Spassige Programmiersprachen

HQ9+

Brainfuck

Brainfuck - Opcodes

Brainfuck

Brainfuck-Interpreter in Brainfuck

Intercal

Intercal - Beispiel

BeFunge & Co.

BeFunge - Beispiele

Java2k

Java2k

Java2k

Java2k

Chef

Chef

Beatnick

Beatnick

Obfuscated Programming

Perl-Camel

Perl-Camel

IOCCC

IOCCC - Appetithäppchen 2001

hello_2001.c

#include <stdio.h>
#define S(s)char x[]=#s;s
#define Q(x)x
#define A(x,y)y##x
#define B(x,y)A(y,x)
#define C(x,y)B(y,x)
#define Z(s,t,u)case s:if(*p!=32){t;}else{u;}break;
S(B( A( a ,m ),A(n ,i))() {B (A(h,c ),A(r ,a ))*p=x ;B(A( n, i),t)t
=0;B(A(n , i),t)s =0;B( f ,A(r, o )) (;*p;Q( p)++){C( B( A(c,t) ,h),B(A(
w, s),i))( s){ Z( 0,t+=8 *8-00 ,s ++)Z( 1,t+= 8 ;,s++ )Z
( 2, t++ ,putchar(t-73);t=s=0)}}})

Ausgabe:

Hello, world!

IOCCC - anderson.c

IOCCC - anderson.c

/* anderson.c */
#include <stdio.h>

char
*T="IeJKLMaYQCE]jbZRskc[SldU^V\\X\\|/_<[<:90!\"$434-./2>]s",
K[3][1000],*F,x,A,*M[2],*J,r[4],*g,N,Y,*Q,W,*k,q,D;X(){r  [r
[r[3]=M[1-(x&1)][*r=W,1],2]=*Q+2,1]=x+1+Y,*g++=((((x&     7)
-1)>>1)-1)?*r:r[x>>3],(++x<*r)&&X();}E(){A||X(x=0,g       =J
),x=7&(*T>>A*3),J[(x[F]-W-x)^A*7]=Q[x&3]^A*(*M)[2         +(
x&1)],g=J+((x[k]-W)^A*7)-A,g[1]=(*M)[*g=M[T+=A            ,1
][x&1],x&1],(A^=1)&&(E(),J+=W);}l(){E(--q&&l              ()
);}B(){*J&&B((D=*J,Q[2]<D&&D<k[1]&&(*g++=1                ),
!(D-W&&D-9&&D-10&&D-13)&&(!*r&&(*g++=0)                   ,*
r=1)||64<D&&D<91&&(*r=0,*g++=D-63)||D                     >=
97&&D<123&&(*r=0,*g++=D-95)||!(D-k[                       3]
)&&(*r=0,*g++=12)||D>k[3]&&D<=k[                          1]
-1&&(*r=0,*g++=D-47),J++));}j(                            ){
putchar(A);}b(){(j(A=(*K)[D*                              W+
r[2]*Y+x]),++x<Y)&&b();}t                                 ()
{(j((b(D=q[g],x=0),A=W)                                   ),
++q<(*(r+1)<Y?*(r+1):                                     Y)
)&&t();}R(){(A=(t(                                        q=
0),'\n'),j(),++r                                          [2
]<N)&&R();}O()                                            {(
j((r[2]=0,R(                                              ))
),r[1]-=q)                                                &&
O(g-=-q)                                                  ;}
C(){(                                                     J=
gets                                                      (K
[1]))&&C((B(g=K[2]),*r=!(!*r&&(*g++=0)),(*r)[r]=g-K[2],g=K[2
],r[
1]&&
O())
);;}
main
(){C
((l(
(J=(
A=0)
[K],
A[M]
=(F=
(k=(
M[!A
]=(Q
=T+(
q=(Y
=(W=
32)-
(N=4
))))
+N)+
2)+7
)+7)
),Y=
N<<(
*r=!
-A))
);;}

IOCCC - dhyang.c

IOCCC - dhyang.c

                    #define/**/X
                  char*d="X0[!4cM,!"
               "4cK`*!4cJc(!4cHg&!4c$j"
             "8f'!&~]9e)!'|:d+!)rAc-!*m*"
           ":d/!4c(b4e0!1r2e2!/t0e4!-y-c6!"
          "+|,c6!)f$b(h*c6!(d'b(i)d5!(b*a'`&c"
          ")c5!'b+`&b'c)c4!&b-_$c'd*c3!&a.h'd+"
         "d1!%a/g'e+e0!%b-g(d.d/!&c*h'd1d-!(d%g)"
        "d4d+!*l,d7d)!,h-d;c'!.b0c>d%!A`Dc$![7)35E"
       "!'1cA,,!2kE`*!-s@d(!(k(f//g&!)f.e5'f(!+a+)"
       "f%2g*!?f5f,!=f-*e/!<d6e1!9e0'f3!6f)-g5!4d*b"
       "+e6!0f%k)d7!+~^'c7!)z/d-+!'n%a0(d5!%c1a+/d4"
       "!2)c9e2!9b;e1!8b>e/!     7cAd-!5fAe+!7fBe(!"
      "8hBd&!:iAd$![7S,Q0!1     bF 7!1b?'_6!1c,8b4"
      "!2b*a,*d3!2n4f2!${4    f.      '!%y4e5!&f%"
     "d-^-d7!4c+b)d9!4c-a    'd        :!/i('`&d"
     ";!+l'a+d<!)l*b(d=!'   m-        a  &d>!&d'"
    "`0_&c?!$dAc@!$cBc@!$   b         <    ^&d$`"
    ":!$d9_&l++^$!%f3a'    n1        _       $ !&"
   "f/c(o/_%!(f+c)q*c     %!         *       f &d+"
   "f$s&!-n,d)n(!0i-     c-         k)       !  3d"
   "/b0h*!H`7a,![7*     i]          5        4   71"
  "[=ohr&o*t*q*`*d      *v         *r         ;  02"
  "7*~=h./}tcrsth      &t          :          r   9b"
 "].,b-725-.t--//      #r         [           <   t8-"
 "752793?  <.~;b      ].t--+r     /           #    53"
 "7-r[/9~X  .v90      <6/<.v;-52/={            k   goh"
 "./}q;   u  vto     hr  `.i*$engt$            $    ,b"
 ";$/     =t ;v;     6     =`it.`;7=`          :    ,b-"
 "725    = / o`.    .d       ;b]`--[/+       55/     }o"
 "`.d   :   - ?5    /           }o`.'     v/i]q      - "
 "-[;   5  2  =`  it            .        o;53-       . "
 "v96   <7 /      =o            :            d        =o"
 "--/i  ]q--      [;           h.            /        = "
 "i]q--[  ;v      9h           ./            <        - "
 "52={cj   u      c&`          i   t       . o        ; "
 "?4=o:d=         o--          /  i        ]q         - "
 "-[;54={  cj     uc&          i]q          -          -"
 "[;76=i]q[;6     =vsr        u.i           /          ={"
 "=),BihY_gha     ,)\0        "             ,          o [
  3217];int i,   r,w,f        ,              b        ,x ,
  p;n(){return   r  <X        X               X       X  X
  768?d[X(143+   X  r++       +               *d      )  %
   768]:r>2659   ?  59:       (                x      =  d
   [(r++-768)%   X  947      +             768]       ) ?
   x^(p?6:0):(p  =   34      X            X           X )
   ;}s(){for(x=  n   ();     (           x^           ( p
  ?6:0))==32;x=  n    ()     )   ;return x            ; }
  void/**/main X      ()     {           r           =  p
  =0;w=sprintf  (X     X     X         X X           X o
  ,"char*d=");  for          (    f=1;f <            * d
  +143;)if(33-(  b=d         [      f++ X           ]  )
  ){if(b<93){if   X(!        p          )             o
   [w++]=34;for    X(i       =         35             +
    (p?0:1);i<b;    i++      )         o
    [w++]=s();o[     w++               ]
     =p?s():34;}     else              X
       {for(i=92;     i<b;            i
        ++)o[w++]=     32;}           }
             else o     [w++          ]
                         =10;o        [
                           w]=0      ;
                            puts(o);}

IOCCC - dhyang.c - aku.c 

char*d=")35E!'1cA,,!""2kE`*!-s@d(!(k(f//g&!)f.e5'f(!+a+)f%2g*!?f5f,!=f-*e/!<d"
"6e1!9e0'f3!6f)-g"       "5!4d*b+e6!0f%k)d7!+~^'c7!)z/d-+!'n%a0(d5!""%c1a+/d4"
"!2)c9e2!9b;e1!8b"       ">e/!7cAd-!5fAe+!7fBe(!8hBd&!:iAd$![7S,Q"    "0!1bF7"
"!1b?'_6!1c,8b4!2"       "b*a,*d3!2n4f2!${4f.'!%y4e5!&f%d-^-d7!4"       "c+b)"
"d9!4c-a'd:!/i('`"       "&d;!+l'a+d<!)l*b(d=!'m-a&d>!&d'`0_&c"           "?!"
"$dAc@!$cBc@!$b<^"       ""              "&d$`:!$d9_&l++^$!%f3"          "a'n"
"1_"                                   "$!&f/c(o/_%!(f+c)q*c%"         "!*f&d"
"+f$"                                "s&!-n,d)n(!0i-c-k)!3d/"        "b0h*!H`"
"7a,!["                      "7X0[!4cM,!4cK`*!4cJc(!4cHg&!4"       "c$j8f'!&~"
"]9e)!'"                 "|:d+!)""rAc-!*m*:d/!4c(b4e0!1r"        "2e2!/t0e4!-"
"y-c6!+|,c6!)f$b("       "h*c6"      "!(d'b(i)d5!(b*a'"         "`&c)c5!'b+`&"
"b'c)c4!&b-_$c"                      "'d*c3!&a.h'd+d"         "1!%a/g'e+e0!%b"
"-g(d.d/!&c*"                        "h'd1d-!(d%g)"         "d4d+!*l,d7d)!,h-"
"d;c'!.b0c"                             ">d%!A`Dc$"       "![7*i]5471[=ohr&o*"
"t*q*`*d"                                "*v*r;027"       "*~=h./}tcrsth&t:r9"
"b].,b"          ""      "-725"            "-.t--/"       "/#r[<t8-752793?<.~"
";b]."        "t--"      "+r/#"             "537-r"        "[/9~X.v90<6/<.v;-"
"52/="      "{kgoh."     "/}q"    ";u"       "vtohr"       "`.i*$engt$$,b;$/="
"t;v"      ";6=`it."    "`;"      "7=`"       ":,b-7"       "25=/o`..d;b]`--["
"/+"      "55/}o`.d:"   ""       "-?5"        "/}o`.'"       "v/i]q--[;52=`it"
".o"     ";53-.v96<7"            "/=o"        ":d=o--/"        "i]q--[;h./=i]"
"q"     "--[;v9h./<-"           "52="         "{cjuc&`"         "it.o;?4=o:d="
"o"      "--/i]q--["           ";54="        "{cjuc&i]q-"        "-[;76=i]q[;"
"6="       "vsru.i"            "/={"        "=),BihY_gha,)"        "",o[3217];
int i,        r,w           ,f,b,p,        t=641,x;n(){return         r<t?d[(*
d+143+(r                ++))%t]:r>        +1341?59:(x=d[(r++-t)        %351+t]
)?x^(p?6:0            ):(p=+34);}        main(){w=sprintf(o,"char"       "*d="
);r=p=0;for(      f=1;f<*d+143;)       if((b=d[f++])-33){if(b<+93){        if(
!p)o[w++]=34;for(i=35+(p?0:1);i    <b;i++)o[w++]=n();o[w++]=p?n():+34       ;}
else for(i=92;i<b;i++)o[w++]=32;}else o[w++]=10;o[w]=0;puts(o);};/*Don_Yang*/;

IOCCC - dhyang.c - soku.c

char*d="S,Q0!1bF7!1b?'_""6!1c,8b4!2b*a,*d3""!2n4f2!${4f.'!%y4e5!&f%d-^-d7!4c+"
"b)d""9!4c-a'd:!/i("       "'`&d;!+l'a+d<!)l*b(d=!'m-a&d>""!&d'`0_&""c?!$dAc@"
"!$cBc@!$b<^&d$"               "`:!$d9_&l++^$!%f3a'n1_$!&f/c(o/_%"    "!(f+c)"
"q*c%!*f&d"                       "+f$s&!-n,d)n(!0i-c-k)!3d/b0h"        "*!H`"
"7a,!"               "[7X0"          "[!4cM,!4cK`""*!4cJc(!4cH"           "g&"
"!4c$j"          "8f'!&~]9e)"         "!'|:d+!)rAc-!*m*:""d/!"          "4c(b"
"4e0!1r2"     "e2!/t0e""4!-y-"          "c""6!+|,c6!)f$b(h"           "*c6!(d"
"'b(i)d5!(b*a'`&c)c5!'b+`&b'"          "c)c4!&b-_$c'd*c3!"          "&a.h'd+d"
"1!%a/g'e+e0!%b-g(d.d/!&c*"          "h'd1d-!(d""%g)d4d"         "+!*l,d7d)!,"
"h-d;c'!.b0c>d%!A`Dc$![7)"        "35E!'1cA,,!2kE`*!-"         "s@d(!(k(f//g&"
"!)f.e5'f(!+a+)f%2g*!?"         "f5f,!=f-*e/!""<d6"          "e1!9e0'f3!6f)-g"
"5!4d*b+e6!0f%k)d7!"          "+~^'c""7!)z/d-+!"           "'n%a0(d5!%c1a+/d4"
"!2)c9e2!9b;e1!8b"        ">e/!7c"      "Ad-!5fA"         "e+!7fBe(!8hBd&!:iA"
"d$![7*i]5471"          "["               "=ohr&"        "o*t*q*`*d*v*r;027*~"
"=h./}tc"                                    "rst"       "h&t:r9b].,b-725-.t-"
"-//#r"                              "[<t8-752793"        "?<.~;b].t""--+r/#5"
"37-"                  "r"     "[/9~X.v90<6/""<.v;"        "-52/={kgoh./}q;uv"
"t"       "ohr`.i*$engt$"     "$,b;$/=""t;v;6=`it.`"        ";7=`:,b-725=/o`."
".d;b]`--[/+55/""}o`.d"       ":-?5/}o`.'v/i]q--[;52"         "=`it.o;53-.v96"
"<7/=o:d=o--/i]q--[;h."      "/=i]q--[;v9h./<-52={cju"         "c&`it.o;?4=o:"
"d=o--/i]q--[;54={cju"      "c&i]q--[;76=i]q[;6=vsru.i/"         "={=),BihY_g"
"ha,)",o[3217];int i,       r,w,f,b,p,t=641,x;n(){return r<        t?d[(*d+143
+(r++))%t]:r>+1341?          59:(x=d[(r++-t)%351+t])?x^(p?6:         0):(p=+34
);}main(){w=sprintf(o          ,"char""*d=");r=p=0;for(f=1;f<*d         +143;)
if((b=d[f++])-33){if(b            <+93){if(!p)o[w++]=34;for(i=35+(        p?0:
1);i<b;i++)o[w++]=n();o[             w++]=p?n():+34;}else for(i=92;i        <b
;i++)o[w++]=32;}else o[w++]=10;o[w]=0;puts(o);};/*Don_Yang*/;;;;;;;;;;;;;;;;;;

IOCCC - dhyang.c - zan.c

char*d="X0[!4cM,""!4cK`*!4cJc(!4cHg&!4c$j8f'!&~]9e)!'|:d+!)rAc-""!*m*:d/!4c(b"
"4e0!1r2e2!/t0"      "e4!-y-c6!+|,c6!)f$b(h*c6!(d'b(i)d5""!(b*a'`&c)c5!'b+`&b"
"'c)c4!&b-_$c'"      "d*c3!&a.h'd+d1!%a/g'e+e0!%b""-g("   "d.d/!&c*h'd1d-!(d%"
"g)d4d+!*l,d7d"       ")!,h-d;c""'!.b0c>d%!A`Dc$![7)3"      "5E!'1cA,,!2kE`*!"
"-s@d(!(k(f//g&"      "!)f.e5"     "'f(!+a+)""f%2g*!"        "?f5f,!=f-*e/!<d"
"6e1!9e0'f3!6f)"                  "-g5!4d*b+e6!0f%k"          ")d7!+~^'c7!)z/"
""                               "d-+!'n%a0(d5!%c1"          "a+/d4!2)c9""e2!"
"9"                             "b;e1!8b>e/!7cAd-"         "!5fAe+!7fBe(!8hBd"
"&!"          ":"        "iAd$![7S,"  "Q0!1bF7!1"        "b?'_6!1c,8b4!2b*a,*"
"d3!2n4f2!${4f.'!"       "%y4e5!&"      "f%d-^"        "-d7!4c+b)d9!4c-a'd:!/"
"i('`&d;!+l'a+d<!"       ")l*b(d=!'"     "m-a"        "&d>!&d'`0_&c?!$dAc@!$c"
"Bc@!$b<^&d$"             "`:!$""d9_"    "&l"        "++^$!%f3a'n1_$!&f/c(o/_"
"%!(f+c)"                "q*c"     "%!*f&d+"        "f$s&!-n,d)n(!0i-c-k)!3d/"
"b0h*!"                "H`7a,!"      "[7*i"        "]5471[=ohr&o*t*q*`*d*v*r;"
"027"                 "*~=h./}tc"     "rs"        "th&t:r9b].,b-725-.t--//#r["
"<t"        "8-7"    "52793?<.~;b]"   ".t"       "--+r/#537-r[/9~X.v90<6/<.v;"
""        "-52/={kgoh./}q;uvtohr`.i*$eng"       "t$$,b;$/=t;v;6=`it.`;7=`:,b-"
""       "725=/o`..d;b]`--[/+55/}o`.d:-?"       "5/}o`.'v/i]q--[;52=`it.o;53-"
""      ".v96<7/=o:d=o--/i]q--[;h"  "./"        ""    "=i]q--[;v9h./<-52={cju"
""        "c&`it.o;?4=o:d=o--/i]"   "q-"                "-[;54={""cjuc&i]"  ""
"q"          "--[;76=i]q[;6=v"     "sru"                  ".i/={=),BihY_"   ""
"gh"          "a,)",o[3217]       ;int i                   ,r,w,f,b,p,t=   641
,x;n()          {return r       <t?d[(*                     d+143+(r       ++)
)%t]:r>+          1341        ?59:(x=d[          (r                       ++-t
)%351+t])?x                  ^(p?6:0):(        p=+34);                  }main(
){w=sprintf(o,             "char""*d="       );r=p=0;for               (f=1;f<
*d+143;)if((b=d[f        ++])-33){if(b      <+93){if(!p)o[            w++]=34;
for(i=35+(p?0:1);i<b;i++)o[w++]=n();o[    w++]=p?n():+34;}else      for(i=92;i
<b;i++)o[w++]=32;}else o[w++]=10;o[w]=0;puts(o);};/*Don_Yang*/;;;;;;;;;;;;;;;;

IOCCC - heathbar.c

#							       include <stdio.h>
#						 define	    MAin   printf("%d\n"
#						 define	    mAIN	return 0
#						 define	    MaiN	 {static
#						 define	    mAlN	  ) {if(
#						 define	    MA1N	   char*
#						 define	    MAiN	    (!!(
#						 define	    mAiN	    atoi
#						 define	    mAln	    &1<<
#						 define	    MAlN	    !=3)
#						 define	    MAln	     )&&
#						 define	    MAIN	     int
#						 define	    maln	     --,
#						 define	    Maln	      <<
#						 define	    MaIn	      ++
#						 define	    MalN	      |=
#						 define	    MA1n	      ||
#						 define	    malN	      -1
#						 define	    maIN	       *
#						 define	    MaIN	       =
#						 define	    ma1N	       )
#						 define	    Ma1N	       (
#						 define	    Main	       ;
#						 define	    mA1n	       !
#						 define	    MAIn	       }
#						 define	    mA1N	       ,
        					  MAIN	    mAIn
						  Ma1N	    MAIN
						  ma1N	    mA1N
						  mAiN	    Ma1N
		    MA1N ma1N mA1N maIn MaIN malN mA1N	    ma1n
		    mA1N			  maiN	    Main 
		    MAIN      main Ma1N MAIN Ma1n mA1N MA1N maIN
		    mAin      mAlN		  Ma1n	    MAlN
		    mAIN      Main		  maIn	    MaIn
	       mA1N Ma1n maln mAin MaIn		  Main	    maIn
	       MaIN		   mAiN		  Ma1N	    Ma1N
	       Ma1n		   maln		  maIN	    mAin
	       MaIn		   ma1N		  ma1N	    Main
	       ma1n		   MaIN		  mAiN	    Ma1N
	       Ma1N		   Ma1n		  maln	    maIN
	       mAin		   MaIn		  ma1N	    ma1N
	       Main		   mAIn		  Ma1N	    mAIn
	       Ma1N		   mAIn		  Ma1N	    mAIn
	       Ma1N		   mAIn	     Ma1N mAIn	    Ma1N mAIn
		Ma1N		  mAIn	     Ma1N mAIn	    Ma1N mAIn
		  Ma1N		mAIn	     Ma1N   mAIn  Ma1N	 mAIn
		    Ma1N mAIn Ma1N	     mAIn      Ma1N	 mAIn
			 Ma1N		     Ma1n		 ma1N
			 ma1N		     ma1N		 ma1N
	  ma1N ma1N ma1N ma1N		     ma1N		 ma1N
	  ma1N		 ma1N		     ma1N		 ma1N
	  ma1N		 ma1N		     Main		 MAin
	  mA1N maiN ma1N Main mAIN Main	     MAIn		 MAIN
	  mAIn	Ma1N		  MAIN	     mAin		 ma1N
	  MaiN	 MAIN		 main	       MaIN	       malN
	  Main	  main		MaIn		 Main	     mAIN
	  mA1N	   maiN	       MalN		   Ma1N	   MAiN
	  maIn	    mAln      main		       ma1N
	  MA1n	     Ma1N    MAiN		       ma1n
	  mAln	      main  ma1N		       MA1n
	  mAin		 MAln			       Ma1N
	  mA1n	      MAiN  ma1n		       mAln
	  main	      MAln  mAin		       ma1N
	  ma1N		 ma1N	   MAln Ma1N mA1n MAiN maIn
	  mAln		 main	   MAln
	  Ma1N		 MAiN	   ma1n
	  mAln	    main ma1N MA1n mAin MAln
	  Ma1N	    mA1n		MAiN
	  ma1n	    mAln		main
	  MAln	    mAin		ma1N
	  ma1N	    ma1N		ma1N
	  ma1N	    ma1N		Maln
	  main	    mA1N		MAiN
	  ma1n	    mAln		main
	  MAln	    mAin		ma1N
	  MA1n	    MAiN		maIn
	  mAln	     main	       MAln
	  Ma1N	       MAiN	     ma1n
	  mAln		 main ma1N MA1n
	  mAin		      MAln
	  Ma1N		      mA1n
	  MAiN		      ma1n
	  mAln		      main
	  MAln		      mAin
	  ma1N		      ma1N
	  ma1N		      ma1N
	  Main		      MAIn

Selbstmodifizierender Code

Selbstmodifizierender Code

Literatur (hoffentlich vollständig)

Ende

Anfahrtsskizze Parasco