/***************************************************************************
* 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. *
* *
* Dystopia Mud improvements copyright (C) 2000, 2001 by Brian Graversen *
* *
* 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. *
***************************************************************************/
#include <sys/types.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "merc.h"
void do_logstat(CHAR_DATA *ch, char *argument)
{
char buf[MAX_STRING_LENGTH];
int ratio, mspusers, a, b, c;
if (IS_NPC(ch)) return;
sprintf(buf, "Total Players Created : %d players\n\r", top_playerid);
send_to_char(buf, ch);
a = mudinfo[MUDINFO_UPDATED] / 120;
b = a / 24;
c = a - b * 24;
sprintf(buf, "Mudinfo : Days running : %d days and %d hours\n\r", b, c);
send_to_char(buf, ch);
sprintf(buf, "Players : Average Online : %d\n\r",
(mudinfo[MUDINFO_MCCP_USERS] + mudinfo[MUDINFO_OTHER_USERS])/mudinfo[MUDINFO_UPDATED]);
send_to_char(buf, ch);
sprintf(buf, "Players : Peak Online : %d\n\r", mudinfo[MUDINFO_PEAK_USERS]);
send_to_char(buf, ch);
ratio = (100 * mudinfo[MUDINFO_MCCP_USERS] / (mudinfo[MUDINFO_MCCP_USERS] + mudinfo[MUDINFO_OTHER_USERS]));
sprintf(buf, "Players : Mccp Users : %d %%\n\r", ratio);
send_to_char(buf, ch);
mspusers = (100 * mudinfo[MUDINFO_MSP_USERS] /
(mudinfo[MUDINFO_MCCP_USERS] + mudinfo[MUDINFO_OTHER_USERS]));
sprintf(buf, "Players : MSP Users : %d %%\n\r", mspusers);
send_to_char(buf, ch);
/*
* a : Amount of kbit data send totally.
* b : Amount of kbit data send each 10 seconds
* c : The fractional part
*/
a = mudinfo[MUDINFO_MBYTE] * 1024 + mudinfo[MUDINFO_BYTE] / 1024;
b = a / (mudinfo[MUDINFO_UPDATED] * 3);
c = b / 10;
c = c * 10;
c = b - c;
sprintf(buf, "Datatransfer : Average Rate : %d.%d kb/sec\n\r", b/10, c);
send_to_char(buf, ch);
b = mudinfo[MUDINFO_DATA_PEAK] / (3 * 1024);
c = b / 10;
c = c * 10;
c = b - c;
sprintf(buf, "Datatransfer : Peak Rate : %d.%d kb/sec\n\r", b/10, c);
send_to_char(buf, ch);
sprintf(buf, "Datatransfer : This Week : %d MB\n\r", mudinfo[MUDINFO_MBYTE]);
send_to_char(buf, ch);
sprintf(buf, "Datatransfer : This Boot : %d MB\n\r", mudinfo[MUDINFO_MBYTE_S]);
send_to_char(buf, ch);
return;
}
void do_noset(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
one_argument(argument, arg);
if (IS_NPC(ch)) return;
if ((victim = get_char_world(ch, arg)) == NULL)
{
send_to_char("No such player.\n\r", ch);
return;
}
if (IS_NPC(victim))
{
send_to_char("Not on mobiles.\n\r", ch);
return;
}
if (IS_SET(victim->pcdata->jflags, JFLAG_NOSET))
{
REMOVE_BIT(victim->pcdata->jflags, JFLAG_NOSET);
send_to_char("Noset removed.\n\r", ch);
send_to_char("You can set your messages again.\n\r", victim);
return;
}
free_string(victim->pcdata->loginmessage);
victim->pcdata->loginmessage = str_dup("");
free_string(victim->pcdata->logoutmessage);
victim->pcdata->logoutmessage = str_dup("");
free_string(victim->pcdata->decapmessage);
victim->pcdata->decapmessage = str_dup("");
free_string(victim->pcdata->tiemessage);
victim->pcdata->tiemessage = str_dup("");
free_string(victim->pcdata->avatarmessage);
victim->pcdata->avatarmessage = str_dup("");
REMOVE_BIT(victim->pcdata->jflags, JFLAG_SETTIE);
REMOVE_BIT(victim->pcdata->jflags, JFLAG_SETAVATAR);
REMOVE_BIT(victim->pcdata->jflags, JFLAG_SETLOGIN);
REMOVE_BIT(victim->pcdata->jflags, JFLAG_SETLOGOUT);
REMOVE_BIT(victim->pcdata->jflags, JFLAG_SETDECAP);
SET_BIT(victim->pcdata->jflags, JFLAG_NOSET);
send_to_char("Ok.\n\r", ch);
send_to_char("All your custom messages have been removed, and you can no longer change your messages.\n\r", victim);
return;
}
/* Don't play around with this, to much can cause problems */
void do_specfind(CHAR_DATA *ch, char *argument)
{
int value,i;
ROOM_INDEX_DATA *pRoomIndex;
char buf[MAX_STRING_LENGTH];
if (!str_cmp(ch->name, "jobo"))
{
send_to_char("This command can crash the mud if used with the wrong argument, don't use it!\n\r", ch);
return;
}
value = atoi(argument);
for (i=1; i < 200000; i++)
{
pRoomIndex = get_room_index( i );
if ( pRoomIndex != NULL )
{
if (IS_SET(pRoomIndex->room_flags, value))
{
sprintf(buf,"Room (%d) has the flag set\n\r",i);
send_to_char(buf,ch);
}
}
}
return;
}
void do_itemwearfind(CHAR_DATA *ch, char *argument)
{
int value,i;
OBJ_INDEX_DATA *index;
char buf[MAX_STRING_LENGTH];
if (!str_cmp(ch->name, "jobo"))
{
send_to_char("This command can crash the mud if used with the wrong argument, don't use it!\n\r", ch);
return;
}
value = atoi(argument);
for (i=1; i < 200000; i++)
{
index = get_obj_index( i );
if (index != NULL)
{
if (IS_SET(index->wear_flags, value))
{
sprintf(buf,"Object (%d) has the flag set\n\r",i);
send_to_char(buf,ch);
}
}
}
return;
}
void do_multicheck(CHAR_DATA *ch, char *argument)
{
DESCRIPTOR_DATA *d;
DESCRIPTOR_DATA *d2;
char buf[MAX_STRING_LENGTH];
bool found = FALSE;
for ( d = descriptor_list; d != NULL; d = d->next )
{
if (d->lookup_status != STATUS_DONE) continue;
if (d->connected != CON_PLAYING) continue;
for ( d2 = d->next; d2 != NULL; d2 = d2->next )
{
if (d2->lookup_status != STATUS_DONE) continue;
if (!str_cmp(d->host, d2->host))
{
if (d2->connected != CON_PLAYING) continue;
if (d2->character == NULL || d->character == NULL) continue;
found = TRUE;
sprintf(buf, "%s and %s are multiplaying bitches\n\r",d2->character->name, d->character->name);
send_to_char(buf,ch);
}
}
}
if (!found) send_to_char("Noone is multiplaying atm.\n\r",ch);
return;
}
void do_slay2(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
one_argument(argument, arg);
if (IS_NPC(ch)) return;
if (ch->level < 12) return;
if ((victim = get_char_room(ch, arg)) == NULL)
{
send_to_char("Garotte whom?\n\r", ch );
return;
}
if (victim == ch)
{
send_to_char("That would be a bad idea.\n\r", ch );
return;
}
if (is_safe(ch, victim)) return;
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
one_hit(ch,victim, gsn_supreme,1);
return;
}
void do_openthearena( CHAR_DATA *ch, char *argument )
{
if (IS_NPC(ch)) return;
if (arena_open) return;
arena_open = TRUE;
return;
}
void do_showsilence( CHAR_DATA *ch, char *argument )
{
DESCRIPTOR_DATA *d;
CHAR_DATA *gch;
char buf[MAX_STRING_LENGTH];
bool found = FALSE;
if (IS_NPC(ch)) return;
for ( d = descriptor_list; d != NULL; d = d->next )
{
if ( d->connected != CON_PLAYING) continue;
if ( d->character != NULL ) gch = d->character;
else continue;
if (gch->level > 6) continue;
if (IS_SET(gch->act, PLR_SILENCE))
{
found = TRUE;
sprintf(buf,"%-15s is silenced\n\r",gch->name);
send_to_char(buf,ch);
}
}
if (!found) send_to_char("Noone is silenced.\n\r",ch);
return;
}
void do_showsounds(CHAR_DATA *ch, char *argument)
{
DESCRIPTOR_DATA *d;
CHAR_DATA *gch;
char buf[MAX_STRING_LENGTH];
bool found = FALSE;
if (IS_NPC(ch)) return;
for ( d = descriptor_list; d != NULL; d = d->next )
{
if ( d->connected != CON_PLAYING) continue;
if ( d->character != NULL ) gch = d->character;
else continue;
if (gch->level > 6) continue;
if (IS_SET(gch->act, PLR_SOUND))
{
found = TRUE;
sprintf(buf,"%-15s uses sounds\n\r",gch->name);
send_to_char(buf,ch);
}
}
if (!found) send_to_char("Noone uses sounds.\n\r",ch);
return;
}
void do_asperson(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
DESCRIPTOR_DATA *tmp;
char arg[MAX_INPUT_LENGTH];
bool afk = FALSE;
argument = one_argument(argument, arg);
if (IS_NPC(ch)) return;
if ((victim = get_char_world(ch, arg)) == NULL)
{
send_to_char("They are not here.\n\r", ch );
return;
}
if (victim == ch)
{
send_to_char("That would be a bad idea.\n\r", ch );
return;
}
if (IS_NPC(victim))
{
send_to_char("Not on mobiles.\n\r",ch);
return;
}
tmp = victim->desc;
victim->desc = ch->desc;
if (IS_SET(victim->extra, EXTRA_AFK))
{
afk = TRUE;
REMOVE_BIT(victim->extra, EXTRA_AFK);
}
interpret(victim, argument);
victim->desc = tmp;
if (afk) SET_BIT(victim->extra, EXTRA_AFK);
return;
}
void do_faith(CHAR_DATA *ch, char *argument)
{
DESCRIPTOR_DATA *d;
CHAR_DATA *gch;
char buf[MAX_STRING_LENGTH];
for (d = descriptor_list ;d ; d = d->next)
{
if (d->lookup_status != STATUS_DONE) continue;
if (d->connected != CON_PLAYING) continue;
if ((gch = d->character) != NULL)
{
if (gch->pcdata->faith < 1) continue;
sprintf(buf,"%-14s - %3d/%-3d faithpoints\n\r", gch->name, gch->pcdata->current_faith, gch->pcdata->faith);
send_to_char(buf,ch);
}
}
return;
}
void do_bully(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
argument = one_argument(argument, arg);
if (IS_NPC(ch)) return;
if (ch->level < MAX_LEVEL) return;
if ((victim = get_char_world(ch, arg)) == NULL)
{
send_to_char("They are not here.\n\r", ch );
return;
}
if (victim == ch)
{
send_to_char("That would be a bad idea.\n\r", ch );
return;
}
if (IS_NPC(victim))
{
send_to_char("Not on mobiles.\n\r",ch);
return;
}
if (IS_SET(victim->pcdata->jflags, JFLAG_BULLY))
{
REMOVE_BIT(victim->pcdata->jflags, JFLAG_BULLY);
send_to_char("You are to nice.\n\r",ch);
}
else
{
SET_BIT(victim->pcdata->jflags, JFLAG_BULLY);
send_to_char("Take that bully.\n\r",ch);
}
return;
}
void do_offline(CHAR_DATA *ch, char *argument)
{
DESCRIPTOR_DATA *dummy;
DESCRIPTOR_DATA *temp;
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
argument = one_argument(argument, arg);
if (IS_NPC(ch)) return;
if (ch->level < MAX_LEVEL)
{
send_to_char("This action is restricted.\n\r", ch);
return;
}
if (strlen(arg) < 3)
{
send_to_char("What player do you wish to load?\n\r", ch);
return;
}
if (argument[0] == '\0')
{
send_to_char("What do you want the player to do?\n\r", ch);
return;
}
arg[0] = UPPER(arg[0]);
if (descriptor_free == NULL )
{
dummy = alloc_perm(sizeof(*dummy));
}
else
{
dummy = descriptor_free;
descriptor_free = descriptor_free->next;
}
if (load_char_obj(dummy, arg))
{
victim = dummy->character;
temp = victim->desc;
victim->desc = ch->desc;
interpret(victim, argument);
victim->desc = temp;
}
else
{
send_to_char("Player doesn't exist.\n\r", ch);
dummy->next = descriptor_free;
descriptor_free = dummy;
return;
}
/*
* Clean up.
*/
save_char_obj(victim);
free_char(victim);
dummy->next = descriptor_free;
descriptor_free = dummy;
return;
}
void do_newban(CHAR_DATA *ch, char *argument)
{
char buf[MAX_STRING_LENGTH];
char arg[MAX_INPUT_LENGTH];
BAN_DATA *pban;
if (IS_NPC(ch)) return;
argument = one_argument( argument, arg );
if (arg[0] == '\0')
{
strcpy(buf, "Newbie Banned sites:\n\r");
for (pban = newbieban_list; pban != NULL; pban = pban->next)
{
strcat(buf, pban->name);
strcat(buf, " (");
strcat(buf, pban->reason);
strcat(buf, ")\n\r");
}
send_to_char(buf, ch);
return;
}
for (pban = newbieban_list; pban != NULL; pban = pban->next)
{
if (!str_cmp(arg, pban->name))
{
send_to_char("That site is already banned!\n\r", ch);
return;
}
}
if (newbieban_free == NULL)
{
pban = alloc_perm(sizeof(*pban));
}
else
{
pban = newbieban_free;
newbieban_free = newbieban_free->next;
}
pban->name = str_dup( arg );
if (argument[0] == '\0') pban->reason = str_dup("no reason given");
else pban->reason = str_dup(argument);
pban->next = newbieban_list;
newbieban_list = pban;
send_to_char("Ok.\n\r", ch );
save_newbiebans();
return;
}
void do_newallow(CHAR_DATA *ch, char *argument)
{
char arg[MAX_INPUT_LENGTH];
BAN_DATA *prev;
BAN_DATA *curr;
one_argument( argument, arg );
if ( arg[0] == '\0' )
{
send_to_char( "Remove which site from the ban list?\n\r", ch );
return;
}
prev = NULL;
for (curr = newbieban_list; curr != NULL; prev = curr, curr = curr->next )
{
if ( !str_cmp( arg, curr->name ) )
{
if (prev == NULL)
newbieban_list = newbieban_list->next;
else
prev->next = curr->next;
free_string( curr->name );
free_string( curr->reason );
curr->next = newbieban_free;
newbieban_free = curr;
send_to_char( "Ok.\n\r", ch );
save_newbiebans();
return;
}
}
send_to_char("Site is not banned.\n\r", ch );
return;
}
void do_logstatclear(CHAR_DATA *ch, char *argument)
{
int i;
if (IS_NPC(ch)) return;
for (i = 0; i < MUDINFO_MAX; i++)
{
mudinfo[i] = 0;
}
update_mudinfo();
send_to_char("Cleared.\n\r", ch);
return;
}
void do_topclear( CHAR_DATA *ch, char *argument )
{
int i;
if (IS_NPC(ch)) return;
if (ch->level < MAX_LEVEL) return;
for (i = 1; i <= MAX_TOP_PLAYERS; i++)
{
top_board[i].pkscore = 0;
free_string(top_board[i].name);
top_board[i].name = str_dup("Noone");
}
save_topboard();
send_to_char("Top cleared.\n\r",ch);
return;
}
void do_leaderclear(CHAR_DATA *ch, char *argument )
{
if (IS_NPC(ch)) return;
if (ch->level < 7) return;
free_string(leader_board.pkscore_name);
leader_board.pkscore_name = str_dup("Noone");
leader_board.pkscore_number = 0;
free_string(leader_board.pk_name);
leader_board.pk_name = str_dup("Noone");
leader_board.pk_number = 0;
free_string(leader_board.mobkills_name);
leader_board.mobkills_name = str_dup("Noone");
leader_board.mobkills_number = 0;
free_string(leader_board.quest_name);
leader_board.quest_name = str_dup("Noone");
leader_board.quest_number = 0;
free_string(leader_board.time_name);
leader_board.time_name = str_dup("Noone");
leader_board.time_number = 0;
free_string(leader_board.arena_name);
leader_board.arena_name = str_dup("Noone");
leader_board.arena_number = 0;
save_leaderboard();
send_to_char("Leader board cleared.\n\r",ch);
return;
}
void do_ccenter(CHAR_DATA *ch, char *argument)
{
char arg1[MAX_INPUT_LENGTH];
char arg2[MAX_INPUT_LENGTH];
char buf[MAX_STRING_LENGTH];
argument = one_argument(argument, arg1);
one_argument(argument, arg2);
if (arg1[0] == '\0')
{
sprintf(buf, " #0[#G***#0] #yDystopian Control Center #0[#G***#0]#n\n\r\n\r");
send_to_char(buf, ch);
sprintf(buf, " #R(#0lexp#R) #yMinimum Experience #G%7d#n\n\r", ccenter[CCENTER_MIN_EXP]);
send_to_char(buf, ch);
sprintf(buf, " #R(#0uexp#R) #yMaximum Experience #G%7d#n\n\r", ccenter[CCENTER_MAX_EXP]);
send_to_char(buf, ch);
sprintf(buf, " #R(#0elvl#R) #yExperience Level #G%3d#n\n\r", ccenter[CCENTER_EXP_LEVEL]);
send_to_char(buf, ch);
sprintf(buf, " #R(#0qdbn#R) #yQuestors Delight Bonus #G%d#n\n\r", ccenter[CCENTER_QD_MULT]);
send_to_char(buf, ch);
sprintf(buf, " #R(#0hhbn#R) #yHappy Hour Bonus #G%3d#n\n\r", ccenter[CCENTER_HH_BONUS]);
send_to_char(buf, ch);
sprintf(buf, " #R(#0qdtm#R) #yQuestors Delight Time #G%3d#n\n\r", ccenter[CCENTER_QD_TIME]);
send_to_char(buf, ch);
sprintf(buf, " #R(#0hhtm#R) #yHappy Hour Time #G%3d#n\n\r", ccenter[CCENTER_HH_TIME]);
send_to_char(buf, ch);
send_to_char("\n\r\n\r'ccenter reset' to restore default values.\n\r", ch);
return;
}
if (!str_cmp(arg1, "lexp"))
{
ccenter[CCENTER_MIN_EXP] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "uexp"))
{
ccenter[CCENTER_MAX_EXP] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "elvl"))
{
ccenter[CCENTER_EXP_LEVEL] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "qdbn"))
{
ccenter[CCENTER_QD_MULT] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "hhbn"))
{
ccenter[CCENTER_HH_BONUS] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "qdtm"))
{
ccenter[CCENTER_QD_TIME] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "hhtm"))
{
ccenter[CCENTER_HH_TIME] = atoi(arg2);
send_to_char("Ok. Value Changed.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else if (!str_cmp(arg1, "reset"))
{
ccenter[CCENTER_MIN_EXP] = 4000;
ccenter[CCENTER_MAX_EXP] = 3000000;
ccenter[CCENTER_EXP_LEVEL] = 100;
ccenter[CCENTER_QD_MULT] = 2;
ccenter[CCENTER_HH_BONUS] = 100;
ccenter[CCENTER_QD_TIME] = 720;
ccenter[CCENTER_HH_TIME] = 720;
send_to_char("Ok. Values Reset.\n\r", ch);
save_ccenter();
do_ccenter(ch, "");
return;
}
else
{
send_to_char("Nope.\n\r", ch);
return;
}
}
void do_displayvotes(CHAR_DATA *ch, char *argument)
{
POLL_DATA *poll;
VOTE_DATA *vote;
char arg[MAX_INPUT_LENGTH];
char buf[MAX_STRING_LENGTH];
char tbuf[MAX_STRING_LENGTH];
bool found = FALSE;
int i = 0;
if (IS_NPC(ch)) return;
one_argument(argument, arg);
for (poll = poll_list; poll; poll = poll->next)
{
if (str_cmp(poll->name, arg)) continue;
found = TRUE;
sprintf(buf, " #G[#R***#G] #CVotes for the poll on #y%s #G[#R***#G]#n\n\r\n\r", poll->name);
send_to_char(buf, ch);
for (vote = poll->votes; vote; vote = vote->next)
{
if (i++ > 50) break;
sprintf(buf, "%-12s %-40s %2d\n\r",
vote->pname, vote->phost, vote->choice);
send_to_char(buf, ch);
}
if (i == 0) break;
sprintf(buf, "\n\r#GScore:");
for (i = 0; i < MAX_VOTE_OPTIONS; i++)
{
if (!str_cmp(poll->options[i], "<null>")) break;
sprintf(tbuf, " #R[#0%d#R] #G%d votes", i+1 , poll->vcount[i]);
strcat(buf, tbuf);
}
strcat(buf, "#n\n\r");
send_to_char(buf, ch);
}
if (!found) send_to_char("No such poll.\n\r", ch);
return;
}
void do_addpoll(CHAR_DATA *ch, char *argument)
{
POLL_DATA *poll;
char arg[MAX_INPUT_LENGTH];
char darg[MAX_INPUT_LENGTH];
int i, days;
if (IS_NPC(ch)) return;
argument = one_argument(argument, arg);
one_argument(argument, darg);
if (arg[0] == '\0')
{
send_to_char("Which poll do you wish to start?\n\r", ch);
return;
}
days = atoi(darg);
if (days < 1 || days > 10)
{
send_to_char("Between 1 and 10 days please.\n\r", ch);
return;
}
poll = alloc_perm(sizeof(*poll));
poll->name = str_dup(arg);
poll->expire = current_time + (days * 24L * 3600L);
for (i = 0; i < MAX_VOTE_OPTIONS; i++)
{
poll->options[i] = str_dup("<null>");
poll->vcount[i] = 0;
}
poll->next = poll_list;
poll_list = poll;
send_to_char("Poll added, you'll need to edit it with polledit.\n\r", ch);
save_polls();
save_subvotes(poll);
return;
}
void do_polledit(CHAR_DATA *ch, char *argument)
{
POLL_DATA *poll;
char arg1[MAX_INPUT_LENGTH];
char arg2[MAX_INPUT_LENGTH];
bool found = FALSE;
int i;
if (IS_NPC(ch)) return;
argument = one_argument(argument, arg1);
argument = one_argument(argument, arg2);
if (arg1[0] == '\0')
{
send_to_char("Which poll do you wish to change?\n\r", ch);
return;
}
for (poll = poll_list; poll; poll = poll->next)
{
if (str_cmp(poll->name, arg1)) continue;
found = TRUE;
break;
}
if (!found)
{
send_to_char("No such poll.\n\r", ch);
return;
}
if ((i = atoi(arg2)) < 1 || i > MAX_VOTE_OPTIONS)
{
send_to_char("Please pick a valid field.\n\r", ch);
return;
}
free_string(poll->options[i-1]);
poll->options[i-1] = str_dup(argument);
send_to_char("Options set.\n\r", ch);
save_polls();
return;
}
void do_stoppoll(CHAR_DATA *ch, char *argument)
{
POLL_DATA *poll;
char arg[MAX_INPUT_LENGTH];
bool found = FALSE;
if (IS_NPC(ch)) return;
one_argument(argument, arg);
if (arg[0] == '\0')
{
send_to_char("Which poll do you wish to stop?\n\r", ch);
return;
}
for (poll = poll_list; poll; poll = poll->next)
{
if (!str_cmp(poll->name, arg))
{
found = TRUE;
break;
}
}
if (!found)
{
send_to_char("No such poll.\n\r", ch);
return;
}
complete_poll(poll);
send_to_char("Ok.\n\r", ch);
return;
}
void do_addchange( CHAR_DATA *ch, char *argument )
{
CHANGE_DATA *change;
CHANGE_DATA *cchange;
char *strtime;
char buf[50];
char tbuf[MAX_INPUT_LENGTH];
int i;
if (IS_NPC(ch)) return;
/* we need something to add to the list */
if (argument[0] == '\0' || strlen(argument) < 5)
{
send_to_char("What did you change?\n\r", ch);
return;
}
/* Set the current time */
strtime = ctime(¤t_time);
for (i = 0; i < 6; i++)
{
buf[i] = strtime[i + 4];
}
buf[6] = '\0';
/* If we have a free change, we reuse it */
if (change_free)
{
change = change_free;
change_free = change_free->next;
change->next = NULL;
if (change_free) change_free->prev = NULL;
}
else
change = alloc_perm(sizeof(*change));
sprintf(tbuf, "%s", line_indent(argument, 25, 80));
/* set the strings for the change */
change->imm = str_dup(ch->name);
change->text = str_dup(tbuf);
change->date = str_dup(buf);
/* If theres already a change, just add to the list */
if (change_last)
{
change_last->next = change;
change->prev = change_last;
change->next = NULL;
change_last = change;
}
else // there are no changes.
{
change->next = change_list;
change_list = change;
change_last = change;
}
/* Removing the oldest change if the list has gone beyond the max */
cchange = change_list; i = 0;
while ((cchange = cchange->next) != NULL) i++;
if (i >= MAX_CHANGE)
remove_change(1);
send_to_char("Change added.\n\r", ch );
save_changes();
return;
}
void do_delchange(CHAR_DATA *ch, char *argument)
{
char arg[MAX_INPUT_LENGTH];
bool found = FALSE;
int i;
if (IS_NPC(ch)) return;
one_argument(argument, arg);
if ((i = atoi(arg)) < 1)
{
send_to_char("Which number change did you want to remove ?\n\r", ch);
return;
}
found = remove_change(i);
if (!found) send_to_char("No such change.\n\r", ch);
else send_to_char("Change removed.\n\r", ch);
save_changes();
return;
}
void do_tourney(CHAR_DATA *ch, char *argument)
{
if (tourney)
{
tourney = FALSE;
send_to_char("Off.\n\r", ch);
return;
}
tourney = TRUE;
send_to_char("On.\n\r", ch);
return;
}
void do_aggrocheck(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *gch;
char buf[MAX_STRING_LENGTH];
send_to_char("#0Name From Towards Counter Bully BC#n\n\r", ch);
for (gch = char_list; gch; gch = gch->next)
{
if (IS_NPC(gch)) continue;
sprintf(buf, "%-12s %4d %4d %3d %3d %3d\n\r",
gch->name, gch->pcdata->aggress_from, gch->pcdata->aggress_towards,
gch->pcdata->agg_counter, gch->pcdata->bully_points,
gch->pcdata->bully_counter);
send_to_char(buf, ch);
}
}
void do_cutthis(CHAR_DATA *ch, char *argument)
{
char buf[MAX_STRING_LENGTH];
sprintf(buf, "%s", cut_after_locate(argument));
send_to_char(buf, ch);
}
void do_trusted(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
if (IS_NPC(ch)) return;
if (str_cmp(ch->name, "Jobo"))
{
send_to_char("Huh?\n\r", ch);
return;
}
one_argument(argument, arg);
if ((victim = get_char_world(ch, arg)) == NULL)
{
send_to_char("They are not here.\n\r", ch);
return;
}
if (IS_NPC(victim))
{
send_to_char("Not on mobiles.\n\r", ch);
return;
}
if (IS_SET(victim->pcdata->jflags, JFLAG_POLICE))
{
send_to_char("Removing trust.\n\r", ch);
send_to_char("Your trust has been removed.\n\r", victim);
REMOVE_BIT(victim->pcdata->jflags, JFLAG_POLICE);
return;
}
SET_BIT(victim->pcdata->jflags, JFLAG_POLICE);
send_to_char("Adding trust.\n\r", ch);
send_to_char("You are now trusted.\n\r", victim);
return;
}
void do_psilence(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
char buf[MAX_STRING_LENGTH];
if (IS_NPC(ch)) return;
if (!IS_SET(ch->pcdata->jflags, JFLAG_POLICE))
{
send_to_char("Huh??\n\r", ch);
return;
}
one_argument(argument, arg);
if ((victim = get_char_world(ch, arg)) == NULL)
{
send_to_char("Silence whom?\n\r", ch);
return;
}
if (IS_NPC(victim))
{
send_to_char("You cannot silence mobiles.\n\r", ch);
return;
}
if ((get_age(victim) - 17) > 1)
{
send_to_char("Sorry, you can only silence newbies.\n\r", ch);
return;
}
SET_BIT(victim->act, PLR_SILENCE);
send_to_char("They are now silenced, this action was logged.\n\r", ch);
sprintf(buf, "%s was silenced by our local police %s.", victim->name, ch->name);
log_string(buf);
return;
}
void do_plog(CHAR_DATA *ch, char *argument)
{
CHAR_DATA *victim;
char arg[MAX_INPUT_LENGTH];
char arg2[MAX_INPUT_LENGTH];
int count;
if (IS_NPC(ch)) return;
if (!IS_SET(ch->pcdata->jflags, JFLAG_POLICE))
{
send_to_char("Huh??\n\r", ch);
return;
}
argument = one_argument(argument, arg);
one_argument(argument, arg2);
if ((victim = get_char_world(ch, arg)) == NULL)
{
send_to_char("Log whom?\n\r", ch);
return;
}
if (IS_NPC(victim))
{
send_to_char("You cannot log mobiles.\n\r", ch);
return;
}
if ((count = atoi(arg2)) < 10 || count > 100)
{
send_to_char("Please state how many actions should be logged (between 10 and 100).\n\r", ch);
return;
}
victim->pcdata->log_count = count;
SET_BIT(victim->act, PLR_LOG);
send_to_char("Logging.\n\r", ch);
return;
}