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, 3, 13, "played");
  98       title_string(10, 14, 26, "score");
  99       title_string(10, 27, 37, "won");
 100       break;
 101
 102     case 6:
 103       sprintf(buffer, "%d", 0);
 104       title_string(11, 3, 13, buffer);
 105       sprintf(buffer, "%d", 0);
 106       title_string(11, 14, 26, buffer);
 107       sprintf(buffer, "%d", 0);
 108       title_string(11, 27, 37, 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       em_game_status = EM_GAME_STATUS_PLAY;
 324       if (game_play_init(player_level) != 0)
 325         em_game_status = EM_GAME_STATUS_MENU;
 326     }
 327   }
 328   else if (em_game_status == EM_GAME_STATUS_PLAY)
 329   {
 330     if (game_play_loop(action) != 0)
 331     {
 332       /* stop playing */
 333
 334       em_game_status = EM_GAME_STATUS_MENU;
 335       game_menu_init();
 336     }
 337   }
 338
 339   return 0;
 340
 341 #else
 342
 343   while (1)
 344   {
 345     int result = game_menu_loop(0);
 346
 347     if (result == 1)
 348       return 1;
 349
 350     if (result == 2)
 351       break;
 352   }
 353
 354   em_game_status = EM_GAME_STATUS_PLAY;
 355   if (game_play_init(player_level) != 0)
 356     return 0;
 357
 358   while (1)
 359   {
 360     if (game_play_loop() != 0)
 361       break;
 362   }
 363
 364   em_game_status = EM_GAME_STATUS_MENU;
 365   game_menu_init();
 366
 367   return 0;
 368
 369 #endif
 370 }
 371
 372 /* read input device for players
 373  */
 374 void readjoy(byte action)
 375 {
 376   unsigned int north = 0, east = 0, south = 0, west = 0, fire = 0;
 377
 378 #if 1
 379
 380   if (action & JOY_LEFT)
 381     west = 1;
 382
 383   if (action & JOY_RIGHT)
 384     east = 1;
 385
 386   if (action & JOY_UP)
 387     north = 1;
 388
 389   if (action & JOY_DOWN)
 390     south = 1;
 391
 392   if (action & JOY_BUTTON_1)
 393     fire = 1;
 394
 395   if (action & JOY_BUTTON_2)
 396     input_esc = 1;
 397
 398 #else
 399
 400   unsigned int i;
 401
 402   for (i = 0; i < 3; i++)
 403     if (keymatrix[northKeyCode[i] >> 3] & 1 << (northKeyCode[i] & 7))
 404       north = 1;
 405
 406   for (i = 0; i < 3; i++)
 407     if (keymatrix[eastKeyCode[i] >> 3] & 1 << (eastKeyCode[i] & 7))
 408       east = 1;
 409
 410   for (i = 0; i < 3; i++)
 411     if (keymatrix[southKeyCode[i] >> 3] & 1 << (southKeyCode[i] & 7))
 412       south = 1;
 413
 414   for (i = 0; i < 3; i++)
 415     if (keymatrix[westKeyCode[i] >> 3] & 1 << (westKeyCode[i] & 7))
 416       west = 1;
 417
 418   for (i = 0; i < 3; i++)
 419     if (keymatrix[fireKeyCode[i] >> 3] & 1 << (fireKeyCode[i] & 7))
 420       fire = 1;
 421 #endif
 422
 423   ply1.joy_fire = fire;
 424   if (ply1.joy_stick || (north | east | south | west))
 425   {
 426     ply1.joy_n = north;
 427     ply1.joy_e = east;
 428     ply1.joy_s = south;
 429     ply1.joy_w = west;
 430   }
 431 }
 432
 433 /* handle events from x windows and block until the next frame
 434  */
 435 void input_eventloop(void)
 436 {
 437 #if 0
 438   XEvent event;
 439 #endif
 440   unsigned int i;
 441   unsigned long count;
 442
 443   if (input_pause)
 444   {
 445 #if 0
 446     XPeekEvent(display, &event); /* block until an event arrives */
 447
 448     if (gettimeofday(&tv1, 0) == -1)
 449       tv1.tv_usec = 0;
 450 #endif
 451   }
 452   else
 453   {
 454     XSync(display, False); /* block until all graphics are drawn */
 455
 456     if (gettimeofday(&tv2, 0) == -1)
 457       tv2.tv_usec = 0;
 458
 459     count = tv2.tv_usec + 1000000 - tv1.tv_usec;
 460     if (count >= 1000000)
 461       count -= 1000000;
 462
 463     tv1.tv_usec = tv2.tv_usec;
 464     if (count < 25000)
 465     {
 466       tv2.tv_sec = 0;
 467       tv2.tv_usec = 25000 - count;
 468 #if 1
 469       select(0, 0, 0, 0, &tv2); /* sleep a bit */
 470 #else
 471       usleep(tv2.tv_usec);
 472 #endif
 473     }
 474   }
 475
 476   input_die = 0;
 477   input_refresh = 0;
 478   lastKeySym = NoSymbol;
 479
 480 #if 0
 481   while (XPending(display))
 482   {
 483     /* drain the event queue */
 484     XNextEvent(display, &event);
 485
 486     switch(event.xany.type)
 487     {
 488       case KeyPress:
 489         XLookupString(&event.xkey, (char *)&count, 1, &lastKeySym, 0);
 490         break;
 491
 492       case Expose:
 493         if (event.xexpose.window == xwindow && event.xexpose.count == 0)
 494           input_refresh = 1;
 495         break;
 496
 497       case ClientMessage:
 498         if (event.xclient.window == xwindow &&
 499             (Atom)event.xclient.data.l[0] == deleteAtom)
 500           input_die = 1;
 501         break;
 502
 503       case EnterNotify:
 504         if (event.xcrossing.window == xwindow)
 505           input_pause = 0;
 506         break;
 507
 508       case LeaveNotify:
 509         if (event.xcrossing.window == xwindow)
 510           input_pause = 1;
 511         break;
 512     }
 513   }
 514
 515   XQueryKeymap(display, keymatrix); /* read the keyboard */
 516 #endif
 517
 518   input_esc = 0;
 519   for (i = 0; i < 1; i++)
 520     if (keymatrix[escKeyCode[i] >> 3] & 1 << (escKeyCode[i] & 7))
 521       input_esc = 1;
 522 }
 523
 524 #endif