home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / games / abermud.zip / PACKER.C < prev    next >
Text File  |  1989-07-08  |  431b  |  45 lines
  1. #define CHAR1 255
  2. #define CHAR2 655300
  3.  
  4.  
  5.  
  6. byte_put(x,y,z)
  7. long *x;
  8. {
  9.     if(y==1)
  10.     {
  11.         *x&=~CHAR1;
  12.         *x|=z;
  13.     }
  14.     else
  15.     {
  16.         *x&=~CHAR2;
  17.         *x|=((z<<8)&CHAR2);
  18.     }
  19. }
  20.  
  21. byte_fetch(x,y)
  22. long x;
  23. {
  24.     if(y==1) return(x&CHAR1);
  25.     else return((x>>8)&CHAR1);
  26. }
  27.  
  28. bit_fetch(x,y)
  29. long x;
  30. {
  31.     return((x>>(16+y))&1);
  32. }
  33.  
  34. bit_set(x,y)
  35. long *x;
  36. {
  37.     *x|=(1<<(16+y));
  38. }
  39.  
  40. bit_clear(x,y)
  41. long *x;
  42. {
  43.     *x&=~(1<<(16+y));
  44. }
  45.