olc_roflags.c

Go to the documentation of this file.

#if defined(macintosh)
#include <types.h>
#else
#include <sys/types.h>
#endif
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "merc.h"
#include "tables.h"
#include "olc.h"
#include "recycle.h"
#include "lookup.h"


void do_rflagall(CHAR_DATA *ch, char *argument)
{
        char arg[MSL];
        char buf[MSL];
        ROOM_INDEX_DATA *pRoom;
        AREA_DATA *pArea;
        int count,vnum,value=0;
        bool found;


        argument = one_argument(argument, arg);

        if (ch->level < 59)
        {
                send_to_char("Huh?\n\r",ch);
                return;
        }

        if (arg[0] == '\0' || argument[0] == '\0')
        {
                send_to_char("Syntax: rflagall [name|sector|room|extended] <flags>\n\r",ch);
                return;
        }

        if (!str_prefix(arg, "name") || !str_prefix(arg, "sector") || !str_prefix(arg, "room")
                        || !str_prefix(arg, "extended"))
        {
                pArea = ch->in_room->area;
                for (vnum=pArea->min_vnum;vnum <=pArea->max_vnum;vnum++)
                {

                        if ((pRoom = get_room_index(vnum)))
                        {
                                found = TRUE;
                                if (!str_prefix(arg, "name"))
                                {
                                        free_string (pRoom->name);
                                        pRoom->name = str_dup (argument);
                                        count++;
                                        continue;
                                }
                                else if (!str_prefix(arg, "sector"))
                                {
                                        if ((value = flag_value (sector_flags, argument)) == NO_FLAG)
                                        {
                                                send_to_char ("Invalid flag. Not setting rooms.\n\r", ch);
                                                return;
                                        }
                                        pRoom->room_flags = value;
                                        count++;
                                        continue;
                                }
                                else if (!str_prefix(arg, "room"))
                                {
                                        if ((value = flag_value(room_flags, argument)) == NO_FLAG)
                                        {
                                                send_to_char("Invalid flag. Not setting rooms.\n\r",ch);
                                                return;
                                        }
                                        pRoom->room_flags = value;
                                        count++;
                                        continue;
                                }
                                 
                else if (!str_prefix(arg, "extended"))
                                {
                                        send_to_char("No extendeds allowed right now.\n\r",ch);
                                        return;
                                }
                                else
                                {
                                        send_to_char("Invalid type.\n\r",ch);
                                        return;
                                }
                        }
                }

                if (found)
                {
                        sprintf(buf, "{c%d{x room",count);
            if (!str_prefix(arg, "name"))
                strcat(buf, " names");
            if (!str_prefix(arg, "sector"))
                strcat(buf, " sector flags");
            if (!str_prefix(arg, "room"))
                strcat(buf, " flags");
            send_to_char(buf,ch);
            sprintf(buf, " set to {c%s{x\n\r", argument);
            send_to_char(buf,ch);
            SET_BIT (ch->in_room->area->area_flags, AREA_CHANGED);
                        count=0;
            return;
                }
                else
                {
                        send_to_char("No rooms in area.\n\r",ch);
                        return;
                }
    }
}

