home *** CD-ROM | disk | FTP | other *** search
/ Computer Club Elmshorn Atari PD / CCE_PD.iso / pc / 0600 / CCE_0657.ZIP / CCE_0657.PD / DREHE_90.C < prev    next >
Text File  |  1993-10-08  |  1KB  |  41 lines
  1. /***************************************************************************
  2. ****  Ausdruck um 90 Grad gedreht                                       ****
  3. ***************************************************************************/
  4.  
  5. /* DREHE_90.S ist natürlich schneller */
  6.  
  7. void drehe_90( char *quelle, char *ziel, long qweite, long zweite, long x )
  8. {
  9.     register    i, data;
  10.  
  11.     quelle += (x/8);
  12.     x %= 8;
  13.     x = (7-x);
  14.     for(  i=0;  i<=zweite;  i++  )
  15.     {
  16.         data = ((*quelle>>x)&1);
  17.         quelle += qweite;
  18.         data |= ((*quelle>>x)&1)<<1;
  19.         quelle += qweite;
  20.         data |= ((*quelle>>x)&1)<<2;
  21.         quelle += qweite;
  22.         data |= ((*quelle>>x)&1)<<3;
  23.         quelle += qweite;
  24.         data |= ((*quelle>>x)&1)<<4;
  25.         quelle += qweite;
  26.         data |= ((*quelle>>x)&1)<<5;
  27.         quelle += qweite;
  28.         data |= ((*quelle>>x)&1)<<6;
  29.         quelle += qweite;
  30.         data |= ((*quelle>>x)&1)<<7;
  31.         quelle += qweite;
  32.         ziel[zweite-i] = data;
  33.     }
  34. }
  35.  
  36.  
  37. /* email: prissi@marie.physik.tu-berlin.de
  38.  * Post:  Markus Pristovsek
  39.  *        Boumannstraße 66
  40.  *        13467 Berlin
  41.  */