party vs party! Take half of the bet and add a prize to the winning party.

[Yukaiii]

can someone who has knowledge in scripting help me to solve this?

I would like to remove the item or zeny bet from this script.

and it is adding a prize for the winning party and the losing party.

script tested and working perfectly.
If anyone is interested in helping I'm sharing the script with them!

Thank you in advance

 

Quote

    Case 1:
        if( getcharid(0) != getpartyleader( .@partyid,2 ) ){
            mes "Only Party Leader can register.";
        }else if( .@partyid == .team[0] ){
            if( !.team[1] ){
                if( select("Quit Match","Cancel") == 1 ){
                    set .team[0],0;
                    set .status,1;
                    stopnpctimer;
                    if( $match_amount && $match_itemid ){
                        message strcharinfo(0),"Retrieved "+callfunc( "ValueConvert", $match_amount )+" x "+getitemname( $match_itemid )+".";
                        getitem $match_itemid,$match_amount;
                    }
                    if( $zeny ){
                        message strcharinfo(0),"Retrieved "+callfunc( "ValueConvert", $zeny )+" Zeny.";
                        set Zeny,Zeny + $zeny;
                    }
                }

 

Quote

                if( $match_itemid )
                    if( countitem( $match_itemid ) < $match_amount ){
                        mes "You need "+callfunc( "ValueConvert", $match_amount )+" x "+getitemname( $match_itemid );
                        close;
                    }
                    
                if( $zeny )
                    if( Zeny < $zeny ){
                        mes "You need "+callfunc( "ValueConvert", $zeny )+" Zeny";
                        close;
                    }
                    
                if( $match_itemid ){
                    set .@amount,$match_amount;
                    message strcharinfo(0),"Paid "+callfunc( "ValueConvert", .@amount )+" x "+getitemname( $match_itemid )+".";
                    delitem $match_itemid,.@amount;
                }
                
                if( $zeny ){
                    message strcharinfo(0),"Total of "+callfunc( "ValueConvert", $zeny )+" Zeny deducted.";
                    set Zeny,Zeny - $zeny;
                }

 

Quote

            callsub display_event_info;
            next;
            switch( select( "Edit Party Member","Required Item","Required Zeny","^FF0000Start Event^000000" ) ){

 

Quote

                Case 2:
                    mes "Enter item ID :";
                    do{
                        input .@input;
                    }while( getitemname( .@input ) == "null" );
                    mes "Enter Amount : "+getitemname( .@input );
                    mes "^777777( 0 ~ "+callfunc( "ValueConvert", 30000 )+" )^000000";
                    input $match_amount,0,30000;
                    if( $match_amount ) set $match_itemid,.@input;
                    break;
                Case 3:
                    mes "Enter Zeny amount :";
                    mes "^777777( 0 ~ "+callfunc( "ValueConvert", 10000000 )+" )^000000";
                    input $zeny,0,10000000;
                    break;

 

Quote

                    if( $party_member < 1 ){
                        mes "^FF0000Invalid^000000. Minimum 1 Party Member.";
                    }else if( !$match_amount && !$zeny ){
                        mes "^FF0000Invalid^000000. Required 1 item or Zeny.";
                    }else{

 

Quote

    if( $party_member && ( $match_amount || $zeny ) && !.status ) set .status,1;
    end;

 

Quote

    if( $zeny ) mes "Required Zeny : ^777777"+callfunc( "ValueConvert", $zeny )+" Zeny^000000";

 

Quote

                if( $zeny ){
                    mapannounce .map_list$[.map],"Party Leader received "+callfunc( "ValueConvert", $zeny )+" Zeny",bc_blue;
                    set Zeny,Zeny + ( $zeny * 2 );

 

Quote

    if( $party_member && ( $match_amount || $zeny ) && !.status ){

 

 

[Rynbef]

Uve already post the script parts u need to change.

 

Rynbef~

[friomixx]

switch( select( "Edit Party Member",/*"Required Item","Required Zeny",*/"^FF0000Start Event^000000" ) ){

 

Make sure to include Case 4, so your previous Case 4 will now become Case 2

                Case 2:
                   /* mes "Enter item ID :";
                    do{
                        input .@input;
                    }while( getitemname( .@input ) == "null" );
                    mes "Enter Amount : "+getitemname( .@input );
                    mes "^777777( 0 ~ "+callfunc( "ValueConvert", 30000 )+" )^000000";
                    input $match_amount,0,30000;
                    if( $match_amount ) set $match_itemid,.@input;
                    break;
                Case 3:
                    mes "Enter Zeny amount :";
                    mes "^777777( 0 ~ "+callfunc( "ValueConvert", 10000000 )+" )^000000";
                    input $zeny,0,10000000;
                    break;
                Case 4:*/

 

                    if( $party_member < 1 ){
                        mes "^FF0000Invalid^000000. Minimum 1 Party Member.";
                    }/*else if( !$match_amount && !$zeny ){
                        mes "^FF0000Invalid^000000. Required 1 item or Zeny.";
                    }*/else{

 

    if( $party_member /*&& ( $match_amount || $zeny )*/ && !.status ) set .status,1;
    end;

 

    if( $party_member /*&& ( $match_amount || $zeny )*/ && !.status ){