vlarn/show.c

/* =============================================================================
 * PROGRAM:  ularn
 * FILENAME: show.c
 *
 * DESCRIPTION:
 * This module contains functions to print item names and show lists of items.
 *
 * =============================================================================
 * EXPORTED VARIABLES
 *
 * None
 *
 * =============================================================================
 * EXPORTED FUNCTIONS
 *
 * show_plusses - Prints the number of plusses as indicated by the input arg
 * qshowstr     - Show the player's inventory without setting up text mode
 * showstr      - Show the player's invertory, setting/exiting text mode
 * showwear     - Show wearable items
 * showwield    - Show wieldable items
 * showread     - Show readable items
 * showeat      - Show edible items
 * showquaff    - Show quaffable items
 * seemagic     - Show magic spells/scrolls/potions discovered
 * show1        - Show an item name
 * show3        - Show an item name with the numebr of plusses
 *
 * =============================================================================
 */

#include "show.h"
#include "dungeon.h"
#include "header.h"
#include "itm.h"
#include "player.h"
#include "potion.h"
#include "scroll.h"
#include "spell.h"
#include "ularn_ask.h"
#include "ularn_game.h"
#include "ularn_win.h"

/* =============================================================================
 * Local variables
 */

/*
 * See magic function line and position counts. Used for paginating see magic.
 */
static int lincount;
static int count;

/* =============================================================================
 * Local functions
 */

/* =============================================================================
 * FUNCTION: t_setup
 *
 * DESCRIPTION:
 * Sets up for text display for the indicated number of lines.
 *
 * PARAMETERS:
 *
 *   count : The number of lines of text to be displayed.
 *
 * RETURN VALUE:
 *
 *   None.
 */
static void t_setup(int count) {
  (void)count;
  set_display(DISPLAY_TEXT);
  ClearText();
  MoveCursor(1, 1);
}

/* =============================================================================
 * FUNCTION: t_endup
 *
 * DESCRIPTION:
 * Restores normal display screen depending on t_setup()/
 *
 * PARAMETERS:
 *
 *   count : The number of lines of text displayed.
 *
 * RETURN VALUE:
 *
 *   None.
 */
static void t_endup(int count) {
  (void)count;
  set_display(DISPLAY_MAP);
}

/* =============================================================================
 * FUNCTION: seepage
 *
 * DESCRIPTION:
 * This function is used to paginate the seemagic output.
 * It is called for each spell displayed and assumes that spells are displayed
 * in 3 columns.
 * Whenever the number of calls indicates a full page has been displayed it
 * calls more() to prompt for the next page.
 *
 * PARAMETERS:
 *
 *   None.
 *
 * RETURN VALUE:
 *
 *   None.
 */
static void seepage(void) {
  if (++count == 3) {
    lincount++;
    count = 0;
    Printc('\n');
    if (lincount > 17) {
      lincount = 0;
      more();
      ClearText();
    }
  }
}

/* =============================================================================
 * Exported functions
 */

/* =============================================================================
 * FUNCTION: show_plusses
 */
void show_plusses(int plus) {
  if ((plus > 0) || wizard)
    Printf(" +%d", plus);
  else if (plus < 0)
    Printf(" %d", plus);
}

/* =============================================================================
 * FUNCTION: qshowstr
 */
void qshowstr(void) {
  int k;
  int mobuls_used;
  int mobuls_left;

  clearpager();
  nosignal = 1; /* don't allow ^c etc */

  if (c[GOLD]) {
    Printf(".)   %d gold piece%s.", (long)c[GOLD], plural(c[GOLD]));
    pager();
  }

  for (k = 0; k < IVENSIZE; k++) {
    if (iven[k] != ONOTHING) {
      show3(k);
      pager();
    }
  }

  mobuls_used = (gtime / 100) + 1;
  mobuls_left = (TIMELIMIT / 100) - mobuls_used;
  Printf("\nElapsed time is %d.  You have %d mobul%s left.", mobuls_used,
         mobuls_left, plural(mobuls_left));

  more();
  nosignal = 0;
}

/* =============================================================================
 * FUNCTION: showstr
 */
void showstr(void) {
  int i, number;

  number = 3;

  /* count items in inventory */
  for (i = 0; i < IVENSIZE; i++)
    if (iven[i] != ONOTHING)
      number++;

  t_setup(number);
  qshowstr();
  t_endup(number);
}

/* =============================================================================
 * FUNCTION: showwear
 */
