Exchange all my credits

[Anubis 0]

Hello,

 

can i request credit exchanger with option of exchange all my credits thanks everyone

[Daraen 7]

Can this do the trick?

 

Spoiler

//==============================================================================//
//=[Script Release : Credit Exchanger]
//=[Easy Modification]
//============================================================================//
//=[Script : DaemonSpade]
//==============================================================================//
//=[Idea Came From : DaemonSpade]
//=[Special Thanks to : Emistry]
//==============================================================================//
//= Description
//==============================================================================//
//=1. This Script Has Capacity Exchange
//= Zeny Capacity is 2,000,000,000z
//=A.Non Zeny Eater
//=B.Zeny/Credit Limiter Make it Exact
//=Example A: You Have 2b Zeny & You Exchange a Coin/Credit
//= The NPC Will Ask You Agian How Many Credits or Zeny You Will Exchanged
//=Example B: It Reads Your Zeny so The NPC Know The Max of Credit You Can Exchange Dont Put Wrong Ammount of Credit/Coin
//= The NPC Will Ask You Agian How Many Credits or Zeny You Will Exchanged
//==============================================================================//
//= Rules for using this script
//=1. Do not claim it as yours.
//=2. Do not change the credits.
//=3. Do not sell the script to earn money.
//==============================================================================// 

prontera,142,178,5    script    Credit Exchanger    416,{ 
//====================================[Customization Area]==========================//                
set .npcname$,"^0000EE[Credit Exchanger]^000000"; //NPC Name                
set .coinname$,"^0000EECredit^000000"; //Name of Item as Coin Used                
set .CoinID,6060; // Credit ID Set to Red Potion                
set .zeny,10000000; // Credit Price Set by 10,000,000 or 10m                
set .capzeny,2000000000; //Zeny Capacity Set by 2,000,000,000 or 2b
//==============================================================================//
// Check Line 89 To Edit The Chat/Pub Name Like This:
//              waitingroom "Credit Exchanger",0;
//==============================================================================//                 
PlayerMode:                
        mes .npcname$;
        mes "Hello there "+strcharinfo(0);
        mes "Rule's Of Exchange";
        mes "1 ^0000EE"+.coinname$+"^000000 is [^0000EE"+.zeny+"z^000000]";
        mes "Zeny Exchange Capacity is [^0000EE"+.capzeny+"z^000000]";
        switch(select("(Credits) to (Zeny):(Zeny) to (Credits)")) {        
        
        case 1:                
                next;                
                mes .npcname$;                 
                mes "How many Credits to exchange?";                
                mes "Put The Credit Amount";                
                mes "Put  ^0000EE[0]^000000 to Cancel";                
                mes "1 ^0000EE"+.coinname$+"^000000 is [^0000EE"+.zeny+"z^000000]";                
                mes "Zeny Exchange Capacity is [^0000EE"+.capzeny+"z^000000]";                
                next;                
                do{
                input @Credit,0,countitem(.CoinID);                
                if( @Credit < 1 ) 
                close;
                }
                while(((@Credit * .zeny) + Zeny) > .capzeny);                
                next;                
                mes .npcname$;                
                mes "Thanks";                
                delitem .CoinID,@Credit;                
                set Zeny, Zeny + ( @Credit * .zeny );                
                dispbottom "Zeny Exchange Finished";                
                close;         
                
        case 2:                
                next;                
                mes .npcname$;                 
                mes "How much Credit you like to Gain?";                
                mes "Put The Credit Amount";                
                mes "Put  ^0000EE[0]^000000 to Cancel";                
                mes "1 ^0000EE"+.coinname$+"^000000 is [^0000EE"+.zeny+"z^000000]";                
                mes "Zeny Exchange Capacity is [^0000EE"+.capzeny+"z^000000]";                
                next;                
                input @Credit,0,( Zeny / .zeny );                
                if( @Credit < 1 ) close;                
                next;                
                mes .npcname$;                
                mes "Thanks.";                
                set Zeny, Zeny - ( @Credit * .zeny);                
                getitem .CoinID,@Credit;                
                dispbottom "Credit Exchange Finished";                
                close;                 
                
        OnInit:                
                waitingroom "Credit Exchanger",0;                
                end;        
                }
                close;
                }

 

Link : 

 

[Anubis 0]

thanks but any script of credit exchanger with  menu exchange all my credits and credit to zeny