src/hcode/btech/btech.c

Go to the documentation of this file.

/*
 * $Id: btech.c,v 1.1.1.1 2005/01/11 21:18:02 kstevens Exp $
 *
 * Author: Markus Stenberg <fingon@iki.fi>
 *
 *  Copyright (c) 1996 Markus Stenberg
 *  Copyright (c) 1998-2002 Thomas Wouters
 *  Copyright (c) 2000-2002 Cord Awtry
 *       All rights reserved
 *
 * Created: Thu Sep 19 21:59:09 1996 fingon
 * Last modified: Tue Aug 12 19:39:55 1997 fingon
 *
 */

/*
   Local btech alike stuff for MUX.
   Work's based on MUSE's btechstats.c
 */

#include "interface.h"
#include "mech.h"
#include "create.h"
#include "btechstats_global.h"
#include "coolmenu.h"
#include "mycool.h"
#include "p.mech.utils.h"
#include "p.glue.scode.h"

extern HASHTAB playervaluehash;
extern HASHTAB playervaluehash2;

#define IsHCO(ref) WizP(ref)

void do_show(dbref player, dbref cause, int key, char *arg1, char *arg2)
{
        int i;
        enum {
                CHAVA, CHVAL, CHSKI, CHADV, CHATT,
                MECHVALUES
        };
        char *cmds[] = { "allvalues",
                "values", "skills", "advantages",
                "attributes", "xcodevalues", NULL
        };
        char *cmds_help[] = { "[char_]allvalues", "[char_]values",
                "[char_]skills", "[char_]advantages", "[char_]attributes",
                "xcodevalues [scode]", NULL
        };
        char buf[MBUF_SIZE];

        DOCHECK(!IsHCO(player), "You aren't cleared to know this stuff yet!");

        if(!arg1 || !*arg1) {
                strcpy(buf, "Valid arguments:");
                for(i = 0; cmds_help[i]; i++)
                        sprintf(buf + strlen(buf), "%c %s", i > 0 ? ',' : ' ',
                                        cmds_help[i]);
                notify(player, buf);
                return;
        }
        i = listmatch(cmds, arg1);
        /* Do da cmd */
        switch (i) {
        case MECHVALUES:
                list_xcodevalues(player);
                return;
        case CHAVA:
                list_charvaluestuff(player, -1);
                return;
        case CHVAL:
                list_charvaluestuff(player, CHAR_VALUE);
                return;
        case CHSKI:
                list_charvaluestuff(player, CHAR_SKILL);
                return;
        case CHADV:
                list_charvaluestuff(player, CHAR_ADVANTAGE);
                return;
        case CHATT:
                list_charvaluestuff(player, CHAR_ATTRIBUTE);
                return;
        }
        notify(player, "Invalid arguments to +show command!");
        return;
}

---