1 files changed, 372 insertions, 0 deletions

diff --git a/apps/plugins/doom/st_lib.c b/apps/plugins/doom/st_lib.c
new file mode 100644
index 0000000000..adcd0e6688
--- /dev/null
+++ b/apps/plugins/doom/st_lib.c
@@ -0,0 +1,372 @@
+/* Emacs style mode select   -*- C++ -*-
+ *-----------------------------------------------------------------------------
+ *
+ *
+ *  PrBoom a Doom port merged with LxDoom and LSDLDoom
+ *  based on BOOM, a modified and improved DOOM engine
+ *  Copyright (C) 1999 by
+ *  id Software, Chi Hoang, Lee Killough, Jim Flynn, Rand Phares, Ty Halderman
+ *  Copyright (C) 1999-2000 by
+ *  Jess Haas, Nicolas Kalkhof, Colin Phipps, Florian Schulze
+ *
+ *  This program is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU General Public License
+ *  as published by the Free Software Foundation; either version 2
+ *  of the License, or (at your option) any later version.
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ *  02111-1307, USA.
+ *
+ * DESCRIPTION:
+ *      The status bar widget code.
+ *
+ *-----------------------------------------------------------------------------*/
+
+#include "doomdef.h"
+#include "doomstat.h"
+#include "v_video.h"
+#include "w_wad.h"
+#include "m_swap.h"
+#include "st_stuff.h"
+#include "st_lib.h"
+#include "r_main.h"
+
+int sts_always_red;      //jff 2/18/98 control to disable status color changes
+int sts_pct_always_gray; // killough 2/21/98: always gray %'s? bug or feature?
+
+//
+// STlib_init()
+//
+void STlib_init(void)
+{
+   // cph - no longer hold STMINUS pointer
+}
+
+//
+// STlib_initNum()
+//
+// Initializes an st_number_t widget
+//
+// Passed the widget, its position, the patches for the digits, a pointer
+// to the value displayed, a pointer to the on/off control, and the width
+// Returns nothing
+//
+void STlib_initNum
+( st_number_t* n,
+  int x,
+  int y,
+  const patchnum_t* pl,
+  int* num,
+  boolean* on,
+  int     width )
+{
+   n->x  = x;
+   n->y  = y;
+   n->oldnum = 0;
+   n->width  = width;
+   n->num  = num;
+   n->on = on;
+   n->p  = pl;
+}
+
+/*
+ * STlib_drawNum()
+ *
+ * A fairly efficient way to draw a number based on differences from the
+ * old number.
+ *
+ * Passed a st_number_t widget, a color range for output, and a flag
+ * indicating whether refresh is needed.
+ * Returns nothing
+ *
+ * jff 2/16/98 add color translation to digit output
+ * cphipps 10/99 - const pointer to colour trans table, made function static
+ */
+static void STlib_drawNum
+( st_number_t*  n,
+  int cm,
+  boolean refresh )
+{
+
+   int   numdigits = n->width;
+   int   num = *n->num;
+
+   int   w = SHORT(n->p[0].width);
+   int   h = SHORT(n->p[0].height);
+   int   x = n->x;
+
+   int   neg;
+
+   // leban 1/20/99:
+   // strange that somebody went through all the work to draw only the
+   // differences, and then went and constantly redrew all the numbers.
+   // return without drawing if the number didn't change and the bar
+   // isn't refreshing.
+   if(n->oldnum == num && !refresh)
+      return;
+
+   // CPhipps - compact some code, use num instead of *n->num
+   if ((neg = (n->oldnum = num) < 0))
+   {
+      if (numdigits == 2 && num < -9)
+         num = -9;
+      else if (numdigits == 3 && num < -99)
+         num = -99;
+
+      num = -num;
+   }
+
+   // clear the area
+   x = n->x - numdigits*w;
+
+#ifdef RANGECHECK
+   if (n->y - ST_Y < 0)
+      I_Error("STlib_drawNum: n->y - ST_Y < 0");
+#endif
+
+   V_CopyRect(x, n->y - ST_Y, BG, w*numdigits, h, x, n->y, FG, VPT_STRETCH);
+
+   // if non-number, do not draw it
+   if (num == 1994)
+      return;
+
+   x = n->x;
+
+   //jff 2/16/98 add color translation to digit output
+   // in the special case of 0, you draw 0
+   if (!num)
+      // CPhipps - patch drawing updated, reformatted
+      V_DrawNumPatch(x - w, n->y, FG, n->p[0].lumpnum, cm,
+                     (((cm!=CR_DEFAULT) && !sts_always_red) ? VPT_TRANS : VPT_NONE) | VPT_STRETCH);
+
+   // draw the new number
+   //jff 2/16/98 add color translation to digit output
+   while (num && numdigits--) {
+      // CPhipps - patch drawing updated, reformatted
+      x -= w;
+      V_DrawNumPatch(x, n->y, FG, n->p[num % 10].lumpnum, cm,
+                     (((cm!=CR_DEFAULT) && !sts_always_red) ? VPT_TRANS : VPT_NONE) | VPT_STRETCH);
+      num /= 10;
+   }
+
+   // draw a minus sign if necessary
+   //jff 2/16/98 add color translation to digit output
+   // cph - patch drawing updated, load by name instead of acquiring pointer earlier
+   if (neg)
+      V_DrawNamePatch(x - w, n->y, FG, "STTMINUS", cm,
+                      (((cm!=CR_DEFAULT) && !sts_always_red) ? VPT_TRANS : VPT_NONE) | VPT_STRETCH);
+}
+
+/*
+ * STlib_updateNum()
+ *
+ * Draws a number conditionally based on the widget's enable
+ *
+ * Passed a number widget, the output color range, and a refresh flag
+ * Returns nothing
+ *
+ * jff 2/16/98 add color translation to digit output
+ * cphipps 10/99 - make that pointer const
+ */
+void STlib_updateNum
+( st_number_t*    n,
+  int cm,
+  boolean   refresh )
+{
+   if (*n->on) STlib_drawNum(n, cm, refresh);
+}
+
+//
+// STlib_initPercent()
+//
+// Initialize a st_percent_t number with percent sign widget
+//
+// Passed a st_percent_t widget, the position, the digit patches, a pointer
+// to the number to display, a pointer to the enable flag, and patch
+// for the percent sign.
+// Returns nothing.
+//
+void STlib_initPercent
+( st_percent_t* p,
+  int x,
+  int y,
+  const patchnum_t* pl,
+  int* num,
+  boolean* on,
+  const patchnum_t* percent )
+{
+   STlib_initNum(&p->n, x, y, pl, num, on, 3);
+   p->p = percent;
+}
+
+/*
+ * STlib_updatePercent()
+ *
+ * Draws a number/percent conditionally based on the widget's enable
+ *
+ * Passed a precent widget, the output color range, and a refresh flag
+ * Returns nothing
+ *
+ * jff 2/16/98 add color translation to digit output
+ * cphipps - const for pointer to the colour translation table
+ */
+
+void STlib_updatePercent
+( st_percent_t*   per,
+  int cm,
+  int refresh )
+{
+   if (*per->n.on && (refresh || (per->n.oldnum != *per->n.num))) {
+      // killough 2/21/98: fix percents not updated;
+      /* CPhipps - make %'s only be updated if number changed */
+      // CPhipps - patch drawing updated
+      V_DrawNumPatch(per->n.x, per->n.y, FG, per->p->lumpnum,
+                     sts_pct_always_gray ? CR_GRAY : cm,
+                     (sts_always_red ? VPT_NONE : VPT_TRANS) | VPT_STRETCH);
+   }
+
+   STlib_updateNum(&per->n, cm, refresh);
+}
+
+//
+// STlib_initMultIcon()
+//
+// Initialize a st_multicon_t widget, used for a multigraphic display
+// like the status bar's keys.
+//
+// Passed a st_multicon_t widget, the position, the graphic patches, a pointer
+// to the numbers representing what to display, and pointer to the enable flag
+// Returns nothing.
+//
+void STlib_initMultIcon
+( st_multicon_t* i,
+  int x,
+  int y,
+  const patchnum_t* il,
+  int* inum,
+  boolean* on )
+{
+   i->x  = x;
+   i->y  = y;
+   i->oldinum  = -1;
+   i->inum = inum;
+   i->on = on;
+   i->p  = il;
+}
+
+//
+// STlib_updateMultIcon()
+//
+// Draw a st_multicon_t widget, used for a multigraphic display
+// like the status bar's keys. Displays each when the control
+// numbers change or refresh is true
+//
+// Passed a st_multicon_t widget, and a refresh flag
+// Returns nothing.
+//
+void STlib_updateMultIcon
+( st_multicon_t*  mi,
+  boolean   refresh )
+{
+   int w;
+   int h;
+   int x;
+   int y;
+
+   if (*mi->on && (mi->oldinum != *mi->inum || refresh))
+   {
+      if (mi->oldinum != -1)
+      {
+         x = mi->x - SHORT(mi->p[mi->oldinum].leftoffset);
+         y = mi->y - SHORT(mi->p[mi->oldinum].topoffset);
+         w = SHORT(mi->p[mi->oldinum].width);
+         h = SHORT(mi->p[mi->oldinum].height);
+
+#ifdef RANGECHECK
+         if (y - ST_Y < 0)
+            I_Error("STlib_updateMultIcon: y - ST_Y < 0");
+#endif
+
+         V_CopyRect(x, y-ST_Y, BG, w, h, x, y, FG, VPT_STRETCH);
+      }
+      if (*mi->inum != -1)  // killough 2/16/98: redraw only if != -1
+         V_DrawNumPatch(mi->x, mi->y, FG, mi->p[*mi->inum].lumpnum, CR_DEFAULT, VPT_STRETCH);
+      mi->oldinum = *mi->inum;
+   }
+}
+
+//
+// STlib_initBinIcon()
+//
+// Initialize a st_binicon_t widget, used for a multinumber display
+// like the status bar's weapons, that are present or not.
+//
+// Passed a st_binicon_t widget, the position, the digit patches, a pointer
+// to the flags representing what is displayed, and pointer to the enable flag
+// Returns nothing.
+//
+void STlib_initBinIcon
+( st_binicon_t* b,
+  int x,
+  int y,
+  const patchnum_t* i,
+  boolean* val,
+  boolean* on )
+{
+   b->x  = x;
+   b->y  = y;
+   b->oldval = 0;
+   b->val  = val;
+   b->on = on;
+   b->p  = i;
+}
+
+//
+// STlib_updateBinIcon()
+//
+// DInitialize a st_binicon_t widget, used for a multinumber display
+// like the status bar's weapons, that are present or not.
+//
+// Draw a st_binicon_t widget, used for a multinumber display
+// like the status bar's weapons that are present or not. Displays each
+// when the control flag changes or refresh is true
+//
+// Passed a st_binicon_t widget, and a refresh flag
+// Returns nothing.
+//
+void STlib_updateBinIcon
+( st_binicon_t*   bi,
+  boolean   refresh )
+{
+   int     x;
+   int     y;
+   int     w;
+   int     h;
+
+   if (*bi->on && (bi->oldval != (signed)*bi->val || refresh))
+   {
+      x = bi->x - SHORT(bi->p->leftoffset);
+      y = bi->y - SHORT(bi->p->topoffset);
+      w = SHORT(bi->p->width);
+      h = SHORT(bi->p->height);
+
+#ifdef RANGECHECK
+      if (y - ST_Y < 0)
+         I_Error("STlib_updateBinIcon: y - ST_Y < 0");
+#endif
+
+      if (*bi->val)
+         V_DrawNumPatch(bi->x, bi->y, FG, bi->p->lumpnum, CR_DEFAULT, VPT_STRETCH);
+      else
+         V_CopyRect(x, y-ST_Y, BG, w, h, x, y, FG, VPT_STRETCH);
+
+      bi->oldval = *bi->val;
+   }
+}