Requesting NPC Trader

[Hyoru]

Hello!

 

I need an NPC that trades 100 #invasionpoint to 1 Poring Coin ( ID: 7539 ). 

 

Thanks in Advanced.

[EL Dragon]

here  100 x #invasionpoint to 1 x Poring Coins and 1x Poring coin to 100x  #invasionpoint

prontera,155,155,4	script	Converter	83,{

    [email protected]$ ="[^FF0000Converter^000000]";


    dispbottom "You have " + #invasionpoint + " Invasion Point's.";
    mes [email protected]$;
    mes "Hello, 100 Invasion Point is equals to 1 Poring Coin.";
    mes "What would you like to do?";
    next;



    switch( select("Invasion Point to Poring Coin","Poring Coin to Invasion Point") ) {

        case 1:
            mes [email protected]$;
            mes "How many Poring Coin(s) do you want?";
            input [email protected];
            next;



            if( [email protected] <= 0 || #invasionpoint  < [email protected] * 100 ) {
                mes [email protected]$;
                mes "Sorry, you don't have enough Invasion Point!";
                close;

            }

            mes [email protected]$;
            mes "This will cost ^FF0000" +([email protected] * 100)+ " Invasion Point^000000.";
            next;



            if( select("Proceed:Nevermind") -1 ) {
                mes [email protected]$;
                mes "Goodbye!";
                close;

            }

            set #invasionpoint,#invasionpoint -  [email protected] * 100;
            dispbottom "Lost: " +([email protected] * 100)+ " Invasion Point. Total: " +#invasionpoint +" Invasion Point.";
            getitem 7539, [email protected];
            break;

    

        case 2:
            mes [email protected]$;
            mes "How many Poring Coin(s) will you give?";
            input [email protected];
            next;



            if( [email protected] <= 0 || countitem(7539) < [email protected] ) {
                mes [email protected]$;
                mes "Sorry, you don't have enough Poring Coin!";
                close;

            }

            mes [email protected]$;
            mes "I can give you ^FF0000" +([email protected] * 100)+ " Invasion Point.^000000 for this.";
            next;



            if( select("Proceed:Nevermind") -1 ) {
                mes [email protected]$;
                mes "Goodbye!";
                close;

            }

			set #invasionpoint,#invasionpoint +  [email protected] * 100;
            dispbottom "Gained: " +([email protected] * 100)+ " Invasion Point. Total: " +#invasionpoint +" Invasion Point's.";
            delitem 7539,[email protected];

    }

    close;

}

[Hyoru]

Thanks a lot!

[Conflicts]

Please mark topic as solved, and select the post that helped you solve it. This would help other members facing the same issue / having the same request.