home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d536 / chemesthetics.lha / Chemesthetics / Source / Source.LZH / sanduhr.c < prev    next >
C/C++ Source or Header  |  1991-03-05  |  757b  |  40 lines
  1. #include <exec/types.h>
  2. #include <exec/memory.h>
  3. #include "chem_defs.h"
  4. #include "messages.h"
  5.  
  6. #define WAITPOINTER_DATA 56L
  7.  
  8. static UBYTE *SanduhrBuffer=NULL;
  9.  
  10. extern long conwin;
  11. extern USHORT SanduhrSpriteData[];
  12. extern struct FRPointer Sanduhr;
  13.  
  14. extern long TypeOfMem();
  15. extern void *AllocMem(),FreeMem();
  16.  
  17. void PrepareSanduhr()
  18. {
  19.   if(TypeOfMem(SanduhrSpriteData) & MEMF_FAST)
  20.   {
  21.     SanduhrBuffer=(UBYTE *)AllocMem(WAITPOINTER_DATA,MEMF_CHIP);
  22.     if(SanduhrBuffer==NULL)
  23.     {
  24.       WrConWin(conwin,NO_WAITPOINTER_MEM);
  25.       return;
  26.     }
  27.     movmem(SanduhrSpriteData,SanduhrBuffer,WAITPOINTER_DATA);
  28.     Sanduhr.Pointer=(UWORD *)SanduhrBuffer;
  29.   }
  30. }
  31.  
  32. void FreeSanduhr()
  33. {
  34.   if(SanduhrBuffer)
  35.   {
  36.     FreeMem(SanduhrBuffer,WAITPOINTER_DATA);
  37.   }
  38. }
  39.  
  40.