This is my first snippet to make for ROM24 .. I could not find one out there so I put this one together.

All this does is make it so people can join the clan system on their own without anyone elses help.

I don't care if you give me credit or what... but if you want you can email me to let me know you are using it and like it.

kalock@dralakon.net

O.k. here are the steps.

** 1. **
In merc.h add this to your pc_data

    bool                confirm_loner;

** 2. **
In save.c add this to the rest of your load_char stuff

    ch->pcdata->confirm_loner           = FALSE;

** 3. **
add your loner commands to interp.c and interp.h

************* MAKE SURE YOU PUT IT AFTER LOOK COMMAND **********************

** 4. **

Add the loner command to act_info.c or act_comm.c where ever you feel like...

do a clean recompile and you should be good to go.

******** NOTE ********

ch->clan = 1; 

1 is where LONER cLAN shows up in my clan list in tables.c if yours is any other
location change the 1 to where ever your loner clan is in tables.c or you will have 
people loner into a valid clan.

**********************


/* Loner Command */

void do_loner( CHAR_DATA *ch, char *argument)
{

   char buf[MAX_STRING_LENGTH];
   if (IS_NPC(ch))
	return;

   if (ch->level <= 5)
   {
        send_to_char("You are not ready for such an adventure yet! Try again when you have more training.\n\r",ch);
        return;
   }

   if (ch->level >= 25)
   {
        send_to_char("You should have joined the PK system when you had the chance!\n\r",ch);
        return;
   }  

   if (ch->clan > 0)
   {
        send_to_char("You are already a part of the PK system!\n\r",ch);
        return;
   }

   if (ch->pcdata->confirm_loner)
   {
	if (argument[0] != '\0')
	{
	    send_to_char("Loner status removed.\n\r",ch);
	    ch->pcdata->confirm_loner = FALSE;
	    return;
	}
	else
	{
            send_to_char("You are now a loner. Good luck, you will need it!\n\r",ch);                                                 ch->clan = 1;                                                  
            return;                                                        
 	}
    }

    if (argument[0] != '\0')
    {
	send_to_char("Just type loner. No argument.\n\r",ch);
	return;
    }

    send_to_char("Type loner again to confirm this command.\n\r",ch);       
    send_to_char("{R-----------------WARNING-----------------{x\n\r",ch);   
    send_to_char("{BThis command is irreversible. Once you join{x\n\r",ch); 
    send_to_char("{Bthe PK system there is no going back!{x\n\r",ch);       
    send_to_char("Typing loner with an argument will undo loner status.\n\r", ch);                                                                      
    ch->pcdata->confirm_loner = TRUE;                                                                                                    
    
    }