SHINOBU.C   

<

^

>


                                            #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++]
       ))
        ;
        }

  NFO RAR ZIP DETAILS /
2016-11-24