[provocating]

Getting it to where it is easier to read. Still responding to hails?

sub EVENT_SAY
{
	if($text =~/Hail/i)
	{
		quest::say("Greetings $name. If you want me to set your skills for you, please say so and I will give you my [pricelist].");
	}

if($text=~/pricelist/i)
	{
		quest::say("I can set all skills to the following skill levels : level 20 = 10 pp // level 40 = 40 pp // level 60 = 80 pp // level 80 = 160 pp // level 100 = 320 pp // level 120 = 640 pp // level 150 = 1280 pp // level 200 = 2560 pp // level 250 = 5000 pp");}
	}
}

sub EVENT_ITEM
{
	if($platinum == 10)
	{
		quest::setallskill(20);
	}
	if($platinum == 40)
	{
		quest::setallskill(40);
	}
	if($platinum == 80)
	{
		quest::setallskill(60);
	}
	if($platinum == 160)
	{
		quest::setallskill(80);
	}
	if($platinum == 320)
	{
		quest::setallskill(100);
	}
	if($platinum == 640)
	{
		quest::setallskill(120);
	}
	if($platinum == 1280)
	{
		quest::setallskill(150);
	}
	if($platinum == 2560)
	{
		quest::setallskill(200);
	}
	if($platinum == 5000)
	{
		quest::setallskill(250);
	}
}