home *** CD-ROM | disk | FTP | other *** search
/ RISCWORLD 7 / RISCWORLD_VOL7.iso / Software / Issue4 / IYONIX / MANICMINER / SOURCE.ZIP / manicminer-1.6.3 / c / loading < prev    next >
Encoding:
Text File  |  2000-12-07  |  873 b   |  49 lines
  1. #include "manic.h"
  2. #include "gfxlibs/keyboard.h"
  3. #include "gfxdata/gfxdata.h"
  4. #include "functions.h"
  5. #include "sndlibs/snd.h"
  6. #include "gfxlibs/gfx.h"
  7. #include <string.h>
  8.  
  9. void
  10. DoLoading (void)
  11. {
  12.   int key = 0, pressed;
  13.   int x, y;
  14.   int loadofs = 0;
  15.  
  16.   PAPER = 0;
  17.   INK = 124;
  18.   FontPrint (32 - strlen (VERSION), 23, VERSION);
  19.   LOADm = 1;
  20.  
  21.   for (;;) {
  22.     if (LOADp == 0) {
  23.       loadofs ^= 1;
  24.       for (y = 0; y < 8; y++)
  25.     for (x = 0; x < 32; x++) {
  26.       PAPER = GFXload[((y + (loadofs * 8)) * 32) + x];
  27.       FontPrint (x, 9 + y, " ");
  28.     }
  29.       mm_gfx_flush ();
  30.     }
  31.     else
  32.       mm_gfx_waitvr ();
  33.  
  34.     if (++LOADp == 25)
  35.       LOADp = 0;
  36.  
  37.     mm_keyb_update ();
  38.     pressed = mm_keyb_pressed (KEYB_ANYKEY);
  39.     if (key) {
  40.       if (pressed)
  41.         break;
  42.     }
  43.     else
  44.       if (!pressed)
  45.         key = 1;        /* wait for keys to be released first */
  46.   }
  47.   MODE = 0;
  48. }
  49.