/*  *      *
                        *  *      *
                         * *      *
                          *        *
                         *       *
                          *     */
 
                    #include  <unistd.h>
                #include          <time.h>
            size_t                    strlen
           (const char *s)  {size_t n=0;while(
           *s++)++n;return n;}int main(int/*no
            \*comment*/ argc, char *argv[]) {
             struct                 timespec
              ts={0,              50000000};
               struct              timespec
            ts2 ={0,               500000000};
         int   i,j,n;                char*  msg/*\
       */[]={   "!gro.eeffoc4gnidoc ot emoc"   "leW",
      "?ti"          " si t"  "ahW",              "=="
      "==="            "===""===",                "wef "
     "a fo "          "mroftalp eht"          " ylniam"
      " si eef"                          "foc4gnidoc",
       "stsaisuhtne erawtfoS eerF dna sremmargorp",
        "edoneerf no bulc-ysae# lennahc CRI eht dnu"
           "ora demrof",NULL};for(i=0;msg[i];++i//
 
 
       ) {n = strlen       (            msg[i]) ; for
       (j                  =   n        ;
        j                  --  >        0
       ;)                  {write(1,    msg
       [i]                    +j,       1);
       nanosleep(&ts,        NULL       );}write(1,"\n"
 
    ,1);nanosleep(&ts2,NULL);}return 0;}/* by architekt */