viewing paste Gold Room [Party Share Gold] | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35
 
prontera,155,181,5      script  Sample  757,{
mes "Enter Gold Room?";
if( select( "Yes","cancel" ) == 1 ){
        warp .map$,0,0;
}
 
OnMobKill:
.@party_id = getcharid(1);
if( !.@party_id ){
        .@gain_gold = 1;
}else{
       
        .@aid = getcharid(3);
        getpartymember .@party_id;
        getpartymember .@party_id,2;
        .@gain_gold = ( ( $@partymembercount > 5 )? 5:$@partymembercount );
        for( .@i = 0; .@i < $@partymembercount; .@i++ )
                if( $@partymemberaid[.@i] != .@aid && isloggedin( $@partymemberaid[.@i] ) ){
                        getmapxy( .@map$,.@x,.@y,0,$@partymembername$[.@i] );
                        if( .@map$ == .map$ )
                                getitem 969,1,$@partymemberaid[.@i];
                }
}
getitem 969,.@gain_gold;
 
OnInit:
.map$ = "guild_vs5";
}
 
guild_vs5,0,0   monster Poring  1002,100,0,0,"Sample::OnMobKill"
 
Viewed 1009 times, submitted by Emistry.