src/tape.c

   1 /***********************************************************
   2 * Rocks'n'Diamonds -- McDuffin Strikes Back!               *
   3 *----------------------------------------------------------*
   4 * (c) 1995-2002 Artsoft Entertainment                      *
   5 *               Holger Schemel                             *
   6 *               Detmolder Strasse 189                      *
   7 *               33604 Bielefeld                            *
   8 *               Germany                                    *
   9 *               e-mail: info@artsoft.org                   *
  10 *----------------------------------------------------------*
  11 * tape.c                                                   *
  12 ***********************************************************/
  13
  14 #include "libgame/libgame.h"
  15
  16 #include "tape.h"
  17 #include "init.h"
  18 #include "game.h"
  19 #include "tools.h"
  20 #include "files.h"
  21 #include "network.h"
  22 #include "cartoons.h"
  23
  24 /* tape button identifiers */
  25 #define TAPE_CTRL_ID_EJECT              0
  26 #define TAPE_CTRL_ID_INDEX              1
  27 #define TAPE_CTRL_ID_STOP               2
  28 #define TAPE_CTRL_ID_PAUSE              3
  29 #define TAPE_CTRL_ID_RECORD             4
  30 #define TAPE_CTRL_ID_PLAY               5
  31
  32 #define NUM_TAPE_BUTTONS                6
  33
  34 /* values for tape handling */
  35 #define TAPE_PAUSE_SECONDS_BEFORE_DEATH         5
  36
  37 /* forward declaration for internal use */
  38 static void HandleTapeButtons(struct GadgetInfo *);
  39 static void TapeStopIndexSearch();
  40
  41 static struct GadgetInfo *tape_gadget[NUM_TAPE_BUTTONS];
  42
  43
  44 /* ========================================================================= */
  45 /* video tape definitions                                                    */
  46 /* ========================================================================= */
  47
  48 /* some positions in the video tape control window */
  49 #define VIDEO_DATE_LABEL_XPOS   (VIDEO_DISPLAY1_XPOS)
  50 #define VIDEO_DATE_LABEL_YPOS   (VIDEO_DISPLAY1_YPOS)
  51 #define VIDEO_DATE_LABEL_XSIZE  (VIDEO_DISPLAY_XSIZE)
  52 #define VIDEO_DATE_LABEL_YSIZE  (VIDEO_DISPLAY_YSIZE)
  53 #define VIDEO_DATE_XPOS         (VIDEO_DISPLAY1_XPOS + 2)
  54 #define VIDEO_DATE_YPOS         (VIDEO_DISPLAY1_YPOS + 14)
  55 #define VIDEO_DATE_XSIZE        (VIDEO_DISPLAY_XSIZE)
  56 #define VIDEO_DATE_YSIZE        16
  57 #define VIDEO_REC_LABEL_XPOS    (VIDEO_DISPLAY2_XPOS)
  58 #define VIDEO_REC_LABEL_YPOS    (VIDEO_DISPLAY2_YPOS)
  59 #define VIDEO_REC_LABEL_XSIZE   20
  60 #define VIDEO_REC_LABEL_YSIZE   12
  61 #define VIDEO_REC_SYMBOL_XPOS   (VIDEO_DISPLAY2_XPOS + 20)
  62 #define VIDEO_REC_SYMBOL_YPOS   (VIDEO_DISPLAY2_YPOS)
  63 #define VIDEO_REC_SYMBOL_XSIZE  16
  64 #define VIDEO_REC_SYMBOL_YSIZE  16
  65 #define VIDEO_PLAY_LABEL_XPOS   (VIDEO_DISPLAY2_XPOS + 65)
  66 #define VIDEO_PLAY_LABEL_YPOS   (VIDEO_DISPLAY2_YPOS)
  67 #define VIDEO_PLAY_LABEL_XSIZE  22
  68 #define VIDEO_PLAY_LABEL_YSIZE  12
  69 #define VIDEO_PLAY_SYMBOL_XPOS  (VIDEO_DISPLAY2_XPOS + 52)
  70 #define VIDEO_PLAY_SYMBOL_YPOS  (VIDEO_DISPLAY2_YPOS)
  71 #define VIDEO_PLAY_SYMBOL_XSIZE 11
  72 #define VIDEO_PLAY_SYMBOL_YSIZE 13
  73 #define VIDEO_PAUSE_LABEL_XPOS  (VIDEO_DISPLAY2_XPOS)
  74 #define VIDEO_PAUSE_LABEL_YPOS  (VIDEO_DISPLAY2_YPOS + 20)
  75 #define VIDEO_PAUSE_LABEL_XSIZE 35
  76 #define VIDEO_PAUSE_LABEL_YSIZE 8
  77 #define VIDEO_PAUSE_SYMBOL_XPOS (VIDEO_DISPLAY2_XPOS + 35)
  78 #define VIDEO_PAUSE_SYMBOL_YPOS (VIDEO_DISPLAY2_YPOS)
  79 #define VIDEO_PAUSE_SYMBOL_XSIZE 17
  80 #define VIDEO_PAUSE_SYMBOL_YSIZE 13
  81 #define VIDEO_TIME_XPOS         (VIDEO_DISPLAY2_XPOS + 39)
  82 #define VIDEO_TIME_YPOS         (VIDEO_DISPLAY2_YPOS + 14)
  83 #define VIDEO_TIME_XSIZE        50
  84 #define VIDEO_TIME_YSIZE        16
  85
  86 /* special */
  87 #define VIDEO_PBEND_LABEL_XPOS  5
  88 #define VIDEO_PBEND_LABEL_YPOS  220
  89 #define VIDEO_PBEND_LABEL_XSIZE 35
  90 #define VIDEO_PBEND_LABEL_YSIZE 30
  91
  92 #define VIDEO_STATE_OFF         (VIDEO_STATE_PLAY_OFF   |       \
  93                                  VIDEO_STATE_REC_OFF    |       \
  94                                  VIDEO_STATE_PAUSE_OFF  |       \
  95                                  VIDEO_STATE_FFWD_OFF   |       \
  96                                  VIDEO_STATE_PBEND_OFF  |       \
  97                                  VIDEO_STATE_DATE_OFF   |       \
  98                                  VIDEO_STATE_TIME_OFF)
  99 #define VIDEO_PRESS_OFF         (VIDEO_PRESS_PLAY_OFF   |       \
 100                                  VIDEO_PRESS_REC_OFF    |       \
 101                                  VIDEO_PRESS_PAUSE_OFF  |       \
 102                                  VIDEO_PRESS_STOP_OFF   |       \
 103                                  VIDEO_PRESS_EJECT_OFF)
 104 #define VIDEO_ALL_OFF           (VIDEO_STATE_OFF | VIDEO_PRESS_OFF)
 105
 106 #define VIDEO_STATE_ON          (VIDEO_STATE_PLAY_ON    |       \
 107                                  VIDEO_STATE_REC_ON     |       \
 108                                  VIDEO_STATE_PAUSE_ON   |       \
 109                                  VIDEO_STATE_FFWD_ON    |       \
 110                                  VIDEO_STATE_PBEND_ON   |       \
 111                                  VIDEO_STATE_DATE_ON    |       \
 112                                  VIDEO_STATE_TIME_ON)
 113 #define VIDEO_PRESS_ON          (VIDEO_PRESS_PLAY_ON    |       \
 114                                  VIDEO_PRESS_REC_ON     |       \
 115                                  VIDEO_PRESS_PAUSE_ON   |       \
 116                                  VIDEO_PRESS_STOP_ON    |       \
 117                                  VIDEO_PRESS_EJECT_ON)
 118 #define VIDEO_ALL_ON            (VIDEO_STATE_ON | VIDEO_PRESS_ON)
 119
 120 #define VIDEO_STATE             (VIDEO_STATE_ON | VIDEO_STATE_OFF)
 121 #define VIDEO_PRESS             (VIDEO_PRESS_ON | VIDEO_PRESS_OFF)
 122 #define VIDEO_ALL               (VIDEO_ALL_ON | VIDEO_ALL_OFF)
 123
 124
 125 /* ========================================================================= */
 126 /* video display functions                                                   */
 127 /* ========================================================================= */
 128
 129 void DrawVideoDisplay(unsigned long state, unsigned long value)
 130 {
 131   int i;
 132   int part_label = 0, part_symbol = 1;
 133   int xpos = 0, ypos = 1, xsize = 2, ysize = 3;
 134   static char *monatsname[12] =
 135   {
 136     "JAN", "FEB", "MAR", "APR", "MAY", "JUN",
 137     "JUL", "AUG", "SEP", "OCT", "NOV", "DEC"
 138   };
 139   static int video_pos[5][2][4] =
 140   {
 141     {{ VIDEO_PLAY_LABEL_XPOS, VIDEO_PLAY_LABEL_YPOS,
 142        VIDEO_PLAY_LABEL_XSIZE,VIDEO_PLAY_LABEL_YSIZE },
 143      { VIDEO_PLAY_SYMBOL_XPOS, VIDEO_PLAY_SYMBOL_YPOS,
 144        VIDEO_PLAY_SYMBOL_XSIZE,VIDEO_PLAY_SYMBOL_YSIZE }},
 145
 146     {{ VIDEO_REC_LABEL_XPOS, VIDEO_REC_LABEL_YPOS,
 147        VIDEO_REC_LABEL_XSIZE,VIDEO_REC_LABEL_YSIZE },
 148      { VIDEO_REC_SYMBOL_XPOS, VIDEO_REC_SYMBOL_YPOS,
 149        VIDEO_REC_SYMBOL_XSIZE,VIDEO_REC_SYMBOL_YSIZE }},
 150
 151     {{ VIDEO_PAUSE_LABEL_XPOS, VIDEO_PAUSE_LABEL_YPOS,
 152        VIDEO_PAUSE_LABEL_XSIZE,VIDEO_PAUSE_LABEL_YSIZE },
 153      { VIDEO_PAUSE_SYMBOL_XPOS, VIDEO_PAUSE_SYMBOL_YPOS,
 154        VIDEO_PAUSE_SYMBOL_XSIZE,VIDEO_PAUSE_SYMBOL_YSIZE }},
 155
 156     {{ VIDEO_DATE_LABEL_XPOS, VIDEO_DATE_LABEL_YPOS,
 157        VIDEO_DATE_LABEL_XSIZE,VIDEO_DATE_LABEL_YSIZE },
 158      { VIDEO_DATE_XPOS, VIDEO_DATE_YPOS,
 159        VIDEO_DATE_XSIZE,VIDEO_DATE_YSIZE }},
 160
 161     {{ 0,0,
 162        0,0 },
 163      { VIDEO_TIME_XPOS, VIDEO_TIME_YPOS,
 164        VIDEO_TIME_XSIZE,VIDEO_TIME_YSIZE }}
 165   };
 166
 167   if (state & VIDEO_STATE_PBEND_OFF)
 168   {
 169     int cx = DOOR_GFX_PAGEX3, cy = DOOR_GFX_PAGEY2;
 170
 171     BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 172                cx + VIDEO_REC_LABEL_XPOS,
 173                cy + VIDEO_REC_LABEL_YPOS,
 174                VIDEO_PBEND_LABEL_XSIZE,
 175                VIDEO_PBEND_LABEL_YSIZE,
 176                VX + VIDEO_REC_LABEL_XPOS,
 177                VY + VIDEO_REC_LABEL_YPOS);
 178   }
 179
 180   for (i = 0; i < 10; i++)
 181   {
 182     if (state & (1<<i))
 183     {
 184       int pos = i/2, cx, cy = DOOR_GFX_PAGEY2;
 185
 186       if (i%2)                  /* i ungerade => STATE_ON / PRESS_OFF */
 187         cx = DOOR_GFX_PAGEX4;
 188       else
 189         cx = DOOR_GFX_PAGEX3;   /* i gerade => STATE_OFF / PRESS_ON */
 190
 191       if (video_pos[pos][part_label][0] && value != VIDEO_DISPLAY_SYMBOL_ONLY)
 192         BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 193                    cx + video_pos[pos][part_label][xpos],
 194                    cy + video_pos[pos][part_label][ypos],
 195                    video_pos[pos][part_label][xsize],
 196                    video_pos[pos][part_label][ysize],
 197                    VX + video_pos[pos][part_label][xpos],
 198                    VY + video_pos[pos][part_label][ypos]);
 199       if (video_pos[pos][part_symbol][0] && value != VIDEO_DISPLAY_LABEL_ONLY)
 200         BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 201                    cx + video_pos[pos][part_symbol][xpos],
 202                    cy + video_pos[pos][part_symbol][ypos],
 203                    video_pos[pos][part_symbol][xsize],
 204                    video_pos[pos][part_symbol][ysize],
 205                    VX + video_pos[pos][part_symbol][xpos],
 206                    VY + video_pos[pos][part_symbol][ypos]);
 207     }
 208   }
 209
 210   if (state & VIDEO_STATE_FFWD_ON)
 211   {
 212     int cx = DOOR_GFX_PAGEX4, cy = DOOR_GFX_PAGEY2;
 213
 214     BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 215                cx + VIDEO_PLAY_SYMBOL_XPOS,
 216                cy + VIDEO_PLAY_SYMBOL_YPOS,
 217                VIDEO_PLAY_SYMBOL_XSIZE - 2,
 218                VIDEO_PLAY_SYMBOL_YSIZE,
 219                VX + VIDEO_PLAY_SYMBOL_XPOS - 9,
 220                VY + VIDEO_PLAY_SYMBOL_YPOS);
 221   }
 222
 223   if (state & VIDEO_STATE_PBEND_ON)
 224   {
 225     int cx = DOOR_GFX_PAGEX6, cy = DOOR_GFX_PAGEY1;
 226
 227     BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 228                cx + VIDEO_PBEND_LABEL_XPOS,
 229                cy + VIDEO_PBEND_LABEL_YPOS,
 230                VIDEO_PBEND_LABEL_XSIZE,
 231                VIDEO_PBEND_LABEL_YSIZE,
 232                VX + VIDEO_REC_LABEL_XPOS,
 233                VY + VIDEO_REC_LABEL_YPOS);
 234   }
 235
 236   if (state & VIDEO_STATE_DATE_ON)
 237   {
 238     int tag = value % 100;
 239     int monat = (value/100) % 100;
 240     int jahr = (value/10000);
 241
 242     DrawText(VX + VIDEO_DATE_XPOS, VY + VIDEO_DATE_YPOS,
 243              int2str(tag, 2), FONT_TAPE_RECORDER);
 244     DrawText(VX + VIDEO_DATE_XPOS + 27, VY + VIDEO_DATE_YPOS,
 245              monatsname[monat], FONT_TAPE_RECORDER);
 246     DrawText(VX + VIDEO_DATE_XPOS + 64, VY + VIDEO_DATE_YPOS,
 247              int2str(jahr, 2), FONT_TAPE_RECORDER);
 248   }
 249
 250   if (state & VIDEO_STATE_TIME_ON)
 251   {
 252     int min = value / 60;
 253     int sec = value % 60;
 254
 255     DrawText(VX + VIDEO_TIME_XPOS, VY + VIDEO_TIME_YPOS,
 256              int2str(min, 2), FONT_TAPE_RECORDER);
 257     DrawText(VX + VIDEO_TIME_XPOS + 27, VY + VIDEO_TIME_YPOS,
 258              int2str(sec, 2), FONT_TAPE_RECORDER);
 259   }
 260
 261   if (state & VIDEO_STATE_DATE)
 262     redraw_mask |= REDRAW_VIDEO_1;
 263   if ((state & ~VIDEO_STATE_DATE) & VIDEO_STATE)
 264     redraw_mask |= REDRAW_VIDEO_2;
 265   if (state & VIDEO_PRESS)
 266     redraw_mask |= REDRAW_VIDEO_3;
 267 }
 268
 269 void DrawCompleteVideoDisplay()
 270 {
 271   BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 272              DOOR_GFX_PAGEX3, DOOR_GFX_PAGEY2,
 273              gfx.vxsize, gfx.vysize, gfx.vx, gfx.vy);
 274   BlitBitmap(graphic_info[IMG_GLOBAL_DOOR].bitmap, drawto,
 275              DOOR_GFX_PAGEX4 + VIDEO_CONTROL_XPOS,
 276              DOOR_GFX_PAGEY2 + VIDEO_CONTROL_YPOS,
 277              VIDEO_CONTROL_XSIZE, VIDEO_CONTROL_YSIZE,
 278              gfx.vx + VIDEO_CONTROL_XPOS, gfx.vy + VIDEO_CONTROL_YPOS);
 279
 280   DrawVideoDisplay(VIDEO_ALL_OFF, 0);
 281   if (tape.date && tape.length)
 282   {
 283     DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
 284     DrawVideoDisplay(VIDEO_STATE_TIME_ON, tape.length_seconds);
 285   }
 286
 287   BlitBitmap(drawto, bitmap_db_door, gfx.vx, gfx.vy, gfx.vxsize, gfx.vysize,
 288              DOOR_GFX_PAGEX1, DOOR_GFX_PAGEY2);
 289 }
 290
 291
 292 /* ========================================================================= */
 293 /* tape control functions                                                    */
 294 /* ========================================================================= */
 295
 296 void TapeErase()
 297 {
 298   time_t epoch_seconds = time(NULL);
 299   struct tm *time = localtime(&epoch_seconds);
 300   int i;
 301
 302   tape.length = 0;
 303   tape.counter = 0;
 304
 305   if (leveldir_current)
 306     setString(&tape.level_identifier, leveldir_current->identifier);
 307
 308   tape.level_nr = level_nr;
 309   tape.pos[tape.counter].delay = 0;
 310   tape.changed = TRUE;
 311
 312   tape.date = 10000*(time->tm_year % 100) + 100*time->tm_mon + time->tm_mday;
 313   tape.random_seed = InitRND(NEW_RANDOMIZE);
 314
 315   tape.file_version = FILE_VERSION_ACTUAL;
 316   tape.game_version = GAME_VERSION_ACTUAL;
 317   tape.engine_version = level.game_version;
 318
 319 #if 0
 320   printf("::: tape.engine_version = level.game_version = %d \n",
 321          level.game_version);
 322 #endif
 323
 324   for (i = 0; i < MAX_PLAYERS; i++)
 325     tape.player_participates[i] = FALSE;
 326 }
 327
 328 static void TapeRewind()
 329 {
 330   tape.counter = 0;
 331   tape.delay_played = 0;
 332   tape.pause_before_death = FALSE;
 333   tape.recording = FALSE;
 334   tape.playing = FALSE;
 335   tape.fast_forward = FALSE;
 336   tape.index_search = FALSE;
 337   tape.auto_play = (global.autoplay_leveldir != NULL);
 338   tape.auto_play_level_solved = FALSE;
 339   tape.quick_resume = FALSE;
 340   tape.single_step = FALSE;
 341
 342   InitRND(tape.random_seed);
 343 }
 344
 345 void TapeStartRecording()
 346 {
 347   if (!TAPE_IS_STOPPED(tape))
 348     TapeStop();
 349
 350   TapeErase();
 351   TapeRewind();
 352
 353   tape.recording = TRUE;
 354
 355   DrawVideoDisplay(VIDEO_STATE_REC_ON, 0);
 356   DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
 357   DrawVideoDisplay(VIDEO_STATE_TIME_ON, 0);
 358   MapTapeIndexButton();
 359
 360   SetDrawDeactivationMask(REDRAW_NONE);
 361   audio.sound_deactivated = FALSE;
 362 }
 363
 364 static void TapeStartGameRecording()
 365 {
 366   TapeStartRecording();
 367
 368 #if defined(PLATFORM_UNIX)
 369   if (options.network)
 370     SendToServer_StartPlaying();
 371   else
 372 #endif
 373   {
 374     game_status = GAME_MODE_PLAYING;
 375     StopAnimation();
 376     InitGame();
 377   }
 378 }
 379
 380 static void TapeAppendRecording()
 381 {
 382   if (!tape.playing || !tape.pausing)
 383     return;
 384
 385   tape.pos[tape.counter].delay = tape.delay_played;
 386   tape.playing = FALSE;
 387   tape.recording = TRUE;
 388   tape.changed = TRUE;
 389
 390   DrawVideoDisplay(VIDEO_STATE_PLAY_OFF | VIDEO_STATE_REC_ON,0);
 391 }
 392
 393 void TapeHaltRecording()
 394 {
 395   if (!tape.recording)
 396     return;
 397
 398   tape.counter++;
 399   tape.pos[tape.counter].delay = 0;
 400
 401   tape.length = tape.counter;
 402   tape.length_seconds = GetTapeLength();
 403 }
 404
 405 void TapeStopRecording()
 406 {
 407   if (!tape.recording)
 408     return;
 409
 410   TapeHaltRecording();
 411
 412   tape.recording = FALSE;
 413   tape.pausing = FALSE;
 414
 415   DrawVideoDisplay(VIDEO_STATE_REC_OFF, 0);
 416   MapTapeEjectButton();
 417 }
 418
 419 void TapeRecordAction(byte action[MAX_PLAYERS])
 420 {
 421   int i;
 422
 423 #if 1
 424   if (!tape.recording)          /* record action even when tape is paused! */
 425     return;
 426 #else
 427   if (!tape.recording || tape.pausing)
 428     return;
 429 #endif
 430
 431   if (tape.counter >= MAX_TAPELEN - 1)
 432   {
 433     TapeStopRecording();
 434     return;
 435   }
 436
 437   if (tape.pos[tape.counter].delay > 0)         /* already stored action */
 438   {
 439     boolean changed_events = FALSE;
 440
 441     for (i = 0; i < MAX_PLAYERS; i++)
 442       if (tape.pos[tape.counter].action[i] != action[i])
 443         changed_events = TRUE;
 444
 445     if (changed_events || tape.pos[tape.counter].delay >= 255)
 446     {
 447       tape.counter++;
 448       tape.pos[tape.counter].delay = 0;
 449     }
 450     else
 451       tape.pos[tape.counter].delay++;
 452   }
 453
 454   if (tape.pos[tape.counter].delay == 0)        /* store new action */
 455   {
 456     for (i = 0; i < MAX_PLAYERS; i++)
 457       tape.pos[tape.counter].action[i] = action[i];
 458
 459     tape.pos[tape.counter].delay++;
 460   }
 461 }
 462
 463 void TapeTogglePause(boolean toggle_manual)
 464 {
 465   unsigned long state;
 466
 467 #if 0
 468   if (!tape.recording && !tape.playing)
 469     return;
 470 #endif
 471
 472   tape.pausing = !tape.pausing;
 473   tape.fast_forward = FALSE;
 474   tape.pause_before_death = FALSE;
 475
 476   if (tape.single_step && toggle_manual)
 477     tape.single_step = FALSE;
 478
 479   state = (tape.pausing ? VIDEO_STATE_PAUSE_ON : VIDEO_STATE_PAUSE_OFF);
 480   if (tape.playing)
 481     state |= VIDEO_STATE_PBEND_OFF;
 482
 483   DrawVideoDisplay(state, 0);
 484
 485   if (tape.index_search)
 486   {
 487     TapeStopIndexSearch();
 488
 489     if (tape.quick_resume)
 490     {
 491       tape.quick_resume = FALSE;
 492
 493       TapeAppendRecording();
 494       TapeTogglePause(toggle_manual);
 495     }
 496   }
 497 }
 498
 499 void TapeStartPlaying()
 500 {
 501   if (TAPE_IS_EMPTY(tape))
 502     return;
 503
 504   if (!TAPE_IS_STOPPED(tape))
 505     TapeStop();
 506
 507   TapeRewind();
 508
 509   tape.playing = TRUE;
 510
 511   DrawVideoDisplay(VIDEO_STATE_PLAY_ON, 0);
 512   DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
 513   DrawVideoDisplay(VIDEO_STATE_TIME_ON, 0);
 514   MapTapeIndexButton();
 515
 516   SetDrawDeactivationMask(REDRAW_NONE);
 517   audio.sound_deactivated = FALSE;
 518 }
 519
 520 static void TapeStartGamePlaying()
 521 {
 522   TapeStartPlaying();
 523
 524   game_status = GAME_MODE_PLAYING;
 525   StopAnimation();
 526   InitGame();
 527 }
 528
 529 void TapeStopPlaying()
 530 {
 531   if (!tape.playing)
 532     return;
 533
 534   tape.playing = FALSE;
 535   tape.pausing = FALSE;
 536
 537   if (tape.index_search)
 538     TapeStopIndexSearch();
 539
 540   DrawVideoDisplay(VIDEO_STATE_PLAY_OFF, 0);
 541   MapTapeEjectButton();
 542 }
 543
 544 byte *TapePlayAction()
 545 {
 546   static byte action[MAX_PLAYERS];
 547   int i;
 548
 549   if (!tape.playing || tape.pausing)
 550     return NULL;
 551
 552   if (tape.pause_before_death)  /* STOP 10s BEFORE PLAYER GETS KILLED... */
 553   {
 554     if (!(FrameCounter % 20))
 555     {
 556       if ((FrameCounter / 20) % 2)
 557         DrawVideoDisplay(VIDEO_STATE_PBEND_ON, VIDEO_DISPLAY_LABEL_ONLY);
 558       else
 559         DrawVideoDisplay(VIDEO_STATE_PBEND_OFF, VIDEO_DISPLAY_LABEL_ONLY);
 560     }
 561
 562     if (TimePlayed > tape.length_seconds - TAPE_PAUSE_SECONDS_BEFORE_DEATH)
 563     {
 564       TapeTogglePause(TAPE_TOGGLE_MANUAL);
 565       return NULL;
 566     }
 567   }
 568
 569   if (tape.counter >= tape.length)      /* end of tape reached */
 570   {
 571     if (tape.index_search && !tape.auto_play)
 572       TapeTogglePause(TAPE_TOGGLE_MANUAL);
 573     else
 574       TapeStop();
 575
 576     return NULL;
 577   }
 578
 579   for (i = 0; i < MAX_PLAYERS; i++)
 580     action[i] = tape.pos[tape.counter].action[i];
 581
 582   tape.delay_played++;
 583   if (tape.delay_played >= tape.pos[tape.counter].delay)
 584   {
 585     tape.counter++;
 586     tape.delay_played = 0;
 587   }
 588
 589   return action;
 590 }
 591
 592 void TapeStop()
 593 {
 594   TapeStopRecording();
 595   TapeStopPlaying();
 596
 597   DrawVideoDisplay(VIDEO_STATE_PAUSE_OFF,0);
 598   if (tape.date && tape.length)
 599   {
 600     DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
 601     DrawVideoDisplay(VIDEO_STATE_TIME_ON, tape.length_seconds);
 602   }
 603
 604 #if 0
 605   if (tape.auto_play)
 606     AutoPlayTape();     /* continue automatically playing next tape */
 607 #endif
 608 }
 609
 610 unsigned int GetTapeLength()
 611 {
 612   unsigned int tape_length = 0;
 613   int i;
 614
 615   if (TAPE_IS_EMPTY(tape))
 616     return(0);
 617
 618   for (i = 0; i < tape.length; i++)
 619     tape_length += tape.pos[i].delay;
 620
 621   return(tape_length * GAME_FRAME_DELAY / 1000);
 622 }
 623
 624 static void TapeStartIndexSearch()
 625 {
 626   tape.index_search = TRUE;
 627
 628   if (!tape.fast_forward || tape.pause_before_death)
 629   {
 630     tape.pausing = FALSE;
 631
 632     SetDrawDeactivationMask(REDRAW_FIELD);
 633     audio.sound_deactivated = TRUE;
 634   }
 635 }
 636
 637 static void TapeStopIndexSearch()
 638 {
 639   tape.index_search = FALSE;
 640
 641   SetDrawDeactivationMask(REDRAW_NONE);
 642   audio.sound_deactivated = FALSE;
 643
 644 #if 1
 645   if (game_status == GAME_MODE_PLAYING)
 646 #endif
 647   {
 648     RedrawPlayfield(TRUE, 0,0,0,0);
 649     DrawGameDoorValues();
 650   }
 651 }
 652
 653 static void TapeSingleStep()
 654 {
 655   if (options.network)
 656     return;
 657
 658   if (!tape.pausing)
 659     TapeTogglePause(TAPE_TOGGLE_MANUAL);
 660
 661   tape.single_step = !tape.single_step;
 662 }
 663
 664 void TapeQuickSave()
 665 {
 666   if (game_status == GAME_MODE_PLAYING)
 667   {
 668     if (tape.recording)
 669       TapeHaltRecording();      /* prepare tape for saving on-the-fly */
 670
 671     if (TAPE_IS_EMPTY(tape))
 672       Request("No tape that can be saved !", REQ_CONFIRM);
 673     else
 674       SaveTape(tape.level_nr);
 675   }
 676   else if (game_status == GAME_MODE_MAIN)
 677     Request("No game that can be saved !", REQ_CONFIRM);
 678 }
 679
 680 void TapeQuickLoad()
 681 {
 682   if (game_status == GAME_MODE_PLAYING || game_status == GAME_MODE_MAIN)
 683   {
 684     TapeStop();
 685     TapeErase();
 686
 687     LoadTape(level_nr);
 688     if (!TAPE_IS_EMPTY(tape))
 689     {
 690       TapeStartGamePlaying();
 691       TapeStartIndexSearch();
 692
 693       tape.quick_resume = TRUE;
 694     }
 695     else
 696       Request("No tape for this level !", REQ_CONFIRM);
 697   }
 698 }
 699
 700 void InsertSolutionTape()
 701 {
 702   if (!TAPE_IS_EMPTY(tape))
 703     return;
 704
 705   LoadSolutionTape(level_nr);
 706
 707   if (TAPE_IS_EMPTY(tape))
 708     Request("No solution tape for this level !", REQ_CONFIRM);
 709
 710   DrawCompleteVideoDisplay();
 711 }
 712
 713
 714 /* ------------------------------------------------------------------------- *
 715  * tape autoplay functions
 716  * ------------------------------------------------------------------------- */
 717
 718 #define MAX_NUM_AUTOPLAY_LEVELS         1000
 719
 720 void AutoPlayTape()
 721 {
 722   static LevelDirTree *autoplay_leveldir = NULL;
 723   static boolean autoplay_initialized = FALSE;
 724   static int autoplay_level_nr = -1;
 725   static int num_levels_played = 0;
 726   static int num_levels_solved = 0;
 727   static boolean levels_failed[MAX_NUM_AUTOPLAY_LEVELS];
 728   int i;
 729
 730   if (autoplay_initialized)
 731   {
 732     /* just finished auto-playing tape */
 733     printf("%s.\n", tape.auto_play_level_solved ? "solved" : "NOT SOLVED");
 734
 735     num_levels_played++;
 736     if (tape.auto_play_level_solved)
 737       num_levels_solved++;
 738     else if (level_nr >= 0 && level_nr < MAX_NUM_AUTOPLAY_LEVELS)
 739       levels_failed[level_nr] = TRUE;
 740   }
 741   else
 742   {
 743     DrawCompleteVideoDisplay();
 744     audio.sound_enabled = FALSE;
 745
 746     autoplay_leveldir = getTreeInfoFromIdentifier(leveldir_first,
 747                                                   global.autoplay_leveldir);
 748
 749     if (autoplay_leveldir == NULL)
 750       Error(ERR_EXIT, "no such level identifier: '%s'",
 751             global.autoplay_leveldir);
 752
 753     leveldir_current = autoplay_leveldir;
 754
 755     if (global.autoplay_level_nr != -1)
 756     {
 757       autoplay_leveldir->first_level = global.autoplay_level_nr;
 758       autoplay_leveldir->last_level  = global.autoplay_level_nr;
 759     }
 760
 761     autoplay_level_nr = autoplay_leveldir->first_level;
 762
 763     printf_line("=", 79);
 764     printf("Automatically playing level tapes\n");
 765     printf_line("-", 79);
 766     printf("Level series identifier: '%s'\n", autoplay_leveldir->identifier);
 767     printf("Level series name:       '%s'\n", autoplay_leveldir->name);
 768     printf("Level series author:     '%s'\n", autoplay_leveldir->author);
 769     printf("Number of levels:        %d\n",   autoplay_leveldir->levels);
 770     printf_line("=", 79);
 771     printf("\n");
 772
 773     for (i = 0; i < MAX_NUM_AUTOPLAY_LEVELS; i++)
 774       levels_failed[i] = FALSE;
 775
 776     autoplay_initialized = TRUE;
 777   }
 778
 779   while (autoplay_level_nr <= autoplay_leveldir->last_level)
 780   {
 781     level_nr = autoplay_level_nr++;
 782
 783     TapeErase();
 784
 785     printf("Level %03d: ", level_nr);
 786
 787     LoadLevel(level_nr);
 788     if (level.no_valid_file)
 789     {
 790       printf("(no level)\n");
 791       continue;
 792     }
 793
 794     LoadSolutionTape(level_nr);
 795 #if 1
 796     if (tape.no_valid_file)
 797 #else
 798     if (TAPE_IS_EMPTY(tape))
 799 #endif
 800     {
 801       printf("(no tape)\n");
 802       continue;
 803     }
 804
 805     printf("playing tape ... ");
 806
 807     TapeStartGamePlaying();
 808     TapeStartIndexSearch();
 809
 810     return;
 811   }
 812
 813   printf("\n");
 814   printf_line("=", 79);
 815   printf("Number of levels played: %d\n", num_levels_played);
 816   printf("Number of levels solved: %d (%d%%)\n", num_levels_solved,
 817          (num_levels_played ? num_levels_solved * 100 / num_levels_played :0));
 818   printf_line("-", 79);
 819   printf("Summary (for automatic parsing by scripts):\n");
 820   printf("LEVELDIR '%s', SOLVED %d/%d (%d%%)",
 821          autoplay_leveldir->identifier, num_levels_solved, num_levels_played,
 822          (num_levels_played ? num_levels_solved * 100 / num_levels_played :0));
 823   if (num_levels_played != num_levels_solved)
 824   {
 825     printf(", FAILED:");
 826     for (i = 0; i < MAX_NUM_AUTOPLAY_LEVELS; i++)
 827       if (levels_failed[i])
 828         printf(" %03d", i);
 829   }
 830   printf("\n");
 831   printf_line("=", 79);
 832
 833   CloseAllAndExit(0);
 834 }
 835
 836
 837 /* ---------- new tape button stuff ---------------------------------------- */
 838
 839 /* graphic position values for tape buttons */
 840 #define TAPE_BUTTON_XSIZE       18
 841 #define TAPE_BUTTON_YSIZE       18
 842 #define TAPE_BUTTON_XPOS        5
 843 #define TAPE_BUTTON_YPOS        77
 844
 845 #define TAPE_BUTTON_EJECT_XPOS  (TAPE_BUTTON_XPOS + 0 * TAPE_BUTTON_XSIZE)
 846 #define TAPE_BUTTON_INDEX_XPOS  (TAPE_BUTTON_XPOS + 0 * TAPE_BUTTON_XSIZE)
 847 #define TAPE_BUTTON_STOP_XPOS   (TAPE_BUTTON_XPOS + 1 * TAPE_BUTTON_XSIZE)
 848 #define TAPE_BUTTON_PAUSE_XPOS  (TAPE_BUTTON_XPOS + 2 * TAPE_BUTTON_XSIZE)
 849 #define TAPE_BUTTON_RECORD_XPOS (TAPE_BUTTON_XPOS + 3 * TAPE_BUTTON_XSIZE)
 850 #define TAPE_BUTTON_PLAY_XPOS   (TAPE_BUTTON_XPOS + 4 * TAPE_BUTTON_XSIZE)
 851
 852 static struct
 853 {
 854   int x, y;
 855   int gadget_id;
 856   char *infotext;
 857 } tapebutton_info[NUM_TAPE_BUTTONS] =
 858 {
 859   {
 860     TAPE_BUTTON_EJECT_XPOS,     TAPE_BUTTON_YPOS,
 861     TAPE_CTRL_ID_EJECT,
 862     "eject tape"
 863   },
 864   {
 865     TAPE_BUTTON_INDEX_XPOS,     TAPE_BUTTON_YPOS,
 866     TAPE_CTRL_ID_INDEX,
 867     "index mark"
 868   },
 869   {
 870     TAPE_BUTTON_STOP_XPOS,      TAPE_BUTTON_YPOS,
 871     TAPE_CTRL_ID_STOP,
 872     "stop tape"
 873   },
 874   {
 875     TAPE_BUTTON_PAUSE_XPOS,     TAPE_BUTTON_YPOS,
 876     TAPE_CTRL_ID_PAUSE,
 877     "pause tape"
 878   },
 879   {
 880     TAPE_BUTTON_RECORD_XPOS,    TAPE_BUTTON_YPOS,
 881     TAPE_CTRL_ID_RECORD,
 882     "record tape"
 883   },
 884   {
 885     TAPE_BUTTON_PLAY_XPOS,      TAPE_BUTTON_YPOS,
 886     TAPE_CTRL_ID_PLAY,
 887     "play tape"
 888   }
 889 };
 890
 891 void CreateTapeButtons()
 892 {
 893   int i;
 894
 895   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
 896   {
 897     Bitmap *gd_bitmap = graphic_info[IMG_GLOBAL_DOOR].bitmap;
 898     struct GadgetInfo *gi;
 899     int gd_xoffset, gd_yoffset;
 900     int gd_x1, gd_x2, gd_y;
 901     int id = i;
 902
 903     gd_xoffset = tapebutton_info[i].x;
 904     gd_yoffset = tapebutton_info[i].y;
 905     gd_x1 = DOOR_GFX_PAGEX4 + gd_xoffset;
 906     gd_x2 = DOOR_GFX_PAGEX3 + gd_xoffset;
 907     gd_y  = DOOR_GFX_PAGEY2 + gd_yoffset;
 908
 909     if (i == TAPE_CTRL_ID_INDEX)
 910     {
 911       gd_x1 = DOOR_GFX_PAGEX6 + gd_xoffset;
 912       gd_x2 = DOOR_GFX_PAGEX5 + gd_xoffset;
 913     }
 914
 915     gi = CreateGadget(GDI_CUSTOM_ID, id,
 916                       GDI_INFO_TEXT, tapebutton_info[i].infotext,
 917                       GDI_X, VX + gd_xoffset,
 918                       GDI_Y, VY + gd_yoffset,
 919                       GDI_WIDTH, TAPE_BUTTON_XSIZE,
 920                       GDI_HEIGHT, TAPE_BUTTON_YSIZE,
 921                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
 922                       GDI_STATE, GD_BUTTON_UNPRESSED,
 923                       GDI_DESIGN_UNPRESSED, gd_bitmap, gd_x1, gd_y,
 924                       GDI_DESIGN_PRESSED, gd_bitmap, gd_x2, gd_y,
 925                       GDI_EVENT_MASK, GD_EVENT_RELEASED,
 926                       GDI_CALLBACK_ACTION, HandleTapeButtons,
 927                       GDI_END);
 928
 929     if (gi == NULL)
 930       Error(ERR_EXIT, "cannot create gadget");
 931
 932     tape_gadget[id] = gi;
 933   }
 934 }
 935
 936 void FreeTapeButtons()
 937 {
 938   int i;
 939
 940   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
 941     FreeGadget(tape_gadget[i]);
 942 }
 943
 944 void MapTapeEjectButton()
 945 {
 946   UnmapGadget(tape_gadget[TAPE_CTRL_ID_INDEX]);
 947   MapGadget(tape_gadget[TAPE_CTRL_ID_EJECT]);
 948 }
 949
 950 void MapTapeIndexButton()
 951 {
 952   UnmapGadget(tape_gadget[TAPE_CTRL_ID_EJECT]);
 953   MapGadget(tape_gadget[TAPE_CTRL_ID_INDEX]);
 954 }
 955
 956 void MapTapeButtons()
 957 {
 958   int i;
 959
 960   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
 961     if (i != TAPE_CTRL_ID_INDEX)
 962       MapGadget(tape_gadget[i]);
 963
 964   if (tape.recording || tape.playing)
 965     MapTapeIndexButton();
 966 }
 967
 968 void UnmapTapeButtons()
 969 {
 970   int i;
 971
 972   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
 973     UnmapGadget(tape_gadget[i]);
 974 }
 975
 976 static void HandleTapeButtons(struct GadgetInfo *gi)
 977 {
 978   int id = gi->custom_id;
 979
 980   if (game_status != GAME_MODE_MAIN && game_status != GAME_MODE_PLAYING)
 981     return;
 982
 983   switch (id)
 984   {
 985     case TAPE_CTRL_ID_EJECT:
 986       TapeStop();
 987       if (TAPE_IS_EMPTY(tape))
 988       {
 989         LoadTape(level_nr);
 990         if (TAPE_IS_EMPTY(tape))
 991           Request("No tape for this level !", REQ_CONFIRM);
 992       }
 993       else
 994       {
 995         if (tape.changed)
 996           SaveTape(tape.level_nr);
 997         TapeErase();
 998       }
 999       DrawCompleteVideoDisplay();
1000       break;
1001
1002     case TAPE_CTRL_ID_INDEX:
1003       if (tape.playing)
1004         TapeStartIndexSearch();
1005       else if (tape.recording)
1006         TapeSingleStep();
1007       break;
1008
1009     case TAPE_CTRL_ID_STOP:
1010       TapeStop();
1011       break;
1012
1013     case TAPE_CTRL_ID_PAUSE:
1014       TapeTogglePause(TAPE_TOGGLE_MANUAL);
1015       break;
1016
1017     case TAPE_CTRL_ID_RECORD:
1018       if (TAPE_IS_STOPPED(tape))
1019         TapeStartGameRecording();
1020       else if (tape.pausing)
1021       {
1022         if (tape.playing)       /* PLAYING -> PAUSING -> RECORDING */
1023           TapeAppendRecording();
1024         else
1025           TapeTogglePause(TAPE_TOGGLE_MANUAL);
1026       }
1027       break;
1028
1029     case TAPE_CTRL_ID_PLAY:
1030       if (TAPE_IS_EMPTY(tape))
1031         break;
1032
1033       if (TAPE_IS_STOPPED(tape))
1034       {
1035         TapeStartGamePlaying();
1036       }
1037       else if (tape.playing)
1038       {
1039         if (tape.pausing)                       /* PAUSE -> PLAY */
1040         {
1041           TapeTogglePause(TAPE_TOGGLE_MANUAL);
1042         }
1043         else if (!tape.fast_forward)            /* PLAY -> FAST FORWARD PLAY */
1044         {
1045           tape.fast_forward = TRUE;
1046           DrawVideoDisplay(VIDEO_STATE_FFWD_ON, 0);
1047         }
1048         else if (!tape.pause_before_death)      /* FFWD PLAY -> AUTO PAUSE */
1049         {
1050           tape.pause_before_death = TRUE;
1051           DrawVideoDisplay(VIDEO_STATE_PBEND_ON, VIDEO_DISPLAY_LABEL_ONLY);
1052         }
1053         else                                    /* AUTO PAUSE -> NORMAL PLAY */
1054         {
1055           tape.fast_forward = FALSE;
1056           tape.pause_before_death = FALSE;
1057           DrawVideoDisplay(VIDEO_STATE_FFWD_OFF | VIDEO_STATE_PBEND_OFF, 0);
1058         }
1059       }
1060       break;
1061
1062     default:
1063       break;
1064   }
1065 }