Hey everybody,

       As some of you may remember, I added cell phones to my MUD a coupla 
months ago, using the 10 digit ID number as a phone number.  Well, this is a 
rather long number, and hard to remember, so I have been trying to use a 
system like the aliases to store numbers and match them with a name, which 
can then be easily used from my phone command (store John 1034627163, phone 
John will dial 1034627163) but I can't get it to store the numbers, just a 
long list of errors on compile.  I think it has something to do with the fact 
that the second part has to be a number, not a string, but I have no idea how 
to get it to work.  I'm attaching my alias code to this message, if anyone 
out there has time, I'd greatly appreciate help altering the alias/unalias 
commands into phonestore/phonelist/phoneremove commands.

Thanks in advance,
Zack

Drug Wars MUD,
dwmud.ods.org 2528
http://fly.to/dwmud
/***************************************************************************
 *  Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer,        *
 *  Michael Seifert, Hans Henrik St{rfeldt, Tom Madsen, and Katja Nyboe.   *
 *                                                                         *
 *  Merc Diku Mud improvments copyright (C) 1992, 1993 by Michael          *
 *  Chastain, Michael Quan, and Mitchell Tse.                              *
 *                                                                         *
 *  In order to use any part of this Merc Diku Mud, you must comply with   *
 *  both the original Diku license in 'license.doc' as well the Merc       *
 *  license in 'license.txt'.  In particular, you may not remove either of *
 *  these copyright notices.                                               *
 *                                                                         *
 *  Much time and thought has gone into this software and you are          *
 *  benefitting.  We hope that you share your changes too.  What goes      *
 *  around, comes around.                                                  *
 ***************************************************************************/
 
/***************************************************************************
*       ROM 2.4 is copyright 1993-1998 Russ Taylor                         *
*       ROM has been brought to you by the ROM consortium                  *
*           Russ Taylor ([EMAIL PROTECTED])                                *
*           Gabrielle Taylor ([EMAIL PROTECTED])                           *
*           Brian Moore ([EMAIL PROTECTED])                                     
   *
*       By using this code, you have agreed to follow the terms of the     *
*       ROM license, in the file Rom24/doc/rom.license                     *
***************************************************************************/

#if defined(macintosh)
#include <types.h>
#else
#include <sys/types.h>
#endif
#include <stdio.h>
#include <string.h>
#include <time.h>
#include "merc.h"

/* does aliasing and other fun stuff */
void substitute_alias(DESCRIPTOR_DATA *d, char *argument)
{
    CHAR_DATA *ch;
    char buf[MAX_STRING_LENGTH],prefix[MAX_INPUT_LENGTH],name[MAX_INPUT_LENGTH];
    char *point;
    int alias;

    ch = d->original ? d->original : d->character;

    /* check for prefix */
    if (ch->prefix[0] != '\0' && str_prefix("prefix",argument))
    {
        if (strlen(ch->prefix) + strlen(argument) > MAX_INPUT_LENGTH)
            send_to_char("Line to long, prefix not processed.\r\n",ch);
        else
        {
            sprintf(prefix,"%s %s",ch->prefix,argument);
            argument = prefix;
        }
    }

    if (IS_NPC(ch) || ch->pcdata->alias[0] == NULL
    ||  !str_prefix("alias",argument) || !str_prefix("una",argument) 
    ||  !str_prefix("prefix",argument)) 
    {
        interpret(d->character,argument);
        return;
    }

    strcpy(buf,argument);

    for (alias = 0; alias < MAX_ALIAS; alias++)  /* go through the aliases */
    {
        if (ch->pcdata->alias[alias] == NULL)
            break;

        if (!str_prefix(ch->pcdata->alias[alias],argument))
        {
            point = one_argument(argument,name);
            if (!strcmp(ch->pcdata->alias[alias],name))
            {
                buf[0] = '\0';
                strcat(buf,ch->pcdata->alias_sub[alias]);
                strcat(buf," ");
                strcat(buf,point);

                if (strlen(buf) > MAX_INPUT_LENGTH - 1)
                {
                    send_to_char(
                        "Alias substitution too long. Truncated.\r\n",ch);
                    buf[MAX_INPUT_LENGTH -1] = '\0';
                }
                break;
            }
        }
    }
    interpret(d->character,buf);
}

void do_alia(CHAR_DATA *ch, char *argument)
{
    send_to_char("I'm sorry, alias must be entered in full.\n\r",ch);
    return;
}