void showwear(void) {
  int count;
  int i;
  int j;

  nosignal = 1; /* don't allow ^c etc */
  clearpager();

  /* count number of items we will display */
  count = 2;
  for (j = 0; j < IVENSIZE; j++) {
    i = iven[j];

    if (i != ONOTHING) {
      switch (i) {
      case OLEATHER:
      case OPLATE:
      case OCHAIN:
      case ORING:
      case OSTUDLEATHER:
      case OSPLINT:
      case OPLATEARMOR:
      case OSSPLATE:
      case OSHIELD:
      case OELVENCHAIN:
        count++;

      default:
        break;
      }
    }
  }

  t_setup(count);

  /* Display the wearable items in item index order */
  for (i = 22; i < 93; i++) {
    for (j = 0; j < IVENSIZE; j++) {
      if (iven[j] == i) {
        switch (i) {
        case OLEATHER:
        case OPLATE:
        case OCHAIN:
        case ORING:
        case OSTUDLEATHER:
        case OSPLINT:
        case OPLATEARMOR:
        case OSSPLATE:
        case OSHIELD:
        case OELVENCHAIN:
          show3(j);
          pager();
          break;

        default:
          break;
        }
      }
    }
  }

  more();

  nosignal = 0;
  t_endup(count);
}

/* =============================================================================
 * FUNCTION: showwield
 */
void showwield(void) {
  int i;
  int j;
  int count;

  nosignal = 1; /* don't allow ^c etc */
  clearpager();

  /* count how many items */
  count = 2;
  for (j = 0; j < IVENSIZE; j++) {
    i = iven[j];
    if (i != ONOTHING) {
      switch (i) {
      case ODIAMOND:
      case ORUBY:
      case OEMERALD:
      case OSAPPHIRE:
      case OBOOK:
      case OCHEST:
      case OLARNEYE:
      case ONOTHEFT:
      case OSPIRITSCARAB:
      case OCUBEofUNDEAD:
      case OPOTION:
      case OORB:
      case OHANDofFEAR:
      case OBRASSLAMP:
      case OURN:
      case OWWAND:
      case OSPHTALISMAN:
      case OSCROLL:
        break;

      default:
        count++;
        break;
      }
    }
  }

  t_setup(count);

  /* display the wieldable items in item order */
  for (i = 22; i < 93; i++) {
    for (j = 0; j < IVENSIZE; j++) {
      if (iven[j] == i) {
        switch (i) {
        case ODIAMOND:
        case ORUBY:
        case OEMERALD:
        case OSAPPHIRE:
        case OBOOK:
        case OCHEST:
        case OLARNEYE:
        case ONOTHEFT:
        case OSPIRITSCARAB:
        case OCUBEofUNDEAD:
        case OPOTION:
        case OHANDofFEAR:
        case OBRASSLAMP:
        case OURN:
        case OSPHTALISMAN:
        case OWWAND:
        case OORB:
        case OSCROLL:
          break;

        default:
          show3(j);
          pager();
          break;
        }
      }
    }
  }

  more();
  nosignal = 0;
  t_endup(count);
}

/* =============================================================================
 * FUNCTION: showread
 */
void showread(void) {
  int i;
  int j;
  int count;

  nosignal = 1; /* don't allow ^c etc */
  clearpager();

  count = 2;
  for (j = 0; j < IVENSIZE; j++) {
    switch (iven[j]) {
    case OBOOK:
    case OSCROLL:
      count++;
      break;

    default:
      break;
    }
  }

  t_setup(count);

  /* display the readable items in item order */
  for (i = 22; i < 84; i++) {
    for (j = 0; j < IVENSIZE; j++) {

      if (iven[j] == i) {
        switch (i) {
        case OBOOK:
        case OSCROLL:
          show3(j);
          pager();
          break;

        default:
          break;
        }
      }
    }
  }

  more();
  nosignal = 0;
  t_endup(count);
}

/* =============================================================================
 * FUNCTION: showeat
 */
void showeat(void) {
  int i;
  int j;
  int count;

  nosignal = 1; /* don't allow ^c etc */
  clearpager();

  count = 2;
  for (j = 0; j < IVENSIZE; j++) {
    switch (iven[j]) {
    case OCOOKIE:
      count++;
      break;

    default:
      break;
    }
  }

  t_setup(count);

  /* show the edible items in item order */
  for (i = 22; i < 84; i++) {
    for (j = 0; j < IVENSIZE; j++) {

      if (iven[j] == i) {
        switch (i) {
        case OCOOKIE:
          show3(j);
          pager();
          break;

        default:
          break;
        }
      }
    }
  }

  more();
  nosignal = 0;
  t_endup(count);
}

/* =============================================================================
 * FUNCTION: showquaff
 */
void showquaff(void) {
  int i, j, count;

  nosignal = 1; /* don't allow ^c etc */
  clearpager();

  count = 2;
  for (j = 0; j < IVENSIZE; j++) {
    switch (iven[j]) {
    case OPOTION:
      count++;
      break;

    default:
      break;
    }
  }
  t_setup(count);

  /* show the quaffable items in item order */
  for (i = 22; i < 84; i++) {
    for (j = 0; j < IVENSIZE; j++) {
      if (iven[j] == i) {
        switch (i) {
        case OPOTION:
          show3(j);
          pager();
          break;

        default:
          break;
        }
      }
    }
  }

  more();
  nosignal = 0;
  t_endup(count);
}

