Stat and Skill Point Seller

[Grphx]

any script like this? allow player to buy and sell skilll/stat points? please ty

[Grphx]

Thank you  but idk why the npc doesnt appear

[stydianx]

im sorry but... this is the only thing i can do. 

 

Edit: I dont know the one for the skill points

 

EmperiumRO,111,111,4	script	Dayum	121,{
	mes "[Stat Point Seller]";
	mes "Hey! i sell Stat Points! 300.000 zeny for 3 Stat point.";
	mes "How many Stat Points do you want to buy?";
	switch(select("3 Stat Point for 300.000z","10 Stat Points for 3,000.000z","20 Stat Points for 6,000,000z","30 Stat Points for 9,000,000z")) {
		case 1:
			mes "[Stat Point Seller]";
			mes "This will cost you 300,000 zeny. Is this ok?";
			next;
			if (select("Yes:No") == 2) close;
			mes "[Stat Point Seller]";
			if (Zeny < 300000) {
				mes "You do not have enough zeny!";
				close;
			}
			set StatusPoint,StatusPoint + 1;
			set Zeny,Zeny - 300000;
			mes "Thank you for your purchase.";
			close;
		
		case 2:
			mes "[Stat Point Seller]";
			mes "This will cost you 3.000.000 zeny. Is this ok?";
			next;
			if (select("Yes:No") == 2) close;
			mes "[Stat Point Seller]";
			if (Zeny < 3000000) {
				mes "You do not have enough zeny!";
				close;
			}
			set StatusPoint,StatusPoint + 10;
			set Zeny,Zeny - 3000000;
			mes "Thank you for your purchase.";
			close;

		case 3:
			mes "[Stat Point Seller]";
			mes "This will cost you 6.000.000 zeny. Is this ok?";
			next;
			if (select("Yes:No") == 2) close;
			mes "[Stat Point Seller]";
			if (Zeny < 6000000) {
				mes "You do not have enough zeny!";
				close;			}
			set StatusPoint,StatusPoint + 20;
			set Zeny,Zeny - 6000000;
			mes "Thank you for your purchase.";
			close;

		case 4:
			mes "[Stat Point Seller]";
			mes "This will cost you 9.000.000 zeny. Is this ok?";
			next;
			if (select("Yes:No") == 2) close;
			mes "[Stat Point Seller]";
			if (Zeny < 9000000) {
				mes "You do not have enough zeny!";
				close;			}
			set StatusPoint,StatusPoint + 30;
			set Zeny,Zeny - 9000000;
			mes "Thank you for your purchase.";
			close;


	}
}

Edited July 27, 2013 by stydianx

[Myth]

Try this Skill Seller

 

//Made by deathscythe13



prontera,155,93,4 script Skill Point seller 100,{



set .@paymentitemid,7227; // Edit Item ID use

set .@paymentamount,50;		 // Edit Amount



mes "[Skill Point Seller]";

mes "Hi i can sell you skill points for "+.@paymentamount+" "+getitemname(.@paymentitemid)+" equals 1 Skill Point";

mes "Do you like to buy a skill point?";

next;



if(select("Yes:No")==2) {

	  mes "[Skill Point Seller]";

	  mes "Ok Bye.";

	  close;

}



mes "[Skill Point Seller]";

mes "please input how many skill points you want or enter 0 to cancel";

next;

input .@points;

next;

mes "[Skill Point Seller]";



if(!.@points) {

		 mes "You have canceled buying.";

		 close;

}



if(countitem(.@paymentitemid) < (.@points*.@paymentamount)) {

		 mes "Sorry your "+getitemname(.@paymentitemid)+" is not enough.";

		 close;

}



delitem .@paymentitemid,(.@points*.@paymentamount);

set SkillPoint, SkillPoint+.@points;

mes "There you go have a nice day.";

close;

}

try this for stats seller 

Emistry

 

mes "How many Status Point you want to purchase ?";
mes "1 Point = 300,000 Zeny.";
mes "You have "+Zeny+" Zeny , can purchase "+( Zeny / 300000 )+" Points.";
input .@i,0,( Zeny / 300000 );
mes "You purchased "+.@i+" Points.";
set StatusPoint,StatusPoint + .@i;
set Zeny,Zeny - ( 300000 * .@i );
close;

[Myth]

mes "How many Status Point you want to purchase ?";
mes "1 Point = 300,000 Zeny.";
mes "You have "+Zeny+" Zeny , can purchase "+( Zeny / 300000 )+" Points.";
input .@i,0,( Zeny / 300000 );
mes "You purchased "+.@i+" Points.";
set StatusPoint,StatusPoint + .@i;
set Zeny,Zeny - ( 300000 * .@i );
close;
 

 

 

did you put a script like this?

prontera,111,111,5	script	Stats Seller	121,{

mes "How many Status Point you want to purchase ?";
mes "1 Point = 300,000 Zeny.";
mes "You have "+Zeny+" Zeny , can purchase "+( Zeny / 300000 )+" Points.";
input .@i,0,( Zeny / 300000 );
mes "You purchased "+.@i+" Points.";
set StatusPoint,StatusPoint + .@i;
set Zeny,Zeny - ( 300000 * .@i );
close;