/* ************************************************************************
* File: spec_assign.c Part of CircleMUD *
* Usage: Functions to assign function pointers to objs/mobs/rooms *
* *
* All rights reserved. See license.doc for complete information. *
* *
* Copyright (C) 1993, 94 by the Trustees of the Johns Hopkins University *
* CircleMUD is based on DikuMUD, Copyright (C) 1990, 1991. *
************************************************************************ */
#include "conf.h"
#include "sysdep.h"
#include "structs.h"
#include "db.h"
#include "interpreter.h"
#include "utils.h"
extern int dts_are_dumps;
extern int mini_mud;
extern struct room_data *world;
extern struct index_data *mob_index;
extern struct index_data *obj_index;
SPECIAL(dump);
SPECIAL(pet_shops);
SPECIAL(postmaster);
SPECIAL(cityguard);
SPECIAL(receptionist);
SPECIAL(cryogenicist);
SPECIAL(guild_guard);
SPECIAL(guild);
SPECIAL(puff);
SPECIAL(fido);
SPECIAL(janitor);
SPECIAL(snake);
SPECIAL(thief);
SPECIAL(magic_user);
SPECIAL(bank);
SPECIAL(gen_board);
SPECIAL(death);
SPECIAL(arena_guard);
SPECIAL(arena_shop);
SPECIAL(arena_exit);
SPECIAL(convictlist);
void assign_kings_castle(void);
/* local functions */
void assign_mobiles(void);
void assign_objects(void);
void assign_rooms(void);
void ASSIGNROOM(room_vnum room, SPECIAL(fname));
void ASSIGNMOB(mob_vnum mob, SPECIAL(fname));
void ASSIGNOBJ(obj_vnum obj, SPECIAL(fname));
/* functions to perform assignments */
void ASSIGNMOB(mob_vnum mob, SPECIAL(fname))
{
mob_rnum rnum;
if ((rnum = real_mobile(mob)) >= 0)
mob_index[rnum].func = fname;
else if (!mini_mud)
log("SYSERR: Attempt to assign spec to non-existant mob #%d", mob);
}
void ASSIGNOBJ(obj_vnum obj, SPECIAL(fname))
{
obj_rnum rnum;
if ((rnum = real_object(obj)) >= 0)
obj_index[rnum].func = fname;
else if (!mini_mud)
log("SYSERR: Attempt to assign spec to non-existant obj #%d", obj);
}
void ASSIGNROOM(room_vnum room, SPECIAL(fname))
{
room_rnum rnum;
if ((rnum = real_room(room)) >= 0)
world[rnum].func = fname;
else if (!mini_mud)
log("SYSERR: Attempt to assign spec to non-existant room #%d", room);
}
/* ********************************************************************
* Assignments *
******************************************************************** */
/* assign special procedures to mobiles */
void assign_mobiles(void)
{
assign_kings_castle();
ASSIGNMOB(1, puff);
/* Immortal Zone */
ASSIGNMOB(1200, receptionist);
ASSIGNMOB(1201, postmaster);
ASSIGNMOB(1202, janitor);
ASSIGNMOB(99, death);
/* Midgaard */
ASSIGNMOB(3000, magic_user);
ASSIGNMOB(3005, receptionist);
ASSIGNMOB(3010, postmaster);
ASSIGNMOB(3020, guild);
ASSIGNMOB(3021, guild);
ASSIGNMOB(3022, guild);
ASSIGNMOB(3023, guild);
ASSIGNMOB(3024, guild_guard);
ASSIGNMOB(3025, guild_guard);
ASSIGNMOB(3026, guild_guard);
ASSIGNMOB(3027, guild_guard);
ASSIGNMOB(3059, cityguard);
ASSIGNMOB(3060, cityguard);
ASSIGNMOB(3061, janitor);
ASSIGNMOB(3062, fido);
ASSIGNMOB(3066, fido);
ASSIGNMOB(3067, cityguard);
ASSIGNMOB(3068, janitor);
ASSIGNMOB(3095, cryogenicist);
ASSIGNMOB(3081, magic_user); /* Elite Black Mage */
/* MORIA */
ASSIGNMOB(4000, snake);
ASSIGNMOB(4001, snake);
ASSIGNMOB(4053, snake);
ASSIGNMOB(4100, magic_user);
ASSIGNMOB(4102, snake);
ASSIGNMOB(4103, thief);
/* Redferne's */
ASSIGNMOB(7900, cityguard);
/* PYRAMID */
ASSIGNMOB(5300, snake);
ASSIGNMOB(5301, snake);
ASSIGNMOB(5304, thief);
ASSIGNMOB(5305, thief);
ASSIGNMOB(5309, magic_user); /* should breath fire */
ASSIGNMOB(5311, magic_user);
ASSIGNMOB(5313, magic_user); /* should be a cleric */
ASSIGNMOB(5314, magic_user); /* should be a cleric */
ASSIGNMOB(5315, magic_user); /* should be a cleric */
ASSIGNMOB(5316, magic_user); /* should be a cleric */
ASSIGNMOB(5317, magic_user);
/* SEWERS */
ASSIGNMOB(7006, snake);
ASSIGNMOB(7009, magic_user);
ASSIGNMOB(7200, magic_user);
ASSIGNMOB(7201, magic_user);
ASSIGNMOB(7202, magic_user);
/* FOREST */
ASSIGNMOB(6112, magic_user);
ASSIGNMOB(6113, snake);
ASSIGNMOB(6114, magic_user);
ASSIGNMOB(6115, magic_user);
ASSIGNMOB(6116, magic_user); /* should be a cleric */
ASSIGNMOB(6117, magic_user);
/* ARACHNOS */
ASSIGNMOB(6302, magic_user);
ASSIGNMOB(6309, magic_user);
ASSIGNMOB(6312, magic_user);
ASSIGNMOB(6314, magic_user);
ASSIGNMOB(6315, magic_user);
/* Desert */
ASSIGNMOB(5004, magic_user);
ASSIGNMOB(5005, guild_guard); /* brass dragon */
ASSIGNMOB(5010, magic_user);
ASSIGNMOB(5014, magic_user);
/* Drow City */
ASSIGNMOB(5103, magic_user);
ASSIGNMOB(5104, magic_user);
ASSIGNMOB(5107, magic_user);
ASSIGNMOB(5108, magic_user);
/* Old Thalos */
ASSIGNMOB(5200, magic_user);
/* New Thalos */
/* 5481 - Cleric (or Mage... but he IS a high priest... *shrug*) */
ASSIGNMOB(5404, receptionist);
ASSIGNMOB(5421, magic_user);
ASSIGNMOB(5422, magic_user);
ASSIGNMOB(5423, magic_user);
ASSIGNMOB(5424, magic_user);
ASSIGNMOB(5425, magic_user);
ASSIGNMOB(5426, magic_user);
ASSIGNMOB(5427, magic_user);
ASSIGNMOB(5428, magic_user);
ASSIGNMOB(5434, cityguard);
ASSIGNMOB(5440, magic_user);
ASSIGNMOB(5455, magic_user);
ASSIGNMOB(5461, cityguard);
ASSIGNMOB(5462, cityguard);
ASSIGNMOB(5463, cityguard);
ASSIGNMOB(5482, cityguard);
/*
5400 - Guildmaster (Mage)
5401 - Guildmaster (Cleric)
5402 - Guildmaster (Warrior)
5403 - Guildmaster (Thief)
5456 - Guildguard (Mage)
5457 - Guildguard (Cleric)
5458 - Guildguard (Warrior)
5459 - Guildguard (Thief)
*/
/* King Welmar's Castle (not covered in castle.c) */
ASSIGNMOB(12715, thief); /* Ergan... have a better idea? */
/* DWARVEN KINGDOM */
ASSIGNMOB(6500, cityguard);
ASSIGNMOB(6502, magic_user);
ASSIGNMOB(6509, magic_user);
ASSIGNMOB(6516, magic_user);
/* Anapest (125) */
ASSIGNMOB(12504, guild);
ASSIGNMOB(12505, guild);
ASSIGNMOB(12506, guild);
ASSIGNMOB(12507, guild);
ASSIGNMOB(12528, cityguard); /* Lieutenant of the Guard */
ASSIGNMOB(12529, cityguard); /* Captain of the Guard */
ASSIGNMOB(12525, receptionist); /* Polk of Lucky Hotel */
ASSIGNMOB(12509, receptionist); /* Innkeeper of Shaky Knees */
ASSIGNMOB(12526, cityguard); /* Soldiers */
ASSIGNMOB(12527, cityguard); /* rookie soldiers */
/* Volcano (104/121) */
ASSIGNMOB(12024, snake); /* Skeletal Snake */
/* The Shire (14) */
ASSIGNMOB(1400, magic_user); /* Elven Wizard */
ASSIGNMOB(1401, magic_user); /* Keeper of the Ring */
/* Cavecity (150) */
ASSIGNMOB(15000, magic_user); /* The Archmage */
ASSIGNMOB(15005, cityguard); /* Partoll Guard */
ASSIGNMOB(15007, cityguard); /* Chief Guard */
ASSIGNMOB(15008, magic_user); /* Tower Guardian */
ASSIGNMOB(15009, magic_user); /* High Priest */
ASSIGNMOB(15018, magic_user); /* ArchDemon */
ASSIGNMOB(15020, magic_user); /* Apprentice Mage */
/* Valhingen */
ASSIGNMOB(15120, magic_user); /* undead wizard */
/* ROME */
ASSIGNMOB(5709, magic_user);
ASSIGNMOB(5718, cityguard);
ASSIGNMOB(5720, magic_user);
ASSIGNMOB(5721, cityguard);
ASSIGNMOB(5725, magic_user);
ASSIGNMOB(5730, magic_user);
ASSIGNMOB(5731, magic_user);
ASSIGNMOB(5732, magic_user);
/* Stagneg Village (33) */
ASSIGNMOB(3309, receptionist);
/* Lauriuel (78) */
ASSIGNMOB(7811, magic_user); /* Elven Mage */
ASSIGNMOB(7800, magic_user); /* Huge Blue Dragon */
/* The Elven Woods */
ASSIGNMOB(10909, receptionist); /* Elf Receptionist */
}
/* assign special procedures to objects */
void assign_objects(void)
{
ASSIGNOBJ(3096, gen_board); /* social board */
ASSIGNOBJ(3097, gen_board); /* freeze board */
ASSIGNOBJ(3098, gen_board); /* immortal board */
ASSIGNOBJ(3099, gen_board); /* mortal board */
ASSIGNOBJ(3094, gen_board); /* Quest Dev Board */
ASSIGNOBJ(3095, gen_board); /* Coding Board */
/* Clan board assignments */
ASSIGNOBJ(3161, gen_board); /* Clan 1 Board */
ASSIGNOBJ(3165, gen_board); /* Clan 2 Board */
ASSIGNOBJ(12586, convictlist); /* List of Convicts */
ASSIGNOBJ(3034, bank); /* atm */
ASSIGNOBJ(3036, bank); /* cashcard */
}
/* assign special procedures to rooms */
void assign_rooms(void)
{
room_rnum i;
ASSIGNROOM(3030, dump);
ASSIGNROOM(12610, pet_shops);
ASSIGNROOM(3701, arena_shop);
ASSIGNROOM(3702, arena_guard);
ASSIGNROOM(3703, arena_guard);
ASSIGNROOM(3751, arena_exit);
if (dts_are_dumps)
for (i = 0; i <= top_of_world; i++)
if (ROOM_FLAGGED(i, ROOM_DEATH))
world[i].func = dump;
}