/*==========================================
* Forces the player to make party [Haruna]
* null if found existing party
*------------------------------------------*/
BUILDIN(makeparty)
{
TBL_PC* sd = script_rid2sd(st);
char name[NAME_LENGTH];
if( sd == NULL || !script_hasdata(st, 2) )
return true;
safestrncpy(name, script_getstr(st, 2), NAME_LENGTH);
party->create(sd, name, 0, 0);
return true;
}
/*==========================================
* Forces the player to leave party [Haruna]
* null if not found
*------------------------------------------*/
BUILDIN(leaveparty)
{
TBL_PC* sd = script_rid2sd(st);
if( sd == NULL )
{
script_pushint(st, 0);
return true;
}
script_pushint(st, party->leave(sd));
return true;
}