This snippet was taken from www.grayarea.com/sneak.htm and MAY NOT be
posted on your web site. It MUST be linked back to the above URL for   
download.   


- The following snippet adds an 'addict' spot to your
- mud to reward the person who is first in the descriptor
- list. You can only occupy the addict spot if you are 
- over level 19 and not an immortal.

----[In fight.c]----

- You must add the following in the group_gain() function:

- under CHAR_DATA *gch; (or any of the vars it doesn't matter) add:
DESCRIPTOR_DATA *addict=NULL;
- also add:
bool fAddict = FALSE;

- Then add under xp = xp_compute(gch, victim) {or somewhere before it actually gives the xp out):
  for ( d = descriptor_list; d; d = d->next )
    {
        if ( d->connected == CON_PLAYING && !IS_IMMORTAL(d->character) && d->character->level > 19) {
        addict = d;
    } }
   if(addict && gch) {if(addict->character != NULL &&
addict->character == gch) {
   send_to_char("{wThe {WGods {wHave {RBonused {wYou For Your {WDedication{w!{x\n\r",gch);
   xp = xp * 1.5; } }

------------------

- If you wish to add an addict spot in your who list 
- make the following changes to act_info.c:

- in the do_who() function add this to the variables:
DESCRIPTOR_DATA *addict=NULL; (I put it under DESCRIPTOR_DATA *d; )

- somewhere under output = new_buf(); add:

for ( d = descriptor_list; d; d = d->next )
    {
        if ( d->connected == CON_PLAYING && !IS_IMMORTAL(d->character) && d->character->level > 19) {
        addict = d;
    } }

- somewhere under the switch function for setting the class names switch ( wch->level ) add:

fAddict = FALSE;
if(addict !=NULL && wch) {if(addict->character != NULL &&
addict->character == wch && is_clan(wch)) {
fAddict = TRUE; } }

- Now to display it find the place in your do_who code where it formats everything
- for rom look for the line * Format it up.
- in the sprintf(buf, line you will find a bunch of %s's together, add another %s
- then look for something like   IS_SET(wch->comm, COMM_AFK) ? "[AFK] " : "", and add right after it:
fAddict ? "{y[{YAddict{y]{x " : "",