/* =============================================================================
 * FUNCTION: seemagic
 */
void seemagic(int arg) {
  int i, number;

  count = 0;
  lincount = 0;
  nosignal = 1;

  set_display(DISPLAY_TEXT);

  if (arg == 99) {
    number = (SPELL_COUNT + 2) / 3 + 4; /* # lines needed to display */
    ClearText();
    MoveCursor(1, 1);
    Print("Availible spells are:\n\n");
    for (i = 0; i < SPELL_COUNT; i++) {
      Printf("%s %-20s ", spelcode[i], spelname[i]);
      seepage();
    }
    seepage();
    more();

    nosignal = 0;
    draws(0, MAXX, 0, number);
    return;
  } else if (arg == -1) {
    /* if display spells while casting one */
    number = 0;
    for (i = 0; i < SPELL_COUNT; i++)
      if (spelknow[i])
        number++;

    number = (number + 2) / 3 + 4; /* # lines needed to display */
    ClearText();
    MoveCursor(1, 1);
  } else
    ClearText();

  Print("The magic spells you have discovered to date are:\n\n");
  for (i = 0; i < SPELL_COUNT; i++) {
    if (spelknow[i]) {
      Printf("%s %-20s ", spelcode[i], spelname[i]);
      seepage();
    }
  }

  if (arg == -1) {
    seepage();
    more();
    nosignal = 0;
    set_display(DISPLAY_MAP);

    return;
  }

  lincount += 3;
  if (count != 0) {
    count = 2;
    seepage();
  }

  Print("\nThe magic scrolls you have found to date are:\n\n");
  count = 0;
  for (i = 0; i < MAXSCROLL; i++) {
    if (scrollknown[i]) {
      Printf("%-26s", &scrollname[i][1]);
      seepage();
    }
  }

  lincount += 3;
  if (count != 0) {
    count = 2;
    seepage();
  }

  Print("\nThe magic potions you have found to date are:\n\n");
  count = 0;
  for (i = 0; i < MAXPOTION; i++) {
    if (potionknown[i]) {
      Printf("%-26s", &potionname[i][1]);
      seepage();
    }
  }

  if (lincount != 0)
    more();

  nosignal = 0;
  set_display(DISPLAY_MAP);
}

/* =============================================================================
 * FUNCTION: show1
 */
void show1(int idx, char *str2[], int known[]) {
  /* standard */
  if (known == 0) {
    if (str2 == 0)
      Printf("\n%c)   %s", idx + 'a', objectname[(int)iven[idx]]);
    else if (*str2[ivenarg[idx]] == 0)
      Printf("\n%c)   %s", idx + 'a', objectname[(int)iven[idx]]);
    else
      Printf("\n%c)   %s of%s", idx + 'a', objectname[(int)iven[idx]],
             str2[ivenarg[idx]]);
  } else {
    /* scroll or potion or something with a known array */
    if (str2 == 0)
      Printf("\n%c)   %s", idx + 'a', objectname[(int)iven[idx]]);
    else if (*str2[ivenarg[idx]] == 0)
      Printf("\n%c)   %s", idx + 'a', objectname[(int)iven[idx]]);
    else if (known[ivenarg[idx]] == 0)
      Printf("\n%c)   %s", idx + 'a', objectname[(int)iven[idx]]);
    else
      Printf("\n%c)   %s of%s", idx + 'a', objectname[(int)iven[idx]],
             str2[ivenarg[idx]]);
  }

  if (wizard)
    Printf(" [ %d ]", ivenarg[idx]);
}

/* =============================================================================
 * FUNCTION: show3
 */
void show3(int index) {
  switch (iven[index]) {
  case OPOTION:
    show1(index, potionname, potionknown);
    break;

  case OSCROLL:
    show1(index, scrollname, scrollknown);
    break;

  case OLARNEYE:
  case OBOOK:
  case OSPIRITSCARAB:
  case ODIAMOND:
  case ORUBY:
  case OCUBEofUNDEAD:
  case OEMERALD:
  case OCHEST:
  case OCOOKIE:
  case OSAPPHIRE:
  case OORB:
  case OHANDofFEAR:
  case OBRASSLAMP:
  case OURN:
  case OWWAND:
  case OSPHTALISMAN:
  case ONOTHEFT:
    show1(index, (char **)0, (int *)0);
    break;

  default:
    Printf("\n%c)   %s", index + 'a', objectname[(int)iven[index]]);
    show_plusses(ivenarg[index]);
    break;
  }

  if (c[WIELD] == index)
    Print(" (weapon in hand)");

  if ((c[WEAR] == index) || (c[SHIELD] == index))
    Print(" (being worn)");
}