/*
* z_sound_effect, load / play / stop / discard a sound effect.
*
* zargs[0] = number of bleep (1 or 2) or sample
* zargs[1] = operation to perform (samples only)
* zargs[2] = repeats and volume (play sample only)
* zargs[3] = end-of-sound routine (play sample only, optional)
*
* Note: Volumes range from 1 to 8, volume 255 is the default volume.
* Repeats are stored in the high byte, 255 is infinite loop.
*
*/
void z_sound_effect (void)
{
zword number = zargs[0];
zword effect = zargs[1];
zword volume = zargs[2];
/* By default play sound 1 at volume 8 */
if (zargc < 1)
number = 1;
if (zargc < 2)
effect = EFFECT_PLAY;
if (zargc < 3)
volume = 8;
if (number >= 3 || number == 0) {
locked = TRUE;
if (story_id == LURKING_HORROR && (number == 9 || number == 16)) {
if (effect == EFFECT_PLAY) {
next_sample = number;
next_volume = volume;
locked = FALSE;
if (!playing)
start_next_sample ();
} else locked = FALSE;
return;
}
playing = FALSE;
switch (effect) {
case EFFECT_PREPARE:
os_prepare_sample (number);
break;
case EFFECT_PLAY:
start_sample (number, lo (volume), hi (volume), (zargc == 4) ? zargs[3] : 0);
break;
case EFFECT_STOP:
os_stop_sample ();
break;
case EFFECT_FINISH_WITH:
os_finish_with_sample ();
break;
}
locked = FALSE;
} else os_beep (number);
}/* z_sound_effect */
/*
* unix_history_back
*
* Copy last available string to str, if possible. Return 1 if successful.
* Only lines of at most maxlen characters will be considered. In addition
* the first searchlen characters of the history entry must match those of str.
*/
static int unix_history_back(zchar *str, int searchlen, int maxlen)
{
char **prev = history_view;
do {
RING_DEC( history_view, history_buffer, history_end);
if ((history_view == history_next)
|| (*history_view == NULL)) {
os_beep(BEEP_HIGH);
history_view = prev;
return 0;
}
} while (strlen( *history_view) > maxlen
|| (searchlen != 0 && strncmp( (char *)str, *history_view, searchlen)));
strcpy((char *)str + searchlen, *history_view + searchlen);
return 1;
}
void os_fatal (const char *s)
{
if (u_setup.curses_active) {
os_display_string((zchar *)"\n\n");
os_beep(BEEP_HIGH);
os_set_text_style(BOLDFACE_STYLE);
os_display_string((zchar *)"Fatal error: ");
os_set_text_style(0);
os_display_string((zchar *)s);
os_display_string((zchar *)"\n");
new_line();
os_reset_screen();
exit(1);
}
fputs ("\nFatal error: ", stderr);
fputs (s, stderr);
fputs ("\n\n", stderr);
exit (1);
}/* os_fatal */
void os_fatal (const char *s, ...)
{
if (u_setup.curses_active) {
/* Solaris 2.6's cc complains if the below cast is missing */
os_display_string((zchar *)"\n\n");
os_beep(BEEP_HIGH);
os_set_text_style(BOLDFACE_STYLE);
os_display_string((zchar *)"Fatal error: ");
os_set_text_style(0);
os_display_string((zchar *)s);
os_display_string((zchar *)"\n");
new_line();
os_reset_screen();
exit(1);
}
fputs ("\nFatal error: ", stderr);
fputs (s, stderr);
fputs ("\n\n", stderr);
exit (1);
}/* os_fatal */
bool dumb_output_handle_setting(const char *setting, bool show_cursor,
bool startup)
{
char *p;
int i;
if (!strncmp(setting, "pb", 2)) {
toggle(&show_pictures, setting[2]);
printf("Picture outlines display %s\n", show_pictures ? "ON" : "OFF");
if (startup)
return TRUE;
for (i = 0; i < screen_cells; i++)
screen_changes[i] = (cell_style(screen_data[i]) == PICTURE_STYLE);
dumb_show_screen(show_cursor);
} else if (!strncmp(setting, "vb", 2)) {
toggle(&visual_bell, setting[2]);
printf("Visual bell %s\n", visual_bell ? "ON" : "OFF");
os_beep(1); os_beep(2);
} else if (!strncmp(setting, "ln", 2)) {
toggle(&show_line_numbers, setting[2]);
printf("Line numbering %s\n", show_line_numbers ? "ON" : "OFF");
} else if (!strncmp(setting, "lt", 2)) {
toggle(&show_line_types, setting[2]);
printf("Line-type display %s\n", show_line_types ? "ON" : "OFF");
} else if (*setting == 'c') {
switch (setting[1]) {
case 'm': compression_mode = COMPRESSION_MAX; break;
case 's': compression_mode = COMPRESSION_SPANS; break;
case 'n': compression_mode = COMPRESSION_NONE; break;
case 'h': hide_lines = atoi(&setting[2]); break;
default: return FALSE;
}
printf("Compression mode %s, hiding top %d lines\n",
compression_names[compression_mode], hide_lines);
} else if (*setting == 'r') {
switch (setting[1]) {
case 'n': rv_mode = RV_NONE; break;
case 'o': rv_mode = RV_DOUBLESTRIKE; break;
case 'u': rv_mode = RV_UNDERLINE; break;
case 'c': rv_mode = RV_CAPS; break;
case 'b': rv_blank_char = setting[2] ? setting[2] : ' '; break;
default: return FALSE;
}
printf("Reverse-video mode %s, blanks reverse to '%c': ",
rv_names[rv_mode], rv_blank_char);
for (p = "sample reverse text"; *p; p++)
show_cell(make_cell(REVERSE_STYLE, *p));
putchar('\n');
for (i = 0; i < screen_cells; i++)
screen_changes[i] = (cell_style(screen_data[i]) == REVERSE_STYLE);
dumb_show_screen(show_cursor);
} else if (!strcmp(setting, "set")) {
printf("Compression Mode %s, hiding top %d lines\n",
compression_names[compression_mode], hide_lines);
printf("Picture Boxes display %s\n", show_pictures ? "ON" : "OFF");
printf("Visual Bell %s\n", visual_bell ? "ON" : "OFF");
os_beep(1); os_beep(2);
printf("Line Numbering %s\n", show_line_numbers ? "ON" : "OFF");
printf("Line-Type display %s\n", show_line_types ? "ON" : "OFF");
printf("Reverse-Video mode %s, Blanks reverse to '%c': ",
rv_names[rv_mode], rv_blank_char);
for (p = "sample reverse text"; *p; p++)
show_cell(make_cell(REVERSE_STYLE, *p));
putchar('\n');
} else
return FALSE;
return TRUE;
}
