The beginnings of dehacked support

Subversion-branch: /trunk/chocolate-doom
Subversion-revision: 153

1 files changed, 200 insertions, 0 deletions

diff --git a/src/deh_thing.c b/src/deh_thing.c
new file mode 100644
index 00000000..f4c79f6c
--- /dev/null
+++ b/src/deh_thing.c
@@ -0,0 +1,200 @@
+// Emacs style mode select   -*- C++ -*- 
+//-----------------------------------------------------------------------------
+//
+// $Id: deh_thing.c 153 2005-10-02 23:49:01Z fraggle $
+//
+// Copyright(C) 2005 Simon Howard
+//
+// 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.
+//
+// $Log$
+// Revision 1.1  2005/10/02 23:49:01  fraggle
+// The beginnings of dehacked support
+//
+//
+//-----------------------------------------------------------------------------
+//
+// Parses "Thing" sections in dehacked files
+//
+//-----------------------------------------------------------------------------
+
+#include <stdlib.h>
+
+#include "doomdef.h"
+#include "doomtype.h"
+
+#include "deh_defs.h"
+#include "deh_main.h"
+
+#include "info.h"
+
+static void *DEH_ThingStart(deh_context_t *context, char *line)
+{
+    int thing_number = 0;
+    mobjinfo_t *mobj;
+    
+    sscanf(line, "Thing %i", &thing_number);
+
+    // dehacked files are indexed from 1
+    --thing_number;
+
+    if (thing_number < 0 || thing_number >= NUMMOBJTYPES)
+        return NULL;
+    
+    mobj = &mobjinfo[thing_number];
+    
+    return mobj;
+}
+
+static void DEH_ThingEnd(deh_context_t *context, void *tag)
+{
+}
+
+static void DEH_ThingParseLine(deh_context_t *context, char *line, void *tag)
+{
+    mobjinfo_t *mobj;
+    char *variable_name, *value;
+    int ivalue;
+    
+    if (tag == NULL)
+       return;
+
+    mobj = (mobjinfo_t *) tag;
+
+    // Parse the assignment
+
+    if (!DEH_ParseAssignment(line, &variable_name, &value))
+    {
+        // Failed to parse
+
+        return;
+    }
+    
+//    printf("Set %s to %s for mobj\n", variable_name, value);
+
+    // all values are integers
+
+    ivalue = atoi(value);
+    
+    // set the appropriate field
+
+    if (!strcasecmp(variable_name, "ID #"))
+    {
+        mobj->doomednum = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Initial frame"))
+    {
+        mobj->spawnstate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Hit points"))
+    {
+        mobj->spawnhealth = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "First moving frame"))
+    {
+        mobj->seestate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Alert sound"))
+    {
+        mobj->seesound = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Reaction time"))
+    {
+        mobj->reactiontime = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Attack sound"))
+    {
+        mobj->attacksound = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Injury frame"))
+    {
+        mobj->painstate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Pain chance"))
+    {
+        mobj->painchance = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Pain sound"))
+    {
+        mobj->painsound = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Close attack frame"))
+    {
+        mobj->meleestate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Far attack frame"))
+    {
+        mobj->missilestate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Death frame"))
+    {
+        mobj->deathstate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Exploding frame"))
+    {
+        mobj->xdeathstate = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Death sound"))
+    {
+        mobj->deathsound = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Speed"))
+    {
+        mobj->speed = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Width"))
+    {
+        mobj->radius = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Height"))
+    {
+        mobj->height = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Mass"))
+    {
+        mobj->mass = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Missile damage"))
+    {
+        mobj->damage = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Action sound"))
+    {
+        mobj->activesound = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Bits"))
+    {
+        mobj->flags = ivalue;
+    }
+    else if (!strcasecmp(variable_name, "Respawn frame"))
+    {
+        mobj->raisestate = ivalue;
+    }
+    else
+    {
+        printf("Unknown variable name %s\n", variable_name);
+    }
+}
+
+deh_section_t deh_section_thing =
+{
+    "Thing",
+    NULL,
+    DEH_ThingStart,
+    DEH_ThingParseLine,
+    DEH_ThingEnd,
+};
+