void do_make_bare (CHAR_DATA *ch, char *argument)
{
    send_to_char("Not at this time, buddy!\n\r",ch);
    
    char arg[MSL];
    char buf[MSL];
    AREA_DATA *parea;
    ROOM_INDEX_DATA *pRoom;
    int count,runner=0;
    int iHash;
        
    if (ch->level < 60)
    {
        send_to_char("Huh?\n\r",ch);
        return;
    }
    parea = ch->in_room->area;
    for (count = parea->min_vnum; count <= parea->max_vnum; count++)
    {
        if ((pRoom = get_room_index(count)))
            continue;
        
        pRoom = new_room_index ();
        pRoom->area = parea;
        pRoom->vnum = count;
        pRoom->name = str_dup("New Room");
        pRoom->description = str_dup("Give me a description!");
        
        if (count > top_vnum_room)
            top_vnum_room = count;
        iHash = count % MAX_KEY_HASH;
        pRoom->next = room_index_hash[iHash];
        room_index_hash[iHash] = pRoom;
        runner++;
    }
    sprintf(buf, "%d rooms made in this area.\n\r", runner);
    send_to_char(buf,ch);
    return;
}
        
                            

    
void do_oflagall (CHAR_DATA *ch, char *argument)
{
    OBJ_INDEX_DATA *obj;
    char arg[MSL];
    char buf[MSL];      
    AREA_DATA *pArea;
    int count,vnum,value=0;
    bool found;
    
    argument = one_argument(argument, arg);

    if (arg[0] == '\0' || argument[0] == '\0')
    {
        send_to_char("Syntax: oflagall [name|type|level|wear|extra"
                "|material|condition|weight|cost|short|long|v1|v2|v3|v4] <value>\n\r",ch);
        return;
    }

    /* FIXME: Warning, incoming ugly if statement! */

    if (!str_prefix(arg, "name") || !str_prefix(arg, "type") || !str_prefix(arg, "level")
            || !str_prefix(arg, "wear") || !str_prefix(arg, "extra")
            || !str_prefix(arg, "material") || !str_prefix(arg, "condition")
            || !str_prefix(arg, "weight") || !str_prefix(arg, "cost")
            || !str_prefix(arg, "short") || !str_prefix(arg, "long"))
            /*(|| !str_prefix(arg, "v1") || !str_prefix("v2") || !str_prefix(arg, "v3")
            || !str_prefix(arg, "v4")) *//* YAY! it's over! Time to type: 1 minute, 15 seconds */
            /* Took v0-4 out due to the fact that not every item can be the same thing..
             * and while doing so, i've decided that this whole function is pointless -sigh-*/
    {
        pArea = ch->in_room->area;
        
        for (vnum=pArea->min_vnum;vnum<=pArea->max_vnum;vnum++)
        {
            if ((obj = get_obj_index(vnum)))
            {
                found = TRUE;

                if (!str_prefix(arg, "name"))
                {
                    free_string(obj->name);
                    obj->name = str_dup(argument);
                    count++;
                    continue;
                }
                else if (!str_prefix(arg, "type"))
                {
                    if ((value = flag_value(type_flags, argument)) != NO_FLAG)
                    {
                        obj->item_type = value;
                        obj->value[0]=0;
                        obj->value[1]=0;
                        obj->value[2]=0;
                        obj->value[3]=0;
                        obj->value[4]=0;
                        count++;
                        continue;
                    }
                    else
                    {
                        send_to_char("Invalid flag.\n\r",ch);
                        return;
                    }
                }
                else if (!str_prefix(arg, "level"))
                {
                    value = atoi(argument);
                    if (!is_number(argument) || value < 0 || value > 51)
                    {
                        send_to_char("Level must not exceed max level, and must not be lower than 0.\n\r",ch);
                        return;
                    }

                    obj->level = atoi(argument);
                    count++;
                    continue;
                }
                else if(!str_prefix(arg, "wear"))
                {
                    if ((value = flag_value(wear_flags, argument)) != NO_FLAG)
                    {
                        TOGGLE_BIT(obj->wear_flags, value);
                        count++;
                        continue;
                    }
                    else
                    {
                        send_to_char("Invalid flag.\n\r",ch);
                        return;
                    }
                }
                else if (!str_prefix(arg,"extra"))
                {
                    if ((value = flag_value(extra_flags, argument)) != NO_FLAG)
                    {
                        TOGGLE_BIT(obj->extra_flags, value);
                        count++;
                        continue;
                    }
                    else
                    {
                        send_to_char("Invalid flag.\n\r",ch);
                        return;
                    }
                }
                else if (!str_prefix(arg, "material"))
                {
                    free_string(obj->material);
                    obj->material = str_dup(argument);
                    count++;
                    continue;
                }
                else if (!str_prefix(arg, "condition"))
                {
                    if (!is_number(argument) || atoi(argument) < 0 || atoi(argument) > 100)
                    {
                        send_to_char("Condition must not exceed 100 or be less than 0.\n\r",ch);
                        return;
                    }
                    
                    obj->condition = atoi(argument);
                    count++;
                    continue;
                }
                else if (!str_prefix(arg, "weight"))
                {
                    if (!is_number(argument) || atoi(argument) < 0)
                    {
                        send_to_char("Value must be numberic.\n\r",ch);
                        return;
                    }
                    
                    obj->weight = atoi(argument);
                    count++;
                    continue;
                }
                else if (!str_prefix(arg, "cost"))
                {
                    if (!is_number(argument) || atoi(argument) < 0)
                    {
                        send_to_char("Value must be numeric.\n\r",ch);
                        return;
                    }

                    obj->cost = atoi (argument);
                    count++;
                    continue;
                }
                else if (!str_prefix(arg, "short"))
                {
                    free_string(obj->short_descr);
                    obj->short_descr = str_dup(argument);
                    obj->short_descr[0] = LOWER(obj->short_descr[0]);
                    count++;
                    continue;
                }
                else if (!str_prefix(arg, "long"))
                {
                    free_string(obj->description);
                    obj->description = str_dup(argument);
                    obj->description[0] = UPPER(obj->description[0]);
                    count++;
                    continue;
                }
                else 
                {
                    send_to_char("Invalid syntax.\n\r",ch);
                    return;
                }
            }
        }
        if (found)
        {
            sprintf(buf, "%d items set in area.\n\r",count);
            send_to_char(buf,ch);
            count=0;
            return;
        }
        else
        {
            send_to_char("No items found.\n\r",ch);
            return;
        }
    }
                    
                        
        
    
}
    
    
    

---