Jump to content

eboni001

Members
  • Posts

    327
  • Joined

  • Last visited

Everything posted by eboni001

  1. This is my coin manager npc, it does trade 10m-zeny = 1 Platinum Coin and viceversa i want to change it to anyone can change Platinum coins to zeny, but to change zeny into platinum coins you have to make a quest and it will be only for 30 days and you cant change more than 2b zeny per day, my idea is when you talk to the npc he ask you: what do you want to do today? -Trade Platinum coins to Zeny,-Trade Zeny to platinum coins,-Make Platinum permit quest, if you doesnt have the permit to trade zeny into P. coins he will tell you you, im sory but you have to make platinum permit quest to trade zeny into platinum coins, do you want to make platinum permit quest?. Please help me with this guys thanks in advance prontera,128,213,5 script Coin Manager#1::CM 733,{ // Your Server Max Zeny Amount set .MaxZeny,1000000000; // Coins Item ID and each Coins Costs setarray .Coins[1],677; setarray .Zeny[1],10000000; set @Menu$,""; for( set .@a,1; .@a < getarraysize( .Coins ); set .@a,.@a+1 ){ set @Menu$,@Menu$ + getitemname( .Coins[.@a] )+":"; } while( 1 ){ mes "Hello I am the Coin Manager, if you are interested in coins you have to talk with me,What can i help you with?"; next; switch( select( "I want trade Coin to Zeny:I want trade Zeny to Coin" ) ){ Case 1: mes "Very well. But im only interested on really expensive Coins made of Platinum:"; for( set .@a,1; .@a < getarraysize( .Coins ); set .@a,.@a+1 ){ mes "^0000FF"+getitemname( .Coins[.@a] )+" ^FF0000"+.Zeny[.@a]+"^000000 Zeny."; } next; set .@a,select( @Menu$ ); mes "Select the Amount of Coins you want to trade into Zeny."; mes "You have "+countitem( .Coins[.@a] )+" "+getitemname( .Coins[.@a] )+"."; input @Amount,0,countitem( .Coins[.@a] ); if( @Amount < 1 ){ mes "You don't have that quantity of Coins."; }else if( ( Zeny + ( @Amount * .Zeny[.@a] ) ) > .MaxZeny ){ mes "You can't hold this amount of Zeny."; }else{ set Zeny,Zeny + ( @Amount * .Zeny[.@a] ); delitem .Coins[.@a],@Amount; mes "Done, you have traded "+@Amount+" of "+getitemname(.Coins[.@a])+" into "+( @Amount * .Zeny[.@a] )+" Zeny."; } next; break; Case 2: mes "Very well. Here is the list on how much each coin is worth:"; for( set .@a,1; .@a < getarraysize( .Coins ); set .@a,.@a+1 ){ mes "^0000FF"+getitemname( .Coins[.@a] )+" ^FF0000"+.Zeny[.@a]+"^000000 Zeny."; } next; set .@a,select( @Menu$ ); mes "Select the Amount of Zeny you want to trade into "+getitemname( .Coins[.@a] )+"."; mes "You can get maximum of "+Zeny/.Zeny[.@a]+" "+getitemname( .Coins[.@a] )+"."; input @Amount,0,Zeny/.Zeny[.@a]; if( @Amount < 1 ){ mes "You don't have that quantity of Zeny."; }else{ set Zeny,Zeny - ( @Amount * .Zeny[.@a] ); getitem .Coins[.@a],@Amount; mes "Done, you have traded "+( @Amount * .Zeny[.@a] )+" Zeny into "+@Amount+" of "+getitemname(.Coins[.@a])+" ."; } next; break; } } close; } payon,164,222,2 duplicate(CM) Coin Manager#2 733 turbo_room,93,117,5 duplicate(CM) Coin Manager#3 733
  2. prontera.gat,144,173,3 script Berry Trader#1:BT 91,{ set $@npcname_mpq$, "^4000C0[Trader]^000000"; mes $@npcname_mpq$; mes "Hi, I'm the Yggdrasil Berry Trader, I can pack them into boxes for easir trading! Would you like to do some packing?"; next; menu "Yes, Please!",L_Berry,"No Thanks.",L_Exit; L_Berry: mes $@npcname_mpq$; mes "This is what I need to make you an Yggdrasil Berry Box!"; next; mes "x10 Yggdrasil Berry"; next; mes $@npcname_mpq$; mes "So, you want it, Right?"; next; mes $@npcname_mpq$; menu "Sure!",-,"No, thanks.",Lnotenuff; mes $@npcname_mpq$; if(countitem(607) < 10) goto LNotEnough; delitem 607,10; mes "You really have 10 Berrys? Okay, let's trade!"; getitem 14232,1; mes ". . ."; mes "Thank you sweety. Dont ygg too much!"; close; LNotEnough: mes "You dont have the required items...?"; mes "Come back when you are actually ready. Now gtfo!"; close; Lnotenuff: mes "Wtf, come back when you got the goods!"; close; L_Exit: close; } the script its working good, it does trade ygg berry to ygg box[10] but only 10 by 10, i want it ask how much ygg you want to packet into boxes. sry for my bad english thanks in advance guys!!!
  3. plz somebody help me with this, all my refiners npc dont talk, who know how to fix it? i supossed to have a callfunc error but this was same script i was using in another server and it does work perfectly there.
  4. ty somebody already help me and its fixed.
  5. but i checked and its normal its in english.
  6. somebody can tell me how to fix this? thanks in advance
  7. david already help me thnk you guys its solved
  8. i leave the default ip only removed the // its 127.0.0.1
  9. hello guys im new in this forum, im trying to make a Sql-Server but every time i tried it happen this same thing, anyone know how to fix it? if somebody can help me plz and i want to make this server Pre-Renewal, thanks in advance, another Svn Recomendations are welcome too!!
×
×
  • Create New...