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.";
}
close;
}
Viewed 1189 times, submitted by Emistry.