MARCILLE.C   

<

^

>


                                                                               char*
                                          /*(c)      2025                 */#ifdef r
                                 *J){if(j<3||(M=atoi(J[1]))<36||(A         =atoi(J[
                             2]))<12||(M|A)>2047){return+printf("%s\40"    "{36<"      "=w"
                         "<2048} {12<=h<2048} [seed]\n",*J);}I=M+1;C=I*A;R  =6;for(q=malloc
                       (C*2);R*R<M*A*144;R+=6){}b=malloc(R*R);o=malloc(C*(LL=2*sizeof(int))
                    );if(q&&b&&o){srand(j>3?atoi(J[3]):(int*)0-&j);p=q;for(y=0;y<A*2;y++){
                  for(x=0;x<I;x++)*p++=y&&y<A*2-1&&x&&x<M-1?r>.47?0:1:15;}for(t=0;t<3;t++){for
                (y=1;y<A*2-1;y++){for(x=1;x<M-1;q[y*I+x++]|=z>3?2:0)for(z=v=-1;v<=1;v++)for(u=-1;
               u<2;u++)z+=q[(y+v)*I+x+u]&1;}p=q;for(x=0;x<C*2;x++)*p++/=2;}p=q;for(y=0;y<A*2;y+=2){
              for(x=0;x<I;x++)*p       ++           =q[y*I+x]|q[-~y*I+x];}for(*p=t=0;t<4;t++){x=r*C;x
             +=strlen(q+x);if                         (x>=C&&(x=strlen(q))>=C){x=t=+4;}if (t&3){for(v=
            +u%I;x%I-v&&q[x                            ]-2;x+=x%I>v?-1:1){q[x]=0;}for(;x-u  &&q[x]-2;x
           +=x>u?-I:I){q[x                               ]=0;}q[x]=0;}*o=u=x;for(y=1;y;)if   (!q[v=o[--
           y]]){q[v]=+2;                                  o[y++]=v-M-1;o[y++]=v-1;o[y++]=v+   I;o[y++]=
          v+1;}}p=q;for                             (y=    0;y<A;y++,*p++=10){for(x=0;x<M;++  x,++p)*p=
          *p-2?1:32;}     j=                                6;for(z=R;z-j>1||z==u;*(E?&j:&z)=u){u=(j+z)
          /2;S=u/90.     ;                                   *J="\x1bPq\"1;1;%d;%d#1;2;100;100;100#1";
         memset(b,v=                                         0,R*R);for(p=m;i(0)>0;p+=3){for(memset(o
         ,0,u*LL);i(                                          2)>0;p+=6){for(t=0;t<u*4;t++){Z=t/(u*4.);x=
         L();p++;y=L                                 ();p--;   g=o+y*2;v=v>y?v:y;*g=*g?*g<x?*g           :
 x:x;g++;*g=*g>x?*g:    x;}}g                      =o    ;for( y=0;y<u;y++,g+=2)for(x=        *g;*g     &&
+        x<=g[1];++x) b[     y*u                 +x    ]=p<73 + m?(x+y)&1:1;}w=b      ;y=0;           U()
;*  w=0; w=q+sprintf( q     ,*J,u                ,     u)  ;E = *w=1;for(p=b;E    &&               *p;
  W      ()){V();}for (     ;w -q                      <C-3&& E  ;*w++=36)W();}*                w++
    =     27;*w=92;*++       w=0;                       puts     (q);}return!t                ;}
      /*  crc=fff10ccc                                           [b]*/#else/*              */
       w,*p,*b,*q,*n="                                           \n",*m="6m2"           "o1"
         "v7{;~E|DvCq:"            ""                             "k6m'bhbkc"       "qhsmurn"
          "nhkdbd"/*  :           "                               */"bh'L/U/"  "T)a+n-q7sFtM"
          "{NtVga;M8"/*            "                              */"A55@/L/'DM>H:A?>D;LCRJWP"
           "WU`X`Y"   ""                                          "`[_]h`bj^mSuFt>j3ZDPDM':r;s"
            "<t>t?"    ""                                          "q@oEoFnElDk>k<n:r'bmdmelfkg"
             "kimin"    ""          "hpdrbraqanbm'b"               "mcncqbr]r[oYlZj[i]i^k_mbm''";
              /*  uUv3    )         GakkouHajimette'               IraiNoSaijo*/#include<string.h>
               /*    */int t,        M,A,R,C,I,LL,E                ,*o,*g,x,y,z,t,u,v;void V(){for(
                 v=0;*p-    45           &&p[v]                  ==*p&&v<99;v++){}if(v>3&&(x=strcspn
                            (w,n                              ))  >2){*w++=33;if(x>3&&v>9){*w++=v/10
                            +48;*w                          ++    =v%10+48;}else{v=v>9?9:v;*w++=48+v
                         ;}p+=v-1;}*                    w++       =*p++;}void U(){for(;y<=v;y+=6){p
                        =w;for(x=0;x<u;             x++           ){if((*w++=63+b[y*u+x]+b[-~y*u+x]
                       *2+b[(y+2)*u  +x]*4+b[(y+3)*           u+x]*8+b[(y+4)*u+x] *16+b[(y+5)*u+x]*
                      32)>63)p=w;    }w=p;*             w++=45;}}typedef double   s;s(Z),S;s i(int
                   d){return         (p[d]-39)*S;}s l(s a,s d){return+a+(d-a)     *Z;}s L(){return
                  l(l(l(i(00          ),  i(2)),l(i(2),i(4))) ,l(l(i(2),i(4       )),l(i(  4),i(6
                 ))));}void               W(){E=C-03>(w+=   strspn(w,n)           )-q;{    ;}}
                #include/*                                 */<stdio.h>
                #include                                  <stdlib.h>
              #define r                                   (s)rand()\
              /*o*//                                      RAND_MAX
             int main                                    (int j,
            #include                                    __FILE__
             #/**/                                       endif

  NFO RAR ZIP DETAILS /
2025-08-26