//==============================================================================////=[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;}
//==============================================================================////=[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;}Share this post
Link to post
Share on other sites