#define FRACTAL_LENGTH 43 // <--- USER DEFINED (must be an odd number) #include #include #define OOO "\n\n C = %f + %fi \n" #define O ((FRACTAL_LENGTH +1)>>1) #define QQQ (rand()*2./RAND_MAX)-1 #define OO (O+O-1) #define Q for (// float x, xx, xxx, xxxx,xxxxx;int v, I,V, II, c, __,_ [2+ OO] [2+ OO]; char ___ [ OO ] [O +O] ,____ [13 ]= { 124, 45, 92, 47, 94, 62, 118, 60, 32, 88, 43, 42,35}, _____ [129] = \ "\ @P\ STi\ KKKA\ BEBA9\ ;9kKKK\ oKKKkCK\ CkI;K@@S\ SB0CHC0K@\ 9@9;F3K3B0\ CKK0K3A3;KB\ BEBBBEKEBEBB\ A=BFF3SBKkKCB\ [B999aFBC0B@B0\ C@K@AB;@F6c0BBB\ XK3Kk\ AAS3";int main (int p,char** ww){ if(p>1) srand(atoi (ww[1]));Q I=0;I>=2;_ [ I + O ] [ V + O ] = II ; _[ O- I ] [ O -V ] = II ; } } Q I=1; I= _ [I][V--]); __ |=((v>= _ [I][V--])<< 1); __ |=((v>= _ [I--][V++]) << 2); __ |= ((v>= _ [I][++V]) << 3); __ |=((v>= _ [I--][V-2]) << 4); __ |=((v>= _ [I][V--]) << 5); __ |=((v>= _ [I][V--])<< 6); __ |=((v>= _ [I++][V++])<< 7); switch (__){ case 255 : switch(v){ case 10: c=12; break; case 0: case 1 :c =8; break ;default :c =11 ;}break ;case 0x0:c= 10+ 1; break; case 90 :c=10; break ;case 165: c=9; break ; default :c=( ( _____ [ __>> 1] - 48) >> (3*( __&1 ))) &7;} ___[ I-1 ] [V -1] =____[c ];} Q I=0 ;I