void do_alias(CHAR_DATA *ch, char *argument)
{
    CHAR_DATA *rch;
    char arg[MAX_INPUT_LENGTH],buf[MAX_STRING_LENGTH];
    int pos;

    smash_tilde(argument);

    if (ch->desc == NULL)
        rch = ch;
    else
        rch = ch->desc->original ? ch->desc->original : ch;

    if (IS_NPC(rch))
        return;

    argument = one_argument(argument,arg);
    

    if (arg[0] == '\0')
    {

        if (rch->pcdata->alias[0] == NULL)
        {
            send_to_char("You have no aliases defined.\n\r",ch);
            return;
        }
        send_to_char("Your current aliases are:\n\r",ch);

        for (pos = 0; pos < MAX_ALIAS; pos++)
        {
            if (rch->pcdata->alias[pos] == NULL
            ||  rch->pcdata->alias_sub[pos] == NULL)
                break;

            sprintf(buf,"    %s:  %s\n\r",rch->pcdata->alias[pos],
                    rch->pcdata->alias_sub[pos]);
            send_to_char(buf,ch);
        }
        return;
    }

    if (!str_prefix("una",arg) || !str_cmp("alias",arg))
    {
        send_to_char("Sorry, that word is reserved.\n\r",ch);
        return;
    }

    if (argument[0] == '\0')
    {
        for (pos = 0; pos < MAX_ALIAS; pos++)
        {
            if (rch->pcdata->alias[pos] == NULL
            ||  rch->pcdata->alias_sub[pos] == NULL)
                break;

            if (!str_cmp(arg,rch->pcdata->alias[pos]))
            {
                sprintf(buf,"%s aliases to '%s'.\n\r",rch->pcdata->alias[pos],
                        rch->pcdata->alias_sub[pos]);
                send_to_char(buf,ch);
                return;
            }
        }

        send_to_char("That alias is not defined.\n\r",ch);
        return;
    }

    if (!str_prefix(argument,"delete") || !str_prefix(argument,"prefix"))
    {
        send_to_char("That shall not be done!\n\r",ch);
        return;
    }

    for (pos = 0; pos < MAX_ALIAS; pos++)
    {
        if (rch->pcdata->alias[pos] == NULL)
            break;

        if (!str_cmp(arg,rch->pcdata->alias[pos])) /* redefine an alias */
        {
            free_string(rch->pcdata->alias_sub[pos]);
            rch->pcdata->alias_sub[pos] = str_dup(argument);
            sprintf(buf,"%s is now realiased to '%s'.\n\r",arg,argument);
            send_to_char(buf,ch);
            return;
        }
     }

     if (pos >= MAX_ALIAS)
     {
        send_to_char("Sorry, you have reached the alias limit.\n\r",ch);
        return;
     }
  
     /* make a new alias */
     rch->pcdata->alias[pos]            = str_dup(arg);
     rch->pcdata->alias_sub[pos]        = str_dup(argument);
     sprintf(buf,"%s is now aliased to '%s'.\n\r",arg,argument);
     send_to_char(buf,ch);
}


void do_unalias(CHAR_DATA *ch, char *argument)
{
    CHAR_DATA *rch;
    char arg[MAX_INPUT_LENGTH];
    int pos;
    bool found = FALSE;
 
    if (ch->desc == NULL)
        rch = ch;
    else
        rch = ch->desc->original ? ch->desc->original : ch;
 
    if (IS_NPC(rch))
        return;
 
    argument = one_argument(argument,arg);

    if (arg[0] == '\0')
    {
        send_to_char("Unalias what?\n\r",ch);
        return;
    }

    for (pos = 0; pos < MAX_ALIAS; pos++)
    {
        if (rch->pcdata->alias[pos] == NULL)
            break;

        if (found)
        {
            rch->pcdata->alias[pos-1]           = rch->pcdata->alias[pos];
            rch->pcdata->alias_sub[pos-1]       = rch->pcdata->alias_sub[pos];
            rch->pcdata->alias[pos]             = NULL;
            rch->pcdata->alias_sub[pos]         = NULL;
            continue;
        }

        if(!strcmp(arg,rch->pcdata->alias[pos]))
        {
            send_to_char("Alias removed.\n\r",ch);
            free_string(rch->pcdata->alias[pos]);
            free_string(rch->pcdata->alias_sub[pos]);
            rch->pcdata->alias[pos] = NULL;
            rch->pcdata->alias_sub[pos] = NULL;
            found = TRUE;
        }
    }

    if (!found)
        send_to_char("No alias of that name to remove.\n\r",ch);
}

     













Reply via email to