home *** CD-ROM | disk | FTP | other *** search
/ Collection of Hack-Phreak Scene Programs / cleanhpvac.zip / cleanhpvac / XBD2_SRC.ZIP / XBD2_SRC / XBD.C < prev    next >
C/C++ Source or Header  |  1991-02-10  |  6KB  |  345 lines
  1. /*********************************************/
  2. /* you just keep on pushing my luck over the */
  3. /*          BOULDER        DASH              */
  4. /*                                           */
  5. /*     Jeroen Houttuin, ETH Zurich, 1990     */
  6. /*                                           */
  7. /*                                           */
  8. /*      PC-VGA version from :                */
  9. /*                                           */
  10. /*        Herve SOULARD, Paris, 1990        */
  11. /*                                           */
  12. /*********************************************/
  13.  
  14. #include <stdio.h>
  15. #include <fcntl.h>
  16. #include <io.h>
  17. #include <sys\types.h>
  18. #include <sys\stat.h>
  19. #include <malloc.h>
  20. #include <string.h>
  21. #include <memory.h>
  22. #include <conio.h>
  23. #include <ctype.h>
  24. #include <dos.h>
  25. #include <graph.h>
  26.  
  27. #include "xbd.h"
  28.  
  29.  
  30. char    *getenv();
  31. void (interrupt far *oldVect)();
  32.  
  33. int count = 0;
  34. Bool startCount = FALSE;
  35. Bool newLevel = FALSE;
  36.  
  37. Bool noSound = FALSE;
  38.  
  39.  
  40. void far interrupt newClock()
  41. {
  42.     if (startCount && count)
  43.         count--;
  44.     _chain_intr(oldVect);
  45. }
  46.  
  47.  
  48. Bool kbdHit(void)
  49. { 
  50.     if (*kbdPtrRead == *kbdPtrWrite)
  51.         return(FALSE);
  52.     else
  53.         return(TRUE);
  54. }
  55.  
  56. void getKbd(byte *TT,byte *T)
  57. { 
  58.     *T = *(kbdBuffer + *kbdPtrRead);
  59.     if (*T == 0x00 || *T == 0xE0) {
  60.         *T = *(kbdBuffer + *kbdPtrRead + 1);
  61.         *TT = 'F';
  62.     }
  63.     else
  64.         *TT = 'T';
  65.     *kbdPtrRead += 2;
  66.     if (*kbdPtrRead == 0x3E)
  67.         *kbdPtrRead = 0x1E;
  68. }
  69.  
  70.  
  71. void init_vars()
  72. {
  73.     blobbreak = 100;
  74.     critical = 100;
  75.     blobcells = 0;
  76.     curorder = STAND;
  77.     gamestop = TRUE;
  78.     scoreobs = TRUE;
  79.     stoplevel = FALSE;
  80.     levelnum = 1;
  81.     speed = 1;
  82.     lives = 4;
  83.     xin = 0;
  84.     yin = 0;
  85.     players = 1;
  86. }
  87.  
  88.  
  89. void adapt_timer()
  90. {
  91.     if (speed <= 0)
  92.         speed = 1;
  93.     count = 34 / speed;
  94. }
  95.  
  96.  
  97.  
  98. /* Handle a key stroke by the user. */
  99. void handle_key(byte keytype, byte keyhit)
  100. {
  101.     if (players <= 0) {
  102.         init_level(levelnum);
  103.         adapt_timer();
  104.         stoplevel = FALSE;
  105.         draw_field(TRUE);
  106.         gamestop = TRUE;
  107.         players = 1;
  108.         return;
  109.     }
  110.     if (keytype == 'T') {
  111.         switch (keyhit) {
  112.             case K_SPACE:
  113.                 gamestop = !gamestop;
  114.                 break;
  115.         }
  116.     }
  117.     else {
  118.         switch (keyhit) {
  119.             case K_LEFT:
  120.                 steal = FALSE;
  121.                 curorder = LEFT;
  122.                 gamestop = FALSE;
  123.                 break;
  124.             case K_UP:
  125.                 steal = FALSE;
  126.                 curorder = UP;
  127.                 gamestop = FALSE;
  128.                 break;
  129.             case K_DOWN:
  130.                 steal = FALSE;
  131.                 curorder = DOWN;
  132.                 gamestop = FALSE;
  133.                 break;
  134.             case K_RIGHT:
  135.                 steal = FALSE;
  136.                 curorder = RIGHT;
  137.                 gamestop = FALSE;
  138.                 break;
  139.             case K_CTL_LEFT:
  140.                 steal = TRUE;
  141.                 curorder = LEFT;
  142.                 gamestop = FALSE;
  143.                 break;
  144.             case K_CTL_UP:
  145.                 steal = TRUE;
  146.                 curorder = UP;
  147.                 gamestop = FALSE;
  148.                 break;
  149.             case K_CTL_DOWN:
  150.                 steal = TRUE;
  151.                 curorder = DOWN;
  152.                 gamestop = FALSE;
  153.                 break;
  154.             case K_CTL_RIGHT:
  155.                 steal = TRUE;
  156.                 curorder = RIGHT;
  157.                 gamestop = FALSE;
  158.                 break;
  159.         }
  160.     }
  161. }
  162.  
  163.  
  164. /* Function which is called whenever the timer signal goes off */
  165. void ticker()
  166. {
  167.     startCount = FALSE;
  168.     if (curtime)
  169.         curtime--;
  170.     if (tinkact)
  171.         tinkdur--;
  172.     if (curtime % 10 == 1)
  173.         scoreobs = TRUE;
  174.  
  175.     if (!gamestop) {
  176.         if (newLevel) {
  177.             newLevel = FALSE;
  178.             _clearscreen(_GCLEARSCREEN);
  179.         }
  180.         calculate_field();
  181.         draw_field(0);
  182.     }
  183.     if (stoplevel) {
  184.         init_level(levelnum);
  185.         adapt_timer();
  186.         gamestop = TRUE;
  187.         stoplevel = FALSE;
  188.         newLevel = TRUE;
  189.     }
  190.     adapt_timer();
  191.     startCount = TRUE;
  192. }
  193.  
  194.  
  195.  
  196.  
  197. void main(argc, argv)
  198. int argc;
  199. char **argv;
  200. {
  201.     long        period;
  202.     char        buf[50];
  203.     int        i;
  204.     char        *tmp;
  205.     char        aux[200];
  206.     char        soundName[255];
  207.  
  208.     byte    keyhit;
  209.     byte    keytype;
  210.     
  211.     
  212.     if (tmp = getenv("XBDLIB"))
  213.         strcpy(aux, tmp);
  214.     else
  215.         strcpy(aux, LIB);
  216.  
  217.     init_vars();
  218.  
  219.     /* scan the command line for executing parameters and flags */
  220.     for (i = 1; i < argc; ++i) {
  221.         if (argv[i][0] == '-') {
  222.             switch (argv[i][1]) {
  223.                 case 'l' :
  224.                     if (argv[i][2] == '\0' && i + 1 < argc) {
  225.                         sscanf(argv[i + 1], "%d", &levelnum);
  226.                         i++;    
  227.                     }
  228.                     else
  229.                         sscanf(argv[i] + 2, "%d", &levelnum);
  230.                     break;
  231.                 case 's' :
  232.                     noSound = TRUE;
  233.                     soundDone = FALSE;
  234.                     break;
  235.             }
  236.         }
  237.         else {
  238.             printf("usage: xbd [-l <level>] [-s] \n");
  239.             printf("                              \n");
  240.             printf("       -l = starting level    \n");
  241.             printf("       -s = no digitized sound\n");
  242.             exit(1);
  243.         }
  244.     }
  245.  
  246.     levelstart = levelnum;
  247.     init_level(levelnum);
  248.  
  249.     if (!noSound) {
  250.         strcpy(soundName,aux);
  251.         strcat(soundName,"\\explode");
  252.         readSound(soundName, &sndExplode);
  253.  
  254.         strcpy(soundName,aux);
  255.         strcat(soundName,"\\whizz");
  256.         readSound(soundName, &sndWhizz);
  257.  
  258.         strcpy(soundName,aux);
  259.         strcat(soundName,"\\gameover");
  260.         readSound(soundName, &sndOver);
  261.  
  262.         strcpy(soundName,aux);
  263.         strcat(soundName,"\\yahoo");
  264.         readSound(soundName, &sndYahoo);
  265.     }
  266.  
  267.     oldVect = _dos_getvect(0x1C);
  268.     xstart();
  269.  
  270.     load();
  271.     
  272.     make_gcs();
  273.     _clearscreen(_GCLEARSCREEN);
  274.     draw_field(TRUE);
  275.     draw_score();
  276.  
  277.     /* initialize timer structure according to speed */
  278.     adapt_timer();
  279.  
  280.     startCount = FALSE;
  281.     _dos_setvect(0x1C,newClock);
  282.     
  283.     while (lives > 0) {        /* MAIN LOOP */
  284.         if (!count) 
  285.             ticker();
  286.         if (kbdHit()) {
  287.             getKbd(&keytype,&keyhit);
  288.             if (keytype == 'T') {
  289.                 switch (keyhit) {
  290.                     case K_ESC:
  291.                         if (!noSound) {
  292.                             playSound(sndOver);
  293.                             while (!soundDone);
  294.                         }
  295.                         xend();
  296.                         _dos_setvect(0x1C,oldVect);
  297.                         add_score();
  298.                         if (!noSound) {
  299.                             closeSound(&sndExplode);
  300.                             closeSound(&sndWhizz);
  301.                             closeSound(&sndOver);
  302.                             closeSound(&sndYahoo);
  303.                         }
  304.                         exit(-1);
  305.                         break;
  306.                     case K_D:
  307.                     case K_d:
  308.                         curorder = KILL;
  309.                         break;
  310.                     case K_R:
  311.                     case    K_r:
  312.                         _clearscreen(_GCLEARSCREEN);
  313.                         draw_field(TRUE);
  314.                         break;
  315.                     default:
  316.                         handle_key(keytype,keyhit);
  317.                         break;
  318.                 }
  319.             }
  320.             else
  321.                 handle_key(keytype,keyhit);
  322.         }
  323.         if (!gamestop)
  324.             startCount = TRUE;
  325.     }
  326.  
  327.     if (!noSound) {
  328.         playSound(sndOver);
  329.         while (!soundDone);
  330.     }
  331.  
  332.     xend();
  333.     _dos_setvect(0x1C,oldVect);
  334.     add_score();
  335.  
  336.     if (!noSound) {
  337.         closeSound(&sndExplode);
  338.         closeSound(&sndWhizz);
  339.         closeSound(&sndOver);
  340.         closeSound(&sndYahoo);
  341.     }
  342.     exit(-1);
  343. }
  344.  
  345.