/****************************************************************************
* [S]imulated [M]edieval [A]dventure multi[U]ser [G]ame | \\._.// *
* -----------------------------------------------------------| (0...0) *
* SMAUG 1.4 (C) 1994, 1995, 1996, 1998 by Derek Snider | ).:.( *
* -----------------------------------------------------------| {o o} *
* SMAUG code team: Thoric, Altrag, Blodkai, Narn, Haus, | / ' ' \ *
* Scryn, Rennard, Swordbearer, Gorog, Grishnakh, Nivek, |~'~.VxvxV.~'~*
* Tricops and Fireblade | *
* ------------------------------------------------------------------------ *
* Merc 2.1 Diku Mud improvments copyright (C) 1992, 1993 by Michael *
* Chastain, Michael Quan, and Mitchell Tse. *
* Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, *
* Michael Seifert, Hans Henrik St{rfeldt, Tom Madsen, and Katja Nyboe. *
* ------------------------------------------------------------------------ *
* Bounty Add-On *
****************************************************************************/
/****************************************************************************
* Bounty for ResortMUD 5.0 by Garinan *
* *
* A simple code which allows players to place a gold bounty on the head of *
* a deadly player. *
* *
* If you have any questions, comments, concerns or bugs to report which *
* are not resolved within the included readme.txt, please email me at: *
* garinan@hotmail.com, your support is greatly appreciated. *
* *
* - Garinan *
****************************************************************************/
/****************************************************************************
* Copyright (c) Andrew Brunelle 2000, All Rights Reserved *
* This code, as well as this document is distributed to be used freely *
* provided that credit be given to myself, its author Andrew Brunelle *
* (Garinan Templar). If you wish to distribute this snippet via your own *
* website or any other means, please contact me first at the email address *
* below, I will likely only ask that you add a link to UCMM in exchange, *
* thank you and good luck! *
****************************************************************************/
/****************************************************************************
*********************************DISCLAIMER*********************************
****************************************************************************
* By adding this code to your MUD you are doing so at your own risk. *
* Neither I (Andrew Brunelle), nor any organization with which i am *
* affiliated, will be held responsible for any damages to your MUD by *
* adding this code. *
****************************************************************************/
#include <sys/types.h>
#include <string.h>
#include <time.h>
#include <stdio.h>
#include "mud.h"
CHAR_DATA *find_bounty( CHAR_DATA * ch )
{
CHAR_DATA *bounty;
for( bounty = ch->in_room->first_person; bounty; bounty = bounty->next_in_room )
{
if( IS_NPC( bounty ) && xIS_SET( bounty->act, ACT_BOUNTY ) )
break;
}
return bounty;
}
void do_bounty( CHAR_DATA * ch, char *argument )
{
DESCRIPTOR_DATA *d;
CHAR_DATA *vch;
CHAR_DATA *bounty;
CHAR_DATA *victim = NULL;
char arg1[MAX_INPUT_LENGTH];
char arg2[MAX_INPUT_LENGTH];
char buf[MAX_STRING_LENGTH];
int amount, bountymax;
int count = 0;
int cost = 0;
/* cost is the cost for a peaceful to become ineligable to be bountied *
* bountymax is the maximum amount to be put on a player's head *
* alter below to suit your needs. - Garinan */
bountymax = 2000000000;
if( ch->exp < 100000 )
{
send_to_char( "You can't use the bounty command until you are 100,000 PL.\n\r", ch );
return;
}
if( ( bounty = find_bounty( ch ) ) == NULL )
{
/* Why should players need to be at a bounty officer to check *
* the value of their bounty? They shouldn't :P - Garinan */
if( !str_cmp( argument, "check" ) )
{
if( IS_NPC( ch ) )
ch_printf( ch, "&YMobiles can not have bounties.\n\r" );
else if( ch->pcdata->bounty > 0 )
ch_printf( ch, "&YYou have a bounty worth %s zeni on your head.\n\r", num_punct( ch->pcdata->bounty ) );
else
ch_printf( ch, "&YYou have no bounty on your head.\n\r" );
if( IS_NPC( ch ) )
ch_printf( ch, "&YMobiles can not collect bounties.\n\r" );
else if( ch->pcdata->bowed > 0 )
ch_printf( ch, "&YYou are owed %s zeni in bounty earnings.\n\r", num_punct( ch->pcdata->bowed ) );
else
ch_printf( ch, "&YYou have not claimed any bounties.\n\r" );
return;
}
send_to_char( "There is no bounty officer here!\n\r", ch );
return;
}
act( AT_ACTION, "$n and $N whisper quietly to each other.", ch, ch, bounty, TO_ROOM );
act( AT_ACTION, "You whisper your request to $N.", ch, bounty, bounty, TO_CHAR );
if( IS_NPC( ch ) )
{
sprintf( buf, "We don't deal with your kind %s.", ch->short_descr );
do_say( bounty, buf );
return;
}
if( argument[0] == '\0' )
{
sprintf( buf, "If you need help, see HELP BOUNTY." );
do_say( bounty, buf );
return;
}
argument = one_argument( argument, arg1 );
argument = one_argument( argument, arg2 );
if( arg1 == '\0' )
{
sprintf( buf, "How much zeni do you want to place, and on who?" );
do_say( bounty, buf );
return;
}
/* Bounty check, players can check if they have a bounty on them *
* and if so, how much its value is. *
* - Garinan */
if( !str_cmp( arg1, "check" ) )
{
if( arg2[0] == '\0' )
{
if( IS_NPC( ch ) )
ch_printf( ch, "&YMobiles can not have bounties.\n\r" );
else if( ch->pcdata->bounty > 0 )
ch_printf( ch, "&YYou have a bounty worth %s zeni on your head.\n\r", num_punct( ch->pcdata->bounty ) );
else
ch_printf( ch, "&YYou have no bounty on your head.\n\r" );
if( IS_NPC( ch ) )
ch_printf( ch, "&YMobiles can not collect bounties.\n\r" );
else if( ch->pcdata->bowed > 0 )
ch_printf( ch, "&YYou are owed %s zeni in bounty earnings.\n\r", num_punct( ch->pcdata->bowed ) );
else
ch_printf( ch, "&YYou have not collected any bounties.\n\r" );
return;
}
if( !( victim = get_char_world( ch, arg2 ) ) )
{
do_say( bounty, "I don't know anyone by that name." );
return;
}
if( IS_NPC( victim ) )
do_say( bounty, "Mobiles cannot have bounties!" );
else if( ( victim = get_char_world( ch, arg2 ) ) )
{
if( victim->pcdata->bounty > 0 )
{
sprintf( buf, "%s %s's bounty is worth %s zeni.", ch->name, victim->name, num_punct( victim->pcdata->bounty ) );
do_tell( bounty, buf );
return;
}
sprintf( buf, "%s That player has no bounty.", ch->name );
do_tell( bounty, buf );
return;
}
return;
}
if( !str_cmp( arg1, "buy" ) )
{
if( ( bounty = find_bounty( ch ) ) == NULL )
{
ch_printf( ch, "There is no bounty officer here!\n\r" );
return;
}
if( ch->pcdata->bounty <= 0 || !xIS_SET( ch->act, PLR_BOUNTY ) )
{
sprintf( buf, "%s You don't have a bounty on your head.", ch->name );
do_tell( bounty, buf );
if( xIS_SET( ch->act, PLR_BOUNTY ) )
xREMOVE_BIT( ch->act, PLR_BOUNTY );
if( ch->pcdata->bounty != 0 )
ch->pcdata->bounty = 0;
if( ch->pcdata->bounty_by != str_dup( "" ) )
{
DISPOSE( ch->pcdata->bounty_by );
ch->pcdata->bounty_by = str_dup( "" );
}
return;
}
cost = ch->pcdata->bounty * 0.25;
if( ch->gold < cost )
{
sprintf( buf, "%s I'm sorry, you can't afford this.", ch->name );
do_tell( bounty, buf );
return;
}
ch->gold -= cost;
sprintf( buf, "%s You have bought the bounty that was put on your head.", ch->name );
do_tell( bounty, buf );
ch->pcdata->bounty = 0;
ch->pcdata->b_timeleft = 1440;
xREMOVE_BIT( ch->act, PLR_BOUNTY );
DISPOSE( ch->pcdata->bounty_by );
ch->pcdata->bounty_by = str_dup( "" );
return;
}
if( !str_cmp( arg1, "who" ) )
{
if( ( bounty = find_bounty( ch ) ) == NULL )
{
ch_printf( ch, "There is no bounty officer here!\n\r" );
return;
}
if( ch->pcdata->bounty <= 0 || !xIS_SET( ch->act, PLR_BOUNTY ) )
{
sprintf( buf, "%s You don't have a bounty on your head.", ch->name );
do_tell( bounty, buf );
if( xIS_SET( ch->act, PLR_BOUNTY ) )
xREMOVE_BIT( ch->act, PLR_BOUNTY );
if( ch->pcdata->bounty != 0 )
ch->pcdata->bounty = 0;
if( ch->pcdata->bounty_by != NULL )
{
DISPOSE( ch->pcdata->bounty_by );
ch->pcdata->bounty_by = str_dup( "" );
}
return;
}
cost = ch->pcdata->bounty * 0.05;
if( ch->gold < cost )
{
sprintf( buf, "%s I'm sorry, you can't afford this.", ch->name );
do_tell( bounty, buf );
return;
}
ch->gold -= cost;
sprintf( buf, "%s It was %s who put the bounty on your head.", ch->name, ch->pcdata->bounty_by );
do_tell( bounty, buf );
return;
}
if( !str_cmp( arg1, "hunt" ) )
{
if( ( bounty = find_bounty( ch ) ) == NULL )
{
ch_printf( ch, "There is no bounty officer here!\n\r" );
return;
}
if( !IS_HC( ch ) && !IS_IMMORTAL( ch ) )
{
sprintf( buf, "%s People like you don't have the skill or guts to hunt others.", ch->name );
do_tell( bounty, buf );
return;
}
if( arg2[0] == '\0' )
{
pager_printf_color( ch, "The folowing people have a price on their head:\n\r" );
for( d = first_descriptor; d; d = d->next )
{
vch = d->character;
if( !vch )
{
continue;
}
if( xIS_SET( vch->act, PLR_BOUNTY ) )
{
pager_printf_color( ch, " &RWANTED: [&W%-16s&R] REWARD:[&W%-10s&R]\n\r", vch->name,
num_punct( vch->pcdata->bounty ) );
count++;
}
}
if( count <= 0 )
pager_printf_color( ch, "&w No one had a price on their head right now.\n\r" );
return;
}
if( !( victim = get_char_world( ch, arg2 ) ) )
{
do_say( bounty, "I don't know anyone by that name." );
return;
}
if( ( victim = get_char_world( ch, arg2 ) ) && !IS_NPC( victim ) )
{
cost = victim->pcdata->bounty * 0.25;
if( victim->pcdata->bounty > 0 && xIS_SET( victim->act, PLR_BOUNTY ) )
{
if( !str_cmp( argument, "pay" ) )
{
if( ch->gold < cost )
{
sprintf( buf, "%s You don't have enough zeni.", ch->name );
do_tell( bounty, buf );
return;
}
if( !str_cmp( ch->name, victim->pcdata->bounty_by ) )
{
sprintf( buf, "%s You can not clam your own bounty.", ch->name );
do_tell( bounty, buf );
return;
}
sprintf( buf, "%s Very well, you may try to collect the bounty on %s's head.", ch->name, victim->name );
do_tell( bounty, buf );
// ch->gold -= (ch->pcdata->bounty * 0.25);
ch->gold -= cost;
ch->pcdata->hunting = strdup( victim->name );
return;
}
sprintf( buf, "%s You will have to pay a service fee of %s to collect that bounty.", ch->name, num_punct( cost ) );
do_tell( bounty, buf );
return;
}
}
sprintf( buf, "%s That player has no bounty.", ch->name );
do_tell( bounty, buf );
return;
}
if( !str_cmp( arg1, "collect" ) )
{
if( ch->pcdata->bowed <= 0 )
{
sprintf( buf, "%s I owe you nothing %s!", ch->name, ch->name );
do_tell( bounty, buf );
return;
}
ch->gold += ch->pcdata->bowed;
sprintf( buf, "&YYou collect %s zeni worth of bounties.\n\r", num_punct( ch->pcdata->bowed ) );
send_to_char( buf, ch );
ch->pcdata->bowed = 0;
sprintf( buf, "%s A pleasure doing business with you.", ch->name );
do_tell( bounty, buf );
act( AT_ACTION, "$N hands a small sack of zeni to $n.", ch, ch, bounty, TO_ROOM );
return;
}
if( !( victim = get_char_world( ch, arg2 ) ) )
{
do_say( bounty, "That player is not online." );
return;
}
if( IS_NPC( victim ) )
{
do_say( bounty, "A mobile? Kill it yourself!" );
return;
}
amount = 0;
if( !IS_NPC( victim ) && victim->pcdata->bounty > 0 )
cost = victim->pcdata->bounty * .5;
else if( !IS_HC( victim ) )
cost = get_rank_number( victim ) * get_rank_number( victim ) * get_rank_number( victim ) * 10000;
else
cost = get_true_rank( ch ) * get_true_rank( ch ) * get_true_rank( victim ) * 1750;
if( cost == 0 )
cost = 1;
if( !str_cmp( arg1, "all" ) )
{
amount = ch->gold;
}
if( amount == 0 )
{
if( !is_number( arg1 ) )
{
sprintf( buf, "%s You must pay me in zeni!", ch->name );
do_tell( bounty, buf );
return;
}
amount = atoi( arg1 );
}
if( amount > ch->gold )
{
sprintf( buf, "%s Check your pockets and try again, you don't have that much zeni!", ch->name );
do_tell( bounty, buf );
return;
}
if( amount <= 0 )
{
sprintf( buf, "%s That amount is too frugal, try again!", ch->name );
do_tell( bounty, buf );
return;
}
if( victim->level >= LEVEL_IMMORTAL && ch != victim )
{
sprintf( buf, "%s You may not place a bounty on the head of an administrator!", ch->name );
do_tell( bounty, buf );
return;
}
if( victim->exp < 100000 && ch != victim )
{
sprintf( buf, "%s you can not place a bounty on a player under 100,000 power level.", ch->name );
do_tell( bounty, buf );
return;
}
/* this shouldn't be here -Goku
if( !xIS_SET( victim->act, PLR_PK1 )
&& !xIS_SET( victim->act, PLR_PK2 ) )
{
sprintf( buf, "%s You may not place a bounty on those who don't have pkill on.", ch->name );
do_tell( bounty, buf );
return;
}
*/
if( ( amount + victim->pcdata->bounty ) > bountymax )
{
sprintf( buf, "%s That would exceed the maximum allowable bounty of %s zeni!", ch->name, num_punct( bountymax ) );
do_tell( bounty, buf );
return;
}
if( amount < cost )
{
sprintf( buf, "%s The minimum bounty you can place on %s is %s", ch->name, victim->name, num_punct( cost ) );
do_tell( bounty, buf );
return;
}
if( ch == victim )
{
sprintf( buf, "%s Place a bounty on yourself? Ever considered suicide?", ch->name );
do_tell( bounty, buf );
return;
}
if( victim->pcdata->b_timeleft > 0 && victim->pcdata->bounty <= 0 )
{
sprintf( buf, "%s I don't like spam killing, you must wait %d more %s to put another bounty on %s.", ch->name,
victim->pcdata->b_timeleft >= 60 ? victim->pcdata->b_timeleft / 60 : victim->pcdata->b_timeleft,
victim->pcdata->b_timeleft >= 60 ? "hours" : "minutes", himher( victim, FALSE ) );
do_tell( bounty, buf );
return;
}
ch->gold -= amount;
act( AT_ACTION, "You hand a small sack of zeni to $N.", ch, ch, bounty, TO_CHAR );
act( AT_ACTION, "$n hands a small sack of zeni to $N.", ch, ch, bounty, TO_ROOM );
if( victim->pcdata->bounty > 0 )
{
sprintf( buf, "%s The bounty on %s has been increased by %s zeni!", ch->name, victim->name, num_punct( amount ) );
do_tell( bounty, buf );
sprintf( buf, "&RThe bounty on %s has been increased by %s zeni!", victim->name, num_punct( amount ) );
do_info( bounty, buf );
sprintf( buf, "&YThe bounty on your head has been increased by %s zeni!\n\r", num_punct( amount ) );
send_to_char( buf, victim );
if( victim->pcdata->bounty < 0 )
victim->pcdata->bounty = amount;
else
victim->pcdata->bounty += amount;
return;
}
victim->pcdata->bounty = amount;
xSET_BIT( victim->act, PLR_BOUNTY );
if( victim->pcdata->bounty_by )
{
DISPOSE( victim->pcdata->bounty_by );
victim->pcdata->bounty_by = str_dup( "" );
}
victim->pcdata->bounty_by = str_dup( ch->name );
act( AT_SOCIAL, "$n nods in agreement with you.", bounty, NULL, ch, TO_VICT );
act( AT_SOCIAL, "$n nods in agreement to $N.", bounty, NULL, ch, TO_NOTVICT );
sprintf( buf, "&RA bounty worth %s zeni has been placed on the head of %s!", num_punct( amount ), victim->name );
do_info( bounty, buf );
pager_printf_color( victim, "&RA bounty worth %s zeni has been placed on your head!\n\r", num_punct( amount ) );
}
void do_unbounty( CHAR_DATA * ch, char *argument )
{
CHAR_DATA *victim;
if( !( victim = get_char_world( ch, argument ) ) )
{
ch_printf( ch, "&YNo such player online.\n\r" );
return;
}
if( victim->pcdata->bounty > 0 )
{
ch_printf( ch, "&pRemoving Bounty...\n\rDone.\n\r" );
victim->pcdata->bounty = 0;
xREMOVE_BIT( victim->act, PLR_BOUNTY );
DISPOSE( victim->pcdata->bounty_by );
victim->pcdata->bounty_by = str_dup( "" );
return;
}
ch_printf( ch, "&YThat player has no bounty.\n\r" );
if( xIS_SET( victim->act, PLR_BOUNTY ) )
xREMOVE_BIT( victim->act, PLR_BOUNTY );
if( victim->pcdata->bounty != 0 )
victim->pcdata->bounty = 0;
if( victim->pcdata->bounty_by != NULL )
{
DISPOSE( victim->pcdata->bounty_by );
victim->pcdata->bounty_by = str_dup( "" );
}
return;
}