prontera,150,175,0 script testparty 521,{
npctalk "You're required to enter the waitingroom.";
end;
OnInit:
waitingroom "test",11,"testparty::OnFull",3;
end;
OnFull:
getmapxy .@map$, .@x, .@y, 1;
warpwaitingpc .@map$, .@x, .@y;
for ( .@i = 0; .@i < $@warpwaitingpcnum; .@i++ ) {
.@name$ = rid2name($@warpwaitingpc[.@i]);
.@char_id = getcharid( 0, .@name$ );
if ( getcharid( 1, .@name$ ) > 0 )
party_delmember( .@char_id );
sleep 100;
if ( .@create == 0 ) {
while( party_create( "party"+ rand(10000), .@char_id ) == -3 );
.@create = 1;
}
else if ( $@party_create_id )
party_addmember $@party_create_id, .@char_id;
}
end;
OnPCLogoutEvent:
.@logged = 1;
OnPCStatCalcEvent:
if ( strcharinfo(3) == "prontera" && !.@logged
|| strcharinfo(3) != "prontera" && .@logged
|| getcharid(1) == 0 ) end;
.@party_id = getcharid(1);
if ( getcharid(0) != getpartyleader( .@party_id, 2 ) )
party_delmember();
else {
.i = 0;
if ( instance_check_party(.@party_id,2) == 0 )
party_destroy(.@party_id);
else {
addrid( 2, 0, .@party_id );
if( !.i && !.@party_id ) {
.i = 1;
party_changeleader getcharid(1), getcharid(0);
} else if( .@party_id )
party_delmember();
}
}
end;
}
Remember to set where it says "prontera" to your map.