viewing paste party info | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
prontera,155,181,5      script  Sample  757,{
query_sql( "SELECT `party_id`,`name` FROM `party` LIMIT 20",.@party_id,.@name$ );
.@size = getarraysize( .@party_id );
if( .@size ){
        mes "Select a Party.";
        for( .@i = 0; .@i < .@size; .@i++ )
                .@menu$ = .@menu$ + .@name$[.@i] + ":";
        next;
        .@party = select( .@menu$ ) - 1;
        mes "["+.@name$[.@party]+"]";
        mes "Member("+$@partymembercount+"):";
        getpartymember .@party_id[.@party];
        for( .@i = 0; .@i < $@partymembercount; .@i++ )
                mes " > "+$@partymembername$[.@i];
       
}else{
        mes "No party.";
}
}
Viewed 556 times, submitted by Emistry.