changed tape recorder logic to separate speed and 'pause before end'
[rocksndiamonds.git] / src / tape.c
1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
5 //                  Holger Schemel
6 //                  info@artsoft.org
7 //                  http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
9 // tape.c
10 // ============================================================================
11
12 #include "libgame/libgame.h"
13
14 #include "tape.h"
15 #include "init.h"
16 #include "game.h"
17 #include "tools.h"
18 #include "files.h"
19 #include "network.h"
20 #include "anim.h"
21
22 #define DEBUG_TAPE_WHEN_PLAYING                 FALSE
23
24 /* tape button identifiers */
25 #define TAPE_CTRL_ID_EJECT                      0
26 #define TAPE_CTRL_ID_EXTRA                      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 TapeStopWarpForward();
40
41 static struct GadgetInfo *tape_gadget[NUM_TAPE_BUTTONS];
42
43
44 /* ========================================================================= */
45 /* video tape definitions                                                    */
46 /* ========================================================================= */
47
48 #define VIDEO_INFO_OFF                  (VIDEO_STATE_DATE_OFF   |       \
49                                          VIDEO_STATE_TIME_OFF   |       \
50                                          VIDEO_STATE_FRAME_OFF)
51 #define VIDEO_STATE_OFF                 (VIDEO_STATE_PLAY_OFF   |       \
52                                          VIDEO_STATE_REC_OFF    |       \
53                                          VIDEO_STATE_PAUSE_OFF  |       \
54                                          VIDEO_STATE_FFWD_OFF   |       \
55                                          VIDEO_STATE_WARP_OFF   |       \
56                                          VIDEO_STATE_WARP2_OFF  |       \
57                                          VIDEO_STATE_PBEND_OFF  |       \
58                                          VIDEO_STATE_1STEP_OFF)
59 #define VIDEO_PRESS_OFF                 (VIDEO_PRESS_PLAY_OFF   |       \
60                                          VIDEO_PRESS_REC_OFF    |       \
61                                          VIDEO_PRESS_PAUSE_OFF  |       \
62                                          VIDEO_PRESS_STOP_OFF   |       \
63                                          VIDEO_PRESS_EJECT_OFF)
64 #define VIDEO_ALL_OFF                   (VIDEO_INFO_OFF         |       \
65                                          VIDEO_STATE_OFF        |       \
66                                          VIDEO_PRESS_OFF)
67
68 #define VIDEO_INFO_ON                   (VIDEO_STATE_DATE_ON    |       \
69                                          VIDEO_STATE_TIME_ON    |       \
70                                          VIDEO_STATE_FRAME_ON)
71 #define VIDEO_STATE_ON                  (VIDEO_STATE_PLAY_ON    |       \
72                                          VIDEO_STATE_REC_ON     |       \
73                                          VIDEO_STATE_PAUSE_ON   |       \
74                                          VIDEO_STATE_FFWD_ON    |       \
75                                          VIDEO_STATE_WARP_ON    |       \
76                                          VIDEO_STATE_WARP2_ON   |       \
77                                          VIDEO_STATE_PBEND_ON   |       \
78                                          VIDEO_STATE_1STEP_ON)
79 #define VIDEO_PRESS_ON                  (VIDEO_PRESS_PLAY_ON    |       \
80                                          VIDEO_PRESS_REC_ON     |       \
81                                          VIDEO_PRESS_PAUSE_ON   |       \
82                                          VIDEO_PRESS_STOP_ON    |       \
83                                          VIDEO_PRESS_EJECT_ON)
84 #define VIDEO_ALL_ON                    (VIDEO_INFO_ON          |       \
85                                          VIDEO_STATE_ON         |       \
86                                          VIDEO_PRESS_ON)
87
88 #define VIDEO_INFO                      (VIDEO_INFO_ON | VIDEO_INFO_OFF)
89 #define VIDEO_STATE                     (VIDEO_STATE_ON | VIDEO_STATE_OFF)
90 #define VIDEO_PRESS                     (VIDEO_PRESS_ON | VIDEO_PRESS_OFF)
91 #define VIDEO_ALL                       (VIDEO_ALL_ON | VIDEO_ALL_OFF)
92
93 #define NUM_TAPE_FUNCTIONS              11
94 #define NUM_TAPE_FUNCTION_PARTS         2
95 #define NUM_TAPE_FUNCTION_STATES        2
96
97
98 /* ========================================================================= */
99 /* video display functions                                                   */
100 /* ========================================================================= */
101
102 static void DrawVideoDisplay_Graphics(unsigned int state, unsigned int value)
103 {
104   int i, j, k;
105
106   static struct
107   {
108     int graphic;
109     struct XY *pos;
110   }
111   video_pos[NUM_TAPE_FUNCTIONS][NUM_TAPE_FUNCTION_PARTS] =
112   {
113     {
114       { IMG_GFX_TAPE_LABEL_PLAY,                &tape.label.play        },
115       { IMG_GFX_TAPE_SYMBOL_PLAY,               &tape.symbol.play       },
116     },
117     {
118       { IMG_GFX_TAPE_LABEL_RECORD,              &tape.label.record      },
119       { IMG_GFX_TAPE_SYMBOL_RECORD,             &tape.symbol.record     },
120     },
121     {
122       { IMG_GFX_TAPE_LABEL_PAUSE,               &tape.label.pause       },
123       { IMG_GFX_TAPE_SYMBOL_PAUSE,              &tape.symbol.pause      },
124     },
125     {
126       { IMG_GFX_TAPE_LABEL_DATE,                &tape.label.date        },
127       { -1,                                     NULL                    },
128     },
129     {
130       { IMG_GFX_TAPE_LABEL_TIME,                &tape.label.time        },
131       { -1,                                     NULL                    },
132     },
133     {
134       /* (no label for displaying optional frame) */
135       { -1,                                     NULL                    },
136       { -1,                                     NULL                    },
137     },
138     {
139       { IMG_GFX_TAPE_LABEL_FAST_FORWARD,        &tape.label.fast_forward  },
140       { IMG_GFX_TAPE_SYMBOL_FAST_FORWARD,       &tape.symbol.fast_forward },
141     },
142     {
143       { IMG_GFX_TAPE_LABEL_WARP_FORWARD,        &tape.label.warp_forward  },
144       { IMG_GFX_TAPE_SYMBOL_WARP_FORWARD,       &tape.symbol.warp_forward },
145     },
146     {
147       { IMG_GFX_TAPE_LABEL_WARP_FORWARD_BLIND,  &tape.label.warp_forward_blind},
148       { IMG_GFX_TAPE_SYMBOL_WARP_FORWARD_BLIND, &tape.symbol.warp_forward_blind},
149     },
150     {
151       { IMG_GFX_TAPE_LABEL_PAUSE_BEFORE_END,    &tape.label.pause_before_end  },
152       { IMG_GFX_TAPE_SYMBOL_PAUSE_BEFORE_END,   &tape.symbol.pause_before_end },
153     },
154     {
155       { IMG_GFX_TAPE_LABEL_SINGLE_STEP,         &tape.label.single_step  },
156       { IMG_GFX_TAPE_SYMBOL_SINGLE_STEP,        &tape.symbol.single_step },
157     },
158   };
159
160   for (k = 0; k < NUM_TAPE_FUNCTION_STATES; k++)        /* on or off states */
161   {
162     for (i = 0; i < NUM_TAPE_FUNCTIONS; i++)            /* record, play, ... */
163     {
164       for (j = 0; j < NUM_TAPE_FUNCTION_PARTS; j++)     /* label or symbol */
165       {
166         int graphic = video_pos[i][j].graphic;
167         struct XY *pos = video_pos[i][j].pos;
168
169         if (graphic == -1 ||
170             pos->x == -1 ||
171             pos->y == -1)
172           continue;
173
174         if (state & (1 << (i * 2 + k)))
175         {
176           struct GraphicInfo *gfx_bg = &graphic_info[IMG_BACKGROUND_TAPE];
177           struct GraphicInfo *gfx = &graphic_info[graphic];
178           Bitmap *gd_bitmap;
179           int gd_x, gd_y;
180           int skip_value =
181             (j == 0 ? VIDEO_DISPLAY_SYMBOL_ONLY : VIDEO_DISPLAY_LABEL_ONLY);
182
183           if (value == skip_value)
184             continue;
185
186           if (k == 1)           /* on */
187           {
188             gd_bitmap = gfx->bitmap;
189             gd_x = gfx->src_x;
190             gd_y = gfx->src_y;
191           }
192           else                  /* off */
193           {
194             gd_bitmap = gfx_bg->bitmap;
195             gd_x = gfx_bg->src_x + pos->x;
196             gd_y = gfx_bg->src_y + pos->y;
197           }
198
199           /* some tape graphics may be undefined -- only draw if defined */
200           if (gd_bitmap != NULL)
201             BlitBitmap(gd_bitmap, drawto, gd_x, gd_y, gfx->width, gfx->height,
202                        VX + pos->x, VY + pos->y);
203
204           redraw_mask |= REDRAW_DOOR_2;
205         }
206       }
207     }
208   }
209 }
210
211
212 #define DATETIME_NONE                   (0)
213
214 #define DATETIME_DATE_YYYY              (1 << 0)
215 #define DATETIME_DATE_YY                (1 << 1)
216 #define DATETIME_DATE_MON               (1 << 2)
217 #define DATETIME_DATE_MM                (1 << 3)
218 #define DATETIME_DATE_DD                (1 << 4)
219
220 #define DATETIME_TIME_HH                (1 << 5)
221 #define DATETIME_TIME_MIN               (1 << 6)
222 #define DATETIME_TIME_MM                (1 << 7)
223 #define DATETIME_TIME_SS                (1 << 8)
224
225 #define DATETIME_FRAME                  (1 << 9)
226
227 #define DATETIME_XOFFSET_1              (1 << 10)
228 #define DATETIME_XOFFSET_2              (1 << 11)
229
230 #define DATETIME_DATE                   (DATETIME_DATE_YYYY     |       \
231                                          DATETIME_DATE_YY       |       \
232                                          DATETIME_DATE_MON      |       \
233                                          DATETIME_DATE_MM       |       \
234                                          DATETIME_DATE_DD)
235
236 #define DATETIME_TIME                   (DATETIME_TIME_HH       |       \
237                                          DATETIME_TIME_MIN      |       \
238                                          DATETIME_TIME_MM       |       \
239                                          DATETIME_TIME_SS)
240
241 #define MAX_DATETIME_STRING_SIZE        32
242
243 static void DrawVideoDisplay_DateTime(unsigned int state, unsigned int value)
244 {
245   int i;
246
247   static char *month_shortnames[] =
248   {
249     "JAN",
250     "FEB",
251     "MAR",
252     "APR",
253     "MAY",
254     "JUN",
255     "JUL",
256     "AUG",
257     "SEP",
258     "OCT",
259     "NOV",
260     "DEC"
261   };
262
263   static struct
264   {
265     struct TextPosInfo *pos;
266     int type;
267   }
268   datetime_info[] =
269   {
270     { &tape.text.date,          DATETIME_DATE_DD                        },
271     { &tape.text.date,          DATETIME_DATE_MON | DATETIME_XOFFSET_1  },
272     { &tape.text.date,          DATETIME_DATE_YY  | DATETIME_XOFFSET_2  },
273     { &tape.text.date_yyyy,     DATETIME_DATE_YYYY                      },
274     { &tape.text.date_yy,       DATETIME_DATE_YY                        },
275     { &tape.text.date_mon,      DATETIME_DATE_MON                       },
276     { &tape.text.date_mm,       DATETIME_DATE_MM                        },
277     { &tape.text.date_dd,       DATETIME_DATE_DD                        },
278
279     { &tape.text.time,          DATETIME_TIME_MIN                       },
280     { &tape.text.time,          DATETIME_TIME_SS  | DATETIME_XOFFSET_1  },
281     { &tape.text.time_hh,       DATETIME_TIME_HH                        },
282     { &tape.text.time_mm,       DATETIME_TIME_MM                        },
283     { &tape.text.time_ss,       DATETIME_TIME_SS                        },
284
285     { &tape.text.frame,         DATETIME_FRAME                          },
286
287     { NULL,                     DATETIME_NONE                           },
288   };
289
290   for (i = 0; datetime_info[i].pos != NULL; i++)
291   {
292     struct TextPosInfo *pos = datetime_info[i].pos;
293     int type = datetime_info[i].type;
294     int xpos, ypos;
295
296     if (pos->x == -1 &&
297         pos->y == -1)
298       continue;
299
300     xpos = VX + pos->x + (type & DATETIME_XOFFSET_1 ? pos->xoffset  :
301                           type & DATETIME_XOFFSET_2 ? pos->xoffset2 : 0);
302     ypos = VY + pos->y;
303
304     if ((type & DATETIME_DATE) && (state & VIDEO_STATE_DATE_ON))
305     {
306       char s[MAX_DATETIME_STRING_SIZE];
307       int year2 = value / 10000;
308       int year4 = (year2 < 70 ? 2000 + year2 : 1900 + year2);
309       int month_index = (value / 100) % 100;
310       int month = month_index + 1;
311       int day = value % 100;
312
313       strcpy(s, (type & DATETIME_DATE_YYYY ? int2str(year4, 4) :
314                  type & DATETIME_DATE_YY   ? int2str(year2, 2) :
315                  type & DATETIME_DATE_MON  ? month_shortnames[month_index] :
316                  type & DATETIME_DATE_MM   ? int2str(month, 2) :
317                  type & DATETIME_DATE_DD   ? int2str(day, 2) : ""));
318
319       DrawText(xpos, ypos, s, pos->font);
320     }
321     else if ((type & DATETIME_TIME) && (state & VIDEO_STATE_TIME_ON))
322     {
323       char s[MAX_DATETIME_STRING_SIZE];
324       int hh = (value / 3600) % 100;
325       int min = value / 60;
326       int mm = (value / 60) % 60;
327       int ss = value % 60;
328
329       strcpy(s, (type & DATETIME_TIME_HH  ? int2str(hh, 2) :
330                  type & DATETIME_TIME_MIN ? int2str(min, 2) :
331                  type & DATETIME_TIME_MM  ? int2str(mm, 2) :
332                  type & DATETIME_TIME_SS  ? int2str(ss, 2) : ""));
333
334       DrawText(xpos, ypos, s, pos->font);
335     }
336     else if ((type & DATETIME_FRAME) && (state & VIDEO_STATE_FRAME_ON))
337     {
338       DrawText(xpos, ypos, int2str(value, pos->size), pos->font);
339     }
340   }
341 }
342
343 void DrawVideoDisplay(unsigned int state, unsigned int value)
344 {
345   DrawVideoDisplay_Graphics(state, value);
346   DrawVideoDisplay_DateTime(state, value);
347 }
348
349 void DrawVideoDisplayLabel(unsigned int state)
350 {
351   DrawVideoDisplay(state, VIDEO_DISPLAY_LABEL_ONLY);
352 }
353
354 void DrawVideoDisplaySymbol(unsigned int state)
355 {
356   DrawVideoDisplay(state, VIDEO_DISPLAY_SYMBOL_ONLY);
357 }
358
359 void DrawVideoDisplayPlayState()
360 {
361   int state = 0;
362
363   DrawVideoDisplay(VIDEO_STATE_OFF, 0);
364
365   state |= VIDEO_STATE_PLAY_ON;
366
367   if (tape.pausing)
368   {
369     state |= VIDEO_STATE_PAUSE_ON;
370   }
371   else
372   {
373     if (tape.deactivate_display)
374       state |= VIDEO_STATE_WARP2_ON;
375     else if (tape.warp_forward)
376       state |= VIDEO_STATE_WARP_ON;
377     else if (tape.fast_forward)
378       state |= VIDEO_STATE_FFWD_ON;
379
380     if (tape.pause_before_end)
381       state |= VIDEO_STATE_PBEND_ON;
382   }
383
384   // draw labels and symbols separately to prevent labels overlapping symbols
385   DrawVideoDisplayLabel(state);
386   DrawVideoDisplaySymbol(state);
387 }
388
389 void DrawCompleteVideoDisplay()
390 {
391   struct GraphicInfo *g_tape = &graphic_info[IMG_BACKGROUND_TAPE];
392
393   /* draw tape background */
394   BlitBitmap(g_tape->bitmap, drawto, g_tape->src_x, g_tape->src_y,
395              gfx.vxsize, gfx.vysize, gfx.vx, gfx.vy);
396
397   /* draw tape buttons (forced) */
398   UnmapTapeButtons();
399   MapTapeButtons();
400
401   DrawVideoDisplay(VIDEO_ALL_OFF, 0);
402
403   if (tape.recording)
404   {
405     DrawVideoDisplay(VIDEO_STATE_REC_ON, 0);
406     DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
407     DrawVideoDisplay(VIDEO_STATE_TIME_ON, tape.length_seconds);
408     DrawVideoDisplay(VIDEO_STATE_FRAME_ON, tape.length_frames);
409
410     if (tape.pausing)
411       DrawVideoDisplay(VIDEO_STATE_PAUSE_ON, 0);
412   }
413   else if (tape.playing)
414   {
415     DrawVideoDisplay(VIDEO_STATE_PLAY_ON, 0);
416     DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
417     DrawVideoDisplay(VIDEO_STATE_TIME_ON, 0);
418     DrawVideoDisplay(VIDEO_STATE_FRAME_ON, 0);
419
420     if (tape.pausing)
421       DrawVideoDisplay(VIDEO_STATE_PAUSE_ON, 0);
422   }
423   else if (tape.date && tape.length)
424   {
425     DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
426     DrawVideoDisplay(VIDEO_STATE_TIME_ON, tape.length_seconds);
427     DrawVideoDisplay(VIDEO_STATE_FRAME_ON, tape.length_frames);
428   }
429
430   BlitBitmap(drawto, bitmap_db_door_2, gfx.vx, gfx.vy, gfx.vxsize, gfx.vysize,
431              0, 0);
432 }
433
434 void TapeDeactivateDisplayOn()
435 {
436   SetDrawDeactivationMask(REDRAW_FIELD);
437   audio.sound_deactivated = TRUE;
438 }
439
440 void TapeDeactivateDisplayOff(boolean redraw_display)
441 {
442   SetDrawDeactivationMask(REDRAW_NONE);
443   audio.sound_deactivated = FALSE;
444
445   if (redraw_display)
446   {
447     RedrawPlayfield();
448     DrawGameDoorValues();
449   }
450 }
451
452
453 /* ========================================================================= */
454 /* tape control functions                                                    */
455 /* ========================================================================= */
456
457 void TapeSetDateFromEpochSeconds(time_t epoch_seconds)
458 {
459   struct tm *lt = localtime(&epoch_seconds);
460
461   tape.date = 10000 * (lt->tm_year % 100) + 100 * lt->tm_mon + lt->tm_mday;
462 }
463
464 void TapeSetDateFromNow()
465 {
466   TapeSetDateFromEpochSeconds(time(NULL));
467 }
468
469 void TapeErase()
470 {
471   int i;
472
473   tape.counter = 0;
474   tape.length = 0;
475   tape.length_frames = 0;
476   tape.length_seconds = 0;
477
478   if (leveldir_current)
479     setString(&tape.level_identifier, leveldir_current->identifier);
480
481   tape.level_nr = level_nr;
482   tape.pos[tape.counter].delay = 0;
483   tape.changed = TRUE;
484
485   tape.random_seed = InitRND(level.random_seed);
486
487   tape.file_version = FILE_VERSION_ACTUAL;
488   tape.game_version = GAME_VERSION_ACTUAL;
489   tape.engine_version = level.game_version;
490
491   TapeSetDateFromNow();
492
493   for (i = 0; i < MAX_PLAYERS; i++)
494     tape.player_participates[i] = FALSE;
495
496   tape.centered_player_nr_next = -1;
497   tape.set_centered_player = FALSE;
498 }
499
500 static void TapeRewind()
501 {
502   tape.counter = 0;
503   tape.delay_played = 0;
504   tape.pause_before_end = FALSE;
505   tape.recording = FALSE;
506   tape.playing = FALSE;
507   tape.fast_forward = FALSE;
508   tape.warp_forward = FALSE;
509   tape.deactivate_display = FALSE;
510   tape.auto_play = (global.autoplay_leveldir != NULL);
511   tape.auto_play_level_solved = FALSE;
512   tape.quick_resume = FALSE;
513   tape.single_step = FALSE;
514
515   tape.centered_player_nr_next = -1;
516   tape.set_centered_player = FALSE;
517
518   InitRND(tape.random_seed);
519 }
520
521 static void TapeSetRandomSeed(int random_seed)
522 {
523   tape.random_seed = InitRND(random_seed);
524 }
525
526 void TapeStartRecording(int random_seed)
527 {
528   if (!TAPE_IS_STOPPED(tape))
529     TapeStop();
530
531   TapeErase();
532   TapeRewind();
533   TapeSetRandomSeed(random_seed);
534
535   tape.recording = TRUE;
536
537   DrawVideoDisplay(VIDEO_STATE_REC_ON, 0);
538   DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
539   DrawVideoDisplay(VIDEO_STATE_TIME_ON, 0);
540   DrawVideoDisplay(VIDEO_STATE_FRAME_ON, 0);
541
542   MapTapeWarpButton();
543
544   SetDrawDeactivationMask(REDRAW_NONE);
545   audio.sound_deactivated = FALSE;
546 }
547
548 static void TapeStartGameRecording()
549 {
550   TapeStartRecording(level.random_seed);
551
552 #if defined(NETWORK_AVALIABLE)
553   if (options.network)
554   {
555     SendToServer_StartPlaying();
556
557     return;
558   }
559 #endif
560
561   InitGame();
562 }
563
564 static void TapeAppendRecording()
565 {
566   if (!tape.playing || !tape.pausing)
567     return;
568
569   // stop playing
570   tape.playing = FALSE;
571   tape.fast_forward = FALSE;
572   tape.warp_forward = FALSE;
573   tape.pause_before_end = FALSE;
574   tape.deactivate_display = FALSE;
575
576   // start recording
577   tape.recording = TRUE;
578   tape.changed = TRUE;
579
580   // set current delay (for last played move)
581   tape.pos[tape.counter].delay = tape.delay_played;
582
583   // set current date
584   TapeSetDateFromNow();
585
586   DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
587   DrawVideoDisplay(VIDEO_STATE_PLAY_OFF | VIDEO_STATE_REC_ON, 0);
588
589   UpdateAndDisplayGameControlValues();
590 }
591
592 void TapeHaltRecording()
593 {
594   if (!tape.recording)
595     return;
596
597   tape.counter++;
598   tape.pos[tape.counter].delay = 0;
599
600   tape.length = tape.counter;
601   tape.length_frames = GetTapeLengthFrames();
602   tape.length_seconds = GetTapeLengthSeconds();
603 }
604
605 void TapeStopRecording()
606 {
607   TapeHaltRecording();
608
609   tape.recording = FALSE;
610   tape.pausing = FALSE;
611
612   DrawVideoDisplay(VIDEO_STATE_REC_OFF, 0);
613   MapTapeEjectButton();
614 }
615
616 void TapeRecordAction(byte action_raw[MAX_PLAYERS])
617 {
618   byte action[MAX_PLAYERS];
619   int i;
620
621   if (!tape.recording)          /* (record action even when tape is paused) */
622     return;
623
624   if (tape.counter >= MAX_TAPE_LEN - 1)
625   {
626     TapeStopRecording();
627     return;
628   }
629
630   for (i = 0; i < MAX_PLAYERS; i++)
631     action[i] = action_raw[i];
632
633   if (tape.set_centered_player)
634   {
635     for (i = 0; i < MAX_PLAYERS; i++)
636       if (tape.centered_player_nr_next == i ||
637           tape.centered_player_nr_next == -1)
638         action[i] |= KEY_SET_FOCUS;
639
640     tape.set_centered_player = FALSE;
641   }
642
643   if (tape.pos[tape.counter].delay > 0)         /* already stored action */
644   {
645     boolean changed_events = FALSE;
646
647     for (i = 0; i < MAX_PLAYERS; i++)
648       if (tape.pos[tape.counter].action[i] != action[i])
649         changed_events = TRUE;
650
651     if (changed_events || tape.pos[tape.counter].delay >= 255)
652     {
653       tape.counter++;
654       tape.pos[tape.counter].delay = 0;
655     }
656     else
657       tape.pos[tape.counter].delay++;
658   }
659
660   if (tape.pos[tape.counter].delay == 0)        /* store new action */
661   {
662     for (i = 0; i < MAX_PLAYERS; i++)
663       tape.pos[tape.counter].action[i] = action[i];
664
665     tape.pos[tape.counter].delay++;
666   }
667 }
668
669 void TapeTogglePause(boolean toggle_manual)
670 {
671   tape.pausing = !tape.pausing;
672
673   if (tape.single_step && toggle_manual)
674     tape.single_step = FALSE;
675
676   DrawVideoDisplayPlayState();
677
678   if (tape.deactivate_display)
679   {
680     if (tape.pausing)
681       TapeDeactivateDisplayOff(game_status == GAME_MODE_PLAYING);
682     else
683       TapeDeactivateDisplayOn();
684   }
685
686   if (tape.quick_resume)
687   {
688     tape.quick_resume = FALSE;
689
690     TapeStopWarpForward();
691     TapeAppendRecording();
692
693     if (!CheckEngineSnapshotSingle())
694       SaveEngineSnapshotSingle();
695
696     // restart step/move snapshots after quick loading tape
697     SaveEngineSnapshotToListInitial();
698   }
699
700   if (setup.show_snapshot_buttons &&
701       game_status == GAME_MODE_PLAYING &&
702       CheckEngineSnapshotList())
703   {
704     if (tape.pausing)
705       MapUndoRedoButtons();
706     else if (!tape.single_step)
707       UnmapUndoRedoButtons();
708   }
709 }
710
711 void TapeStartPlaying()
712 {
713   if (TAPE_IS_EMPTY(tape))
714     return;
715
716   if (!TAPE_IS_STOPPED(tape))
717     TapeStop();
718
719   TapeRewind();
720
721   tape.playing = TRUE;
722
723   DrawVideoDisplay(VIDEO_STATE_PLAY_ON, 0);
724   DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
725   DrawVideoDisplay(VIDEO_STATE_TIME_ON, 0);
726   DrawVideoDisplay(VIDEO_STATE_FRAME_ON, 0);
727
728   MapTapeWarpButton();
729
730   SetDrawDeactivationMask(REDRAW_NONE);
731   audio.sound_deactivated = FALSE;
732 }
733
734 static void TapeStartGamePlaying()
735 {
736   TapeStartPlaying();
737
738   InitGame();
739 }
740
741 void TapeStopPlaying()
742 {
743   tape.playing = FALSE;
744   tape.pausing = FALSE;
745
746   if (tape.warp_forward)
747     TapeStopWarpForward();
748
749   DrawVideoDisplay(VIDEO_STATE_PLAY_OFF, 0);
750   MapTapeEjectButton();
751 }
752
753 byte *TapePlayAction()
754 {
755   int update_delay = FRAMES_PER_SECOND / 2;
756   boolean update_video_display = (FrameCounter % update_delay == 0);
757   boolean update_draw_label_on = ((FrameCounter / update_delay) % 2 == 1);
758   static byte action[MAX_PLAYERS];
759   int i;
760
761   if (!tape.playing || tape.pausing)
762     return NULL;
763
764   if (tape.pause_before_end)  // stop some seconds before end of tape
765   {
766     if (TapeTime > tape.length_seconds - TAPE_PAUSE_SECONDS_BEFORE_DEATH)
767     {
768       TapeStopWarpForward();
769       TapeTogglePause(TAPE_TOGGLE_MANUAL);
770
771       return NULL;
772     }
773   }
774
775   if (tape.counter >= tape.length)      /* end of tape reached */
776   {
777     if (tape.warp_forward && !tape.auto_play)
778     {
779       TapeStopWarpForward();
780       TapeTogglePause(TAPE_TOGGLE_MANUAL);
781     }
782     else
783     {
784       TapeStop();
785     }
786
787     return NULL;
788   }
789
790   if (update_video_display && !tape.deactivate_display)
791   {
792     int state = 0;
793
794     if (tape.warp_forward)
795       state |= VIDEO_STATE_WARP(update_draw_label_on);
796     else if (tape.fast_forward)
797       state |= VIDEO_STATE_FFWD(update_draw_label_on);
798
799     if (tape.pause_before_end)
800       state |= VIDEO_STATE_PBEND(update_draw_label_on);
801
802     // draw labels and symbols separately to prevent labels overlapping symbols
803     DrawVideoDisplayLabel(state);
804     DrawVideoDisplaySymbol(state);
805   }
806
807   for (i = 0; i < MAX_PLAYERS; i++)
808     action[i] = tape.pos[tape.counter].action[i];
809
810 #if DEBUG_TAPE_WHEN_PLAYING
811   printf("%05d", FrameCounter);
812   for (i = 0; i < MAX_PLAYERS; i++)
813     printf("   %08x", action[i]);
814   printf("\n");
815 #endif
816
817   tape.set_centered_player = FALSE;
818   tape.centered_player_nr_next = -999;
819
820   for (i = 0; i < MAX_PLAYERS; i++)
821   {
822     if (action[i] & KEY_SET_FOCUS)
823     {
824       tape.set_centered_player = TRUE;
825       tape.centered_player_nr_next =
826         (tape.centered_player_nr_next == -999 ? i : -1);
827     }
828
829     action[i] &= ~KEY_SET_FOCUS;
830   }
831
832   tape.delay_played++;
833   if (tape.delay_played >= tape.pos[tape.counter].delay)
834   {
835     tape.counter++;
836     tape.delay_played = 0;
837   }
838
839   return action;
840 }
841
842 void TapeStop()
843 {
844   TapeStopRecording();
845   TapeStopPlaying();
846
847   DrawVideoDisplay(VIDEO_STATE_OFF, 0);
848
849   if (tape.date && tape.length)
850   {
851     DrawVideoDisplay(VIDEO_STATE_DATE_ON, tape.date);
852     DrawVideoDisplay(VIDEO_STATE_TIME_ON, tape.length_seconds);
853     DrawVideoDisplay(VIDEO_STATE_FRAME_ON, tape.length_frames);
854   }
855 }
856
857 unsigned int GetTapeLengthFrames()
858 {
859   unsigned int tape_length_frames = 0;
860   int i;
861
862   if (TAPE_IS_EMPTY(tape))
863     return(0);
864
865   for (i = 0; i < tape.length; i++)
866     tape_length_frames += tape.pos[i].delay;
867
868   return tape_length_frames;
869 }
870
871 unsigned int GetTapeLengthSeconds()
872 {
873   return (GetTapeLengthFrames() * GAME_FRAME_DELAY / 1000);
874 }
875
876 static void TapeStartWarpForward()
877 {
878   tape.fast_forward = TRUE;
879   tape.warp_forward = TRUE;
880   tape.deactivate_display = TRUE;
881
882   tape.pausing = FALSE;
883
884   TapeDeactivateDisplayOn();
885
886   DrawVideoDisplayPlayState();
887 }
888
889 static void TapeStopWarpForward()
890 {
891   tape.fast_forward = FALSE;
892   tape.warp_forward = FALSE;
893   tape.deactivate_display = FALSE;
894
895   tape.pause_before_end = FALSE;
896
897   TapeDeactivateDisplayOff(game_status == GAME_MODE_PLAYING);
898
899   DrawVideoDisplayPlayState();
900 }
901
902 static void TapeSingleStep()
903 {
904   if (options.network)
905     return;
906
907   if (!tape.pausing)
908     TapeTogglePause(TAPE_TOGGLE_MANUAL);
909
910   tape.single_step = !tape.single_step;
911
912   DrawVideoDisplay(VIDEO_STATE_1STEP(tape.single_step), 0);
913 }
914
915 void TapeQuickSave()
916 {
917   if (game_status == GAME_MODE_MAIN)
918   {
919     Request("No game that can be saved!", REQ_CONFIRM);
920
921     return;
922   }
923
924   if (game_status != GAME_MODE_PLAYING)
925     return;
926
927   if (tape.recording)
928     TapeHaltRecording();        /* prepare tape for saving on-the-fly */
929
930   if (TAPE_IS_EMPTY(tape))
931   {
932     Request("No tape that can be saved!", REQ_CONFIRM);
933
934     return;
935   }
936
937   if (SaveTapeChecked(tape.level_nr))
938     SaveEngineSnapshotSingle();
939 }
940
941 void TapeQuickLoad()
942 {
943   char *filename = getTapeFilename(level_nr);
944
945   if (!fileExists(filename))
946   {
947     Request("No tape for this level!", REQ_CONFIRM);
948
949     return;
950   }
951
952   if (tape.recording && !Request("Stop recording and load tape?",
953                                  REQ_ASK | REQ_STAY_CLOSED))
954   {
955     OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
956
957     return;
958   }
959
960   if (game_status != GAME_MODE_PLAYING && game_status != GAME_MODE_MAIN)
961     return;
962
963   if (CheckEngineSnapshotSingle())
964   {
965     TapeStartGamePlaying();
966
967     LoadEngineSnapshotSingle();
968
969     DrawCompleteVideoDisplay();
970
971     tape.playing = TRUE;
972     tape.pausing = TRUE;
973
974     TapeStopWarpForward();
975     TapeAppendRecording();
976
977     // restart step/move snapshots after quick loading tape
978     SaveEngineSnapshotToListInitial();
979
980     if (FrameCounter > 0)
981       return;
982   }
983
984   TapeStop();
985   TapeErase();
986
987   LoadTape(level_nr);
988
989   if (!TAPE_IS_EMPTY(tape))
990   {
991     TapeStartGamePlaying();
992     TapeStartWarpForward();
993
994     tape.quick_resume = TRUE;
995   }
996   else  /* this should not happen (basically checked above) */
997   {
998     int reopen_door = (game_status == GAME_MODE_PLAYING ? REQ_REOPEN : 0);
999
1000     Request("No tape for this level!", REQ_CONFIRM | reopen_door);
1001   }
1002 }
1003
1004 void InsertSolutionTape()
1005 {
1006   if (!TAPE_IS_EMPTY(tape))
1007     return;
1008
1009   LoadSolutionTape(level_nr);
1010
1011   if (TAPE_IS_EMPTY(tape))
1012     Request("No solution tape for this level!", REQ_CONFIRM);
1013
1014   DrawCompleteVideoDisplay();
1015 }
1016
1017
1018 /* ------------------------------------------------------------------------- *
1019  * tape autoplay functions
1020  * ------------------------------------------------------------------------- */
1021
1022 void AutoPlayTape()
1023 {
1024   static LevelDirTree *autoplay_leveldir = NULL;
1025   static boolean autoplay_initialized = FALSE;
1026   static int autoplay_level_nr = -1;
1027   static int num_levels_played = 0;
1028   static int num_levels_solved = 0;
1029   static int num_tape_missing = 0;
1030   static boolean level_failed[MAX_TAPES_PER_SET];
1031   int i;
1032
1033   if (autoplay_initialized)
1034   {
1035     /* just finished auto-playing tape */
1036     printf("%s.\n", tape.auto_play_level_solved ? "solved" : "NOT SOLVED");
1037
1038     num_levels_played++;
1039
1040     if (tape.auto_play_level_solved)
1041       num_levels_solved++;
1042     else if (level_nr >= 0 && level_nr < MAX_TAPES_PER_SET)
1043       level_failed[level_nr] = TRUE;
1044   }
1045   else
1046   {
1047     DrawCompleteVideoDisplay();
1048
1049     audio.sound_enabled = FALSE;
1050     setup.engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_OFF);
1051
1052     autoplay_leveldir = getTreeInfoFromIdentifier(leveldir_first,
1053                                                   global.autoplay_leveldir);
1054
1055     if (autoplay_leveldir == NULL)
1056       Error(ERR_EXIT, "no such level identifier: '%s'",
1057             global.autoplay_leveldir);
1058
1059     leveldir_current = autoplay_leveldir;
1060
1061     if (autoplay_leveldir->first_level < 0)
1062       autoplay_leveldir->first_level = 0;
1063     if (autoplay_leveldir->last_level >= MAX_TAPES_PER_SET)
1064       autoplay_leveldir->last_level = MAX_TAPES_PER_SET - 1;
1065
1066     autoplay_level_nr = autoplay_leveldir->first_level;
1067
1068     printf_line("=", 79);
1069     printf("Automatically playing level tapes\n");
1070     printf_line("-", 79);
1071     printf("Level series identifier: '%s'\n", autoplay_leveldir->identifier);
1072     printf("Level series name:       '%s'\n", autoplay_leveldir->name);
1073     printf("Level series author:     '%s'\n", autoplay_leveldir->author);
1074     printf("Number of levels:        %d\n",   autoplay_leveldir->levels);
1075     printf_line("=", 79);
1076     printf("\n");
1077
1078     for (i = 0; i < MAX_TAPES_PER_SET; i++)
1079       level_failed[i] = FALSE;
1080
1081     autoplay_initialized = TRUE;
1082   }
1083
1084   while (autoplay_level_nr <= autoplay_leveldir->last_level)
1085   {
1086     level_nr = autoplay_level_nr++;
1087
1088     if (!global.autoplay_all && !global.autoplay_level[level_nr])
1089       continue;
1090
1091     TapeErase();
1092
1093     printf("Level %03d: ", level_nr);
1094
1095     LoadLevel(level_nr);
1096     if (level.no_valid_file)
1097     {
1098       printf("(no level)\n");
1099       continue;
1100     }
1101
1102 #if 0
1103     /* ACTIVATE THIS FOR LOADING/TESTING OF LEVELS ONLY */
1104     printf("(only testing level)\n");
1105     continue;
1106 #endif
1107
1108     LoadSolutionTape(level_nr);
1109
1110     if (tape.no_valid_file)
1111     {
1112       num_tape_missing++;
1113
1114       printf("(no tape)\n");
1115
1116       continue;
1117     }
1118
1119     printf("playing tape ... ");
1120
1121     TapeStartGamePlaying();
1122
1123     if (global.autoplay_mode == AUTOPLAY_FFWD)
1124       tape.fast_forward = TRUE;
1125
1126     if (global.autoplay_mode != AUTOPLAY_PLAY)
1127       TapeStartWarpForward();
1128
1129     return;
1130   }
1131
1132   printf("\n");
1133   printf_line("=", 79);
1134   printf("Number of levels played: %d\n", num_levels_played);
1135   printf("Number of levels solved: %d (%d%%)\n", num_levels_solved,
1136          (num_levels_played ? num_levels_solved * 100 / num_levels_played :0));
1137   printf_line("-", 79);
1138   printf("Summary (for automatic parsing by scripts):\n");
1139   printf("LEVELDIR '%s', SOLVED %d/%d (%d%%)",
1140          autoplay_leveldir->identifier, num_levels_solved, num_levels_played,
1141          (num_levels_played ? num_levels_solved * 100 / num_levels_played :0));
1142
1143   if (num_levels_played != num_levels_solved)
1144   {
1145     printf(", FAILED:");
1146     for (i = 0; i < MAX_TAPES_PER_SET; i++)
1147       if (level_failed[i])
1148         printf(" %03d", i);
1149   }
1150
1151   printf("\n");
1152   printf_line("=", 79);
1153
1154   CloseAllAndExit(0);
1155 }
1156
1157
1158 /* ---------- new tape button stuff ---------------------------------------- */
1159
1160 static struct
1161 {
1162   int graphic;
1163   struct XY *pos;
1164   int gadget_id;
1165   char *infotext;
1166 } tapebutton_info[NUM_TAPE_BUTTONS] =
1167 {
1168   {
1169     IMG_GFX_TAPE_BUTTON_EJECT,          &tape.button.eject,
1170     TAPE_CTRL_ID_EJECT,                 "eject tape"
1171   },
1172   {
1173     /* (same position as "eject" button) */
1174     IMG_GFX_TAPE_BUTTON_EXTRA,          &tape.button.eject,
1175     TAPE_CTRL_ID_EXTRA,                 "extra functions"
1176   },
1177   {
1178     IMG_GFX_TAPE_BUTTON_STOP,           &tape.button.stop,
1179     TAPE_CTRL_ID_STOP,                  "stop tape"
1180   },
1181   {
1182     IMG_GFX_TAPE_BUTTON_PAUSE,          &tape.button.pause,
1183     TAPE_CTRL_ID_PAUSE,                 "pause tape"
1184   },
1185   {
1186     IMG_GFX_TAPE_BUTTON_RECORD,         &tape.button.record,
1187     TAPE_CTRL_ID_RECORD,                "record tape"
1188   },
1189   {
1190     IMG_GFX_TAPE_BUTTON_PLAY,           &tape.button.play,
1191     TAPE_CTRL_ID_PLAY,                  "play tape"
1192   }
1193 };
1194
1195 void CreateTapeButtons()
1196 {
1197   int i;
1198
1199   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
1200   {
1201     struct GraphicInfo *gfx = &graphic_info[tapebutton_info[i].graphic];
1202     struct XY *pos = tapebutton_info[i].pos;
1203     struct GadgetInfo *gi;
1204     int gd_x = gfx->src_x;
1205     int gd_y = gfx->src_y;
1206     int gd_xp = gfx->src_x + gfx->pressed_xoffset;
1207     int gd_yp = gfx->src_y + gfx->pressed_yoffset;
1208     int id = i;
1209
1210     gi = CreateGadget(GDI_CUSTOM_ID, id,
1211                       GDI_INFO_TEXT, tapebutton_info[i].infotext,
1212                       GDI_X, VX + pos->x,
1213                       GDI_Y, VY + pos->y,
1214                       GDI_WIDTH, gfx->width,
1215                       GDI_HEIGHT, gfx->height,
1216                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
1217                       GDI_STATE, GD_BUTTON_UNPRESSED,
1218                       GDI_DESIGN_UNPRESSED, gfx->bitmap, gd_x, gd_y,
1219                       GDI_DESIGN_PRESSED, gfx->bitmap, gd_xp, gd_yp,
1220                       GDI_DIRECT_DRAW, FALSE,
1221                       GDI_EVENT_MASK, GD_EVENT_RELEASED,
1222                       GDI_CALLBACK_ACTION, HandleTapeButtons,
1223                       GDI_END);
1224
1225     if (gi == NULL)
1226       Error(ERR_EXIT, "cannot create gadget");
1227
1228     tape_gadget[id] = gi;
1229   }
1230 }
1231
1232 void FreeTapeButtons()
1233 {
1234   int i;
1235
1236   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
1237     FreeGadget(tape_gadget[i]);
1238 }
1239
1240 void MapTapeEjectButton()
1241 {
1242   UnmapGadget(tape_gadget[TAPE_CTRL_ID_EXTRA]);
1243   MapGadget(tape_gadget[TAPE_CTRL_ID_EJECT]);
1244 }
1245
1246 void MapTapeWarpButton()
1247 {
1248   UnmapGadget(tape_gadget[TAPE_CTRL_ID_EJECT]);
1249   MapGadget(tape_gadget[TAPE_CTRL_ID_EXTRA]);
1250 }
1251
1252 void MapTapeButtons()
1253 {
1254   int i;
1255
1256   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
1257     if (i != TAPE_CTRL_ID_EXTRA)
1258       MapGadget(tape_gadget[i]);
1259
1260   if (tape.recording || tape.playing)
1261     MapTapeWarpButton();
1262
1263   if (tape.show_game_buttons)
1264     MapGameButtons();
1265 }
1266
1267 void UnmapTapeButtons()
1268 {
1269   int i;
1270
1271   for (i = 0; i < NUM_TAPE_BUTTONS; i++)
1272     UnmapGadget(tape_gadget[i]);
1273
1274   if (tape.show_game_buttons)
1275     UnmapGameButtons();
1276 }
1277
1278 static void HandleTapeButtonsExt(int id)
1279 {
1280   if (game_status != GAME_MODE_MAIN && game_status != GAME_MODE_PLAYING)
1281     return;
1282
1283   switch (id)
1284   {
1285     case TAPE_CTRL_ID_EJECT:
1286       TapeStop();
1287
1288       if (TAPE_IS_EMPTY(tape))
1289       {
1290         LoadTape(level_nr);
1291
1292         if (TAPE_IS_EMPTY(tape))
1293           Request("No tape for this level!", REQ_CONFIRM);
1294       }
1295       else
1296       {
1297         if (tape.changed)
1298           SaveTapeChecked(tape.level_nr);
1299
1300         TapeErase();
1301       }
1302
1303       DrawCompleteVideoDisplay();
1304       break;
1305
1306     case TAPE_CTRL_ID_EXTRA:
1307       if (tape.playing)
1308       {
1309         tape.pause_before_end = !tape.pause_before_end;
1310
1311         DrawVideoDisplayPlayState();
1312       }
1313       else if (tape.recording)
1314         TapeSingleStep();
1315
1316       break;
1317
1318     case TAPE_CTRL_ID_STOP:
1319       TapeStop();
1320       break;
1321
1322     case TAPE_CTRL_ID_PAUSE:
1323       TapeTogglePause(TAPE_TOGGLE_MANUAL);
1324       break;
1325
1326     case TAPE_CTRL_ID_RECORD:
1327       if (TAPE_IS_STOPPED(tape))
1328         TapeStartGameRecording();
1329       else if (tape.pausing)
1330       {
1331         if (tape.playing)                       /* PLAY -> PAUSE -> RECORD */
1332           TapeAppendRecording();
1333         else
1334           TapeTogglePause(TAPE_TOGGLE_MANUAL);
1335       }
1336       break;
1337
1338     case TAPE_CTRL_ID_PLAY:
1339       if (tape.recording && tape.pausing)       /* PAUSE -> RECORD */
1340       {
1341         // ("TAPE_IS_EMPTY(tape)" is TRUE here -- probably fix this)
1342
1343         TapeTogglePause(TAPE_TOGGLE_MANUAL);
1344       }
1345
1346       if (TAPE_IS_EMPTY(tape))
1347         break;
1348
1349       if (TAPE_IS_STOPPED(tape))
1350       {
1351         TapeStartGamePlaying();
1352       }
1353       else if (tape.playing)
1354       {
1355         if (tape.pausing)                       /* PAUSE -> PLAY */
1356         {
1357           // continue playing in normal mode
1358           tape.fast_forward = FALSE;
1359           tape.warp_forward = FALSE;
1360           tape.pause_before_end = FALSE;
1361           tape.deactivate_display = FALSE;
1362
1363           TapeTogglePause(TAPE_TOGGLE_MANUAL);
1364         }
1365         else if (!tape.fast_forward)            /* PLAY -> FFWD */
1366         {
1367           tape.fast_forward = TRUE;
1368         }
1369         else if (!tape.warp_forward)            /* FFWD -> WARP */
1370         {
1371           tape.warp_forward = TRUE;
1372         }
1373         else if (!tape.deactivate_display)      /* WARP -> WARP BLIND */
1374         {
1375           tape.deactivate_display = TRUE;
1376
1377           TapeDeactivateDisplayOn();
1378         }
1379         else                                    /* WARP BLIND -> PLAY */
1380         {
1381           tape.fast_forward = FALSE;
1382           tape.warp_forward = FALSE;
1383           tape.deactivate_display = FALSE;
1384
1385           TapeDeactivateDisplayOff(game_status == GAME_MODE_PLAYING);
1386         }
1387
1388         DrawVideoDisplayPlayState();
1389       }
1390       break;
1391
1392     default:
1393       break;
1394   }
1395 }
1396
1397 static void HandleTapeButtons(struct GadgetInfo *gi)
1398 {
1399   HandleTapeButtonsExt(gi->custom_id);
1400 }
1401
1402 void HandleTapeButtonKeys(Key key)
1403 {
1404   boolean eject_button_is_active = TAPE_IS_STOPPED(tape);
1405   boolean extra_button_is_active = !eject_button_is_active;
1406
1407   if (key == setup.shortcut.tape_eject && eject_button_is_active)
1408     HandleTapeButtonsExt(TAPE_CTRL_ID_EJECT);
1409   else if (key == setup.shortcut.tape_extra && extra_button_is_active)
1410     HandleTapeButtonsExt(TAPE_CTRL_ID_EXTRA);
1411   else if (key == setup.shortcut.tape_stop)
1412     HandleTapeButtonsExt(TAPE_CTRL_ID_STOP);
1413   else if (key == setup.shortcut.tape_pause)
1414     HandleTapeButtonsExt(TAPE_CTRL_ID_PAUSE);
1415   else if (key == setup.shortcut.tape_record)
1416     HandleTapeButtonsExt(TAPE_CTRL_ID_RECORD);
1417   else if (key == setup.shortcut.tape_play)
1418     HandleTapeButtonsExt(TAPE_CTRL_ID_PLAY);
1419 }