src/game_em/input.c

   1 /* 2000-08-13T15:29:40Z
   2  *
   3  * handle input from x11 and keyboard and joystick
   4  */
   5
   6 #include <X11/Xlib.h>
   7 #include <X11/Xutil.h>
   8 #include <X11/Xatom.h>
   9 #include <X11/keysym.h>
  10 #include <sys/time.h>
  11 #include <sys/types.h>
  12 #include <unistd.h>
  13 #include <stdlib.h>
  14 #include <stdio.h>
  15 #include <string.h>
  16 #include <errno.h>
  17
  18 #include "global.h"
  19 #include "display.h"
  20 #include "level.h"
  21
  22
  23 #if defined(TARGET_X11)
  24
  25 unsigned long Random;
  26
  27 struct PLAYER ply1;
  28 struct PLAYER ply2;
  29 struct LEVEL lev;
  30
  31 unsigned short **Boom;
  32 unsigned short **Cave;
  33 unsigned short **Next;
  34 unsigned short **Draw;
  35
  36 static unsigned short *Index[4][HEIGHT];
  37 static unsigned short Array[4][HEIGHT][WIDTH];
  38
  39 static int input_die;
  40 static int input_pause;
  41 static int input_refresh;
  42 static int input_esc;
  43
  44 static struct timeval tv1;
  45 static struct timeval tv2;
  46
  47 static unsigned char keymatrix[32];
  48
  49 static int player_mode;
  50 static char player_name[32];
  51 static int player_level;
  52
  53 static void drawmenu(int pos)
  54 {
  55   char buffer[256];
  56
  57   switch(pos)
  58   {
  59     case 0:
  60       switch(player_mode)
  61       {
  62         case 0:
  63           strcpy(buffer, "quit emerald mine");
  64           break;
  65
  66         case 1:
  67           strcpy(buffer, "single player");
  68           break;
  69
  70         case 2:
  71           strcpy(buffer, "teamwork");
  72           break;
  73       }
  74
  75       title_string(4, 0, 40, buffer);
  76       break;
  77
  78     case 1:
  79       sprintf(buffer, "name: %s", player_name);
  80       title_string(5, 0, 40, buffer);
  81       break;
  82
  83     case 2:
  84       sprintf(buffer, "level: %d", player_level);
  85       title_string(6, 0, 40, buffer);
  86       break;
  87
  88     case 3:
  89       title_string(7, 0, 40, "highscores");
  90       break;
  91
  92     case 4:
  93       title_string(8, 0, 40, "start");
  94       break;
  95
  96     case 5:
  97       title_string(10, 1, 13, "played");
  98       title_string(10, 14, 26, "score");
  99       title_string(10, 27, 39, "won");
 100       break;
 101
 102     case 6:
 103       sprintf(buffer, "%d", 0);
 104       title_string(11, 1, 13, buffer);
 105       sprintf(buffer, "%d", 0);
 106       title_string(11, 14, 26, buffer);
 107       sprintf(buffer, "%d", 0);
 108       title_string(11, 27, 39, buffer);
 109       break;
 110   }
 111 }
 112
 113 void game_init_vars(void)
 114 {
 115   int x, y;
 116
 117   Random = 1684108901;
 118
 119   for (y = 0; y < HEIGHT; y++)
 120     for (x = 0; x < WIDTH; x++)
 121       Array[0][y][x] = ZBORDER;
 122   for (y = 0; y < HEIGHT; y++)
 123     for (x = 0; x < WIDTH; x++)
 124       Array[1][y][x] = ZBORDER;
 125   for (y = 0; y < HEIGHT; y++)
 126     for (x = 0; x < WIDTH; x++)
 127       Array[2][y][x] = ZBORDER;
 128   for (y = 0; y < HEIGHT; y++)
 129     for (x = 0; x < WIDTH; x++)
 130       Array[3][y][x] = Xblank;
 131
 132   for (y = 0; y < HEIGHT; y++)
 133     Index[0][y] = Array[0][y];
 134   for (y = 0; y < HEIGHT; y++)
 135     Index[1][y] = Array[1][y];
 136   for (y = 0; y < HEIGHT; y++)
 137     Index[2][y] = Array[2][y];
 138   for (y = 0; y < HEIGHT; y++)
 139     Index[3][y] = Array[3][y];
 140
 141   Cave = Index[0];
 142   Next = Index[1];
 143   Draw = Index[2];
 144   Boom = Index[3];
 145
 146   player_mode = 1;                      /* start off as single player */
 147   strcpy(player_name, "dave");
 148   player_level = 0;
 149
 150   input_pause = 1    * 0;
 151 }
 152
 153 int game_play_init(int player_level)
 154 {
 155   char name[MAXNAME+2];
 156
 157   name[MAXNAME] = 0;
 158   snprintf(name, MAXNAME+2, "%s/lev%02d", EM_LVL_DIR, player_level);
 159
 160   if (name[MAXNAME])
 161     snprintf_overflow("read a level in cave/");
 162
 163   if (cave_convert(name) != 0)
 164     return 1;
 165
 166   game_initscreen();
 167   game_blitscore();
 168   game_animscreen();
 169
 170   return 0;
 171 }
 172
 173 int game_menu_loop(boolean init, byte action)
 174 {
 175   static int temp = -1;
 176   static int pos = -1;
 177
 178   if (init)
 179   {
 180     temp = 1;
 181     pos = 4;
 182
 183     return 0;
 184   }
 185
 186   input_eventloop();
 187
 188   if (input_die)
 189     return 1;
 190
 191   if (input_refresh)
 192     blitscreen();
 193
 194   if (!input_pause)
 195   {
 196     title_blitants(4 + pos);
 197     title_blitscore();
 198     title_animscreen();
 199
 200     ply1.joy_n = ply1.joy_e = ply1.joy_s = ply1.joy_w = 0;
 201
 202     readjoy(action);
 203
 204     if (temp == 0)
 205     {
 206       if (ply1.joy_fire)
 207         return 2;
 208
 209       if (ply1.joy_e && player_level < 99)
 210       {
 211         player_level++;
 212         drawmenu(2);
 213       }
 214
 215       if (ply1.joy_w && player_level > 0)
 216       {
 217         player_level--;
 218         drawmenu(2);
 219       }
 220
 221       if (ply1.joy_n && pos > 0)
 222       {
 223         drawmenu(pos);
 224         pos--;
 225         title_blitants(4 + pos);
 226       }
 227
 228       if (ply1.joy_s && pos < 4)
 229       {
 230         drawmenu(pos);
 231         pos++;
 232         title_blitants(4 + pos);
 233       }
 234     }
 235
 236     temp = (ply1.joy_n || ply1.joy_e || ply1.joy_s || ply1.joy_w ||
 237             ply1.joy_fire);
 238   }
 239
 240   return 0;
 241 }
 242
 243 int game_play_loop(byte action)
 244 {
 245   input_eventloop();
 246
 247   if (input_die || input_esc)
 248     return 1;
 249
 250   if (input_refresh)
 251     blitscreen();
 252
 253   if (!input_pause)
 254   {
 255     game_animscreen();
 256
 257     frame = (frame - 1) & 7;
 258
 259     readjoy(action);
 260
 261 #if 1
 262     if (input_esc)
 263       return 1;
 264 #endif
 265
 266     if (frame == 7)
 267     {
 268       synchro_1();
 269       synchro_2();
 270     }
 271
 272     if (frame == 6)
 273     {
 274       synchro_3();
 275       sound_play();
 276       game_blitscore();
 277     }
 278   }
 279
 280   return 0;
 281 }
 282
 283 void game_menu_init(void)
 284 {
 285   int pos = 4;
 286   int i;
 287
 288   title_initscreen();
 289
 290   for (i = 0; i < 7; i++)
 291     drawmenu(i);                        /* display all lines */
 292
 293   title_blitants(4 + pos);
 294   title_blitscore();
 295   title_animscreen();
 296
 297   game_menu_loop(1, 0);
 298 }
 299
 300 int game_loop(byte action)
 301 {
 302 #if 1
 303
 304 #if 0
 305   printf("::: action == 0x%02x\n", action);
 306 #endif
 307
 308   if (em_game_status == EM_GAME_STATUS_MENU)
 309   {
 310     int result = game_menu_loop(0, action);
 311
 312     if (result == 1)
 313     {
 314       /* exit program */
 315
 316       return 1;
 317     }
 318
 319     if (result == 2)
 320     {
 321       /* start playing */
 322
 323       if (game_play_init(player_level) == 0)
 324         em_game_status = EM_GAME_STATUS_PLAY;
 325     }
 326   }
 327   else if (em_game_status == EM_GAME_STATUS_PLAY)
 328   {
 329     if (game_play_loop(action) != 0)
 330     {
 331       /* stop playing */
 332
 333       game_menu_init();
 334       em_game_status = EM_GAME_STATUS_MENU;
 335     }
 336   }
 337
 338   return 0;
 339
 340 #else
 341
 342   while (1)
 343   {
 344     int result = game_menu_loop(0);
 345
 346     if (result == 1)
 347       return 1;
 348
 349     if (result == 2)
 350       break;
 351   }
 352
 353   em_game_status = EM_GAME_STATUS_PLAY;
 354   if (game_play_init(player_level) != 0)
 355     return 0;
 356
 357   while (1)
 358   {
 359     if (game_play_loop() != 0)
 360       break;
 361   }
 362
 363   em_game_status = EM_GAME_STATUS_MENU;
 364   game_menu_init();
 365
 366   return 0;
 367
 368 #endif
 369 }
 370
 371 /* read input device for players
 372  */
 373 void readjoy(byte action)
 374 {
 375   unsigned int north = 0, east = 0, south = 0, west = 0, fire = 0;
 376
 377 #if 1
 378
 379   if (action & JOY_LEFT)
 380     west = 1;
 381
 382   if (action & JOY_RIGHT)
 383     east = 1;
 384
 385   if (action & JOY_UP)
 386     north = 1;
 387
 388   if (action & JOY_DOWN)
 389     south = 1;
 390
 391   if (action & JOY_BUTTON_1)
 392     fire = 1;
 393
 394   if (action & JOY_BUTTON_2)
 395     input_esc = 1;
 396
 397 #else
 398
 399   unsigned int i;
 400
 401   for (i = 0; i < 3; i++)
 402     if (keymatrix[northKeyCode[i] >> 3] & 1 << (northKeyCode[i] & 7))
 403       north = 1;
 404
 405   for (i = 0; i < 3; i++)
 406     if (keymatrix[eastKeyCode[i] >> 3] & 1 << (eastKeyCode[i] & 7))
 407       east = 1;
 408
 409   for (i = 0; i < 3; i++)
 410     if (keymatrix[southKeyCode[i] >> 3] & 1 << (southKeyCode[i] & 7))
 411       south = 1;
 412
 413   for (i = 0; i < 3; i++)
 414     if (keymatrix[westKeyCode[i] >> 3] & 1 << (westKeyCode[i] & 7))
 415       west = 1;
 416
 417   for (i = 0; i < 3; i++)
 418     if (keymatrix[fireKeyCode[i] >> 3] & 1 << (fireKeyCode[i] & 7))
 419       fire = 1;
 420 #endif
 421
 422   ply1.joy_fire = fire;
 423   if (ply1.joy_stick || (north | east | south | west))
 424   {
 425     ply1.joy_n = north;
 426     ply1.joy_e = east;
 427     ply1.joy_s = south;
 428     ply1.joy_w = west;
 429   }
 430 }
 431
 432 /* handle events from x windows and block until the next frame
 433  */
 434 void input_eventloop(void)
 435 {
 436 #if 0
 437   XEvent event;
 438 #endif
 439   unsigned int i;
 440   unsigned long count;
 441
 442   if (input_pause)
 443   {
 444 #if 0
 445     XPeekEvent(display, &event); /* block until an event arrives */
 446
 447     if (gettimeofday(&tv1, 0) == -1)
 448       tv1.tv_usec = 0;
 449 #endif
 450   }
 451   else
 452   {
 453     XSync(display, False); /* block until all graphics are drawn */
 454
 455     if (gettimeofday(&tv2, 0) == -1)
 456       tv2.tv_usec = 0;
 457
 458     count = tv2.tv_usec + 1000000 - tv1.tv_usec;
 459     if (count >= 1000000)
 460       count -= 1000000;
 461
 462     tv1.tv_usec = tv2.tv_usec;
 463     if (count < 25000)
 464     {
 465       tv2.tv_sec = 0;
 466       tv2.tv_usec = 25000 - count;
 467 #if 1
 468       select(0, 0, 0, 0, &tv2); /* sleep a bit */
 469 #else
 470       usleep(tv2.tv_usec);
 471 #endif
 472     }
 473   }
 474
 475   input_die = 0;
 476   input_refresh = 0;
 477   lastKeySym = NoSymbol;
 478
 479 #if 0
 480   while (XPending(display))
 481   {
 482     /* drain the event queue */
 483     XNextEvent(display, &event);
 484
 485     switch(event.xany.type)
 486     {
 487       case KeyPress:
 488         XLookupString(&event.xkey, (char *)&count, 1, &lastKeySym, 0);
 489         break;
 490
 491       case Expose:
 492         if (event.xexpose.window == xwindow && event.xexpose.count == 0)
 493           input_refresh = 1;
 494         break;
 495
 496       case ClientMessage:
 497         if (event.xclient.window == xwindow &&
 498             (Atom)event.xclient.data.l[0] == deleteAtom)
 499           input_die = 1;
 500         break;
 501
 502       case EnterNotify:
 503         if (event.xcrossing.window == xwindow)
 504           input_pause = 0;
 505         break;
 506
 507       case LeaveNotify:
 508         if (event.xcrossing.window == xwindow)
 509           input_pause = 1;
 510         break;
 511     }
 512   }
 513
 514   XQueryKeymap(display, keymatrix); /* read the keyboard */
 515 #endif
 516
 517   input_esc = 0;
 518   for (i = 0; i < 1; i++)
 519     if (keymatrix[escKeyCode[i] >> 3] & 1 << (escKeyCode[i] & 7))
 520       input_esc = 1;
 521 }
 522
 523 #endif