Add Stats and Add Skill NPC

[Hatake Kakashi]

Add Stats and Add Skill NPC, but you need to have pods if you want to add your stats and skills.

thanks in advanced.

[Elijah23]

Try this code...

prontera,155,181,5 script Sample 436,{
set .BuyCost,10;
set .Point,10;
switch(select("Buy Skill Points:Buy Stat Points")){
Case 1:
mes "How many Skill Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount * .BuyCost ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Skill Points.";
set SkillPoint,SkillPoint + (@Amount * .Point);
delitem 7179,@Amount * .BuyCost;
close;
Case 2:
mes "How many Stat Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount * .BuyCost){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Stat Points.";
set StatusPoint,StatusPoint + (@Amount * .Point);
delitem 7179,@Amount * .BuyCost;
close;
}
}

So you'll just need to edit the value of .Point..

[Rikimaru]

What do you mean with "You need pods if you want to add stats and skills" ? What are pods and I'm going to do make it for you.

[Arcenciel]

PODs are proof of donation.

[manabeast]

he need a npc that can give extra stat for player.

example: lv99 player.

buy pod then pay that npc to get extra stat. if that player are rich he can abuse his money to get all stat 99 or 999.

[Hatake Kakashi]

yes, @manabeast is correct.

[Elijah23]

Try this.. it's working fine with me... It's set to 1 pod = 1 stat/skill

prontera,155,181,5 script Seller 436,{
set .BuyCost,1;
switch(select("Buy Skill Points:Buy Stat Points")){
Case 1:
mes "How many Skill Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
next;
mes "Gained "[email protected]+" Skill Points.";
set SkillPoint,SkillPoint + @Amount;
delitem 7179,@Amount;
close;
Case 2:
mes "How many Stat Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
next;
mes "Gained "[email protected]+" Stat Points.";
set StatusPoint,StatusPoint + @Amount;
delitem 7179,@Amount;
close;
}
}

[Emistry]

you should have add

if( countitem( 7179 ) < @Amount ){
mes "Not Enough POD";
close;
}

your script will return ERROR when they input a number that is large than their current POD amount.

or another way...

input @Amount,0,countitem( 7179 );

[Elijah23]

you should have add

if( countitem( 7179 ) < @Amount ){
mes "Not Enough POD";
close;
}

your script will return ERROR when they input a number that is large than their current POD amount.

Ohh thanks to that sir Emistry.. miss that part..

[Hatake Kakashi]

not working. got some errors. i dont know where exact i put this line.

if( countitem( 7179 ) < @Amount ){

mes "Not Enough POD";

close;

}

[Elijah23]

It should look like this..

prontera,155,181,5    script    Sample    436,{
set .BuyCost,1;
switch(select("Buy Skill Points:Buy Stat Points")){
Case 1:
mes "How many Skill Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Skill Points.";
set SkillPoint,SkillPoint + @Amount;
delitem 7179,@Amount;
close;
Case 2:
mes "How many Stat Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Stat Points.";
set StatusPoint,StatusPoint + (@Amount);
delitem 7179,@Amount;
close;
}
}

[Hatake Kakashi]

its working but i can't change into 10 pods npc exchange 1 pc only.

guild_vs3,51,51,5    script    Skills & Stats Seller    436,{
set .BuyCost,10;
switch(select("Buy Skill Points:Buy Stat Points")){
Case 1:
mes "How many Skill Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Skill Points.";
set SkillPoint,SkillPoint + @Amount;
delitem 7179,@Amount;
close;
Case 2:
mes "How many Stat Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Reunited Donation Ticket";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 30151 ) < @Amount ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Stat Points.";
set StatusPoint,StatusPoint + (@Amount);
delitem 30151,@Amount;
close;
}
}

[Elijah23]

All you need to do is add the multiplier .Buycost

So it would be like this..

delitem 7179,@Amount * .BuyCost;

[Hatake Kakashi]

so all the code like this

delitem 7179,@Amount;

i will change into this?

delitem 7179,@Amount * .BuyCost

is this correct?

[Elijah23]

yes..

[Hatake Kakashi]

i got some bug. when my Proof Of Donation is 2pcs or 3pcs in my inventory and i use this npc, my pods not deleted but my skill points added..

[Elijah23]

Forgot to add multiplier in the checker...

if( countitem( 7179 ) < @Amount * .BuyCost ){
mes "Not Enough POD";
close;
}

Edited January 15, 2012 by wakoko321

[Hatake Kakashi]

here's my script

its working now, but in stats i want to change 1 stats only give npc, i need to change into 10. how to put that 10 stats? thanks

guild_vs3,51,51,5    script    Skills & Stats Seller    436,{
set .BuyCost,10;
switch(select("Buy Skill Points:Buy Stat Points")){
Case 1:
mes "How many Skill Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Pod.";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount * .BuyCost ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Skill Points.";
set SkillPoint,SkillPoint + @Amount;
delitem 7179,@Amount * .BuyCost;
close;
Case 2:
mes "How many Stat Points you want to Buy ?";
mes "Each Cost "+.BuyCost+" Reunited Donation Ticket";
input @Amount,0;
if( @Amount == 0 ) close;
if( countitem( 7179 ) < @Amount * .BuyCost ){
   mes "Not Enough POD";
   close;
}
next;
mes "Gained "[email protected]+" Stat Points.";
set StatusPoint,StatusPoint + (@Amount);
delitem 30151,@Amount * .BuyCost;
close;
}
}