prontera.gat,153,181,5	script	Platinum Skills NPC	791,{

mes "[Platinum Skills NPC]";
mes "Hello. I'm Platinum Skills NPC, the Spell Master. I can give special skills for 2nd class. You want learn those skills now??";
mes "Be warned that I can't teach any skill if you aren't 2nd class.";
next;
menu "Yes teach me",-,"No, thanks.",Lnogetskills;

// Block
if ((Class >= 0) && (Class <= 6)) goto Lsorry;
if ((Class >= 4001) && (Class <= 4007)) goto Lsorry;

// Swordsman
if ((Class==7) || (Class==4008) || (Class==4030))  goto Lskillkina;
if ((Class==14) || (Class==4015) || (Class==4037)) goto Lskillcrus;

// Mage
if ((Class==9) || (Class==4010) || (Class==4032)) goto Lskillwiza;
if ((Class==16) || (Class==4017) || (Class==4039)) goto Lskillsage;

// Archer
if ((Class==11) || (Class==4012) || (Class==4034)) goto Lskillhunt;
if ((Class==19) || (Class==4020) || (Class==4042)) goto Lskillbard;
if ((Class==20) || (Class==4021) || (Class==4043)) goto Lskilldanc;

// Acolyte
if ((Class==8) || (Class==4009) || (Class==4031)) goto Lskillprie;
if ((Class==15) || (Class==4016) || (Class==4038)) goto Lskillmonk;

// Merchant
if ((Class==10) || (Class==4011) || (Class==4033)) goto Lskillblac;
if ((Class==18) || (Class==4019) || (Class==4041)) goto Lskillalch;

// Thief
if ((Class==12) || (Class==4013) || (Class==4035)) goto Lskillassa;
if ((Class==17) || (Class==4018) || (Class==4040)) goto Lskillrogu;

Lsorry:
emotion e_sry;
mes "[Platinum Skills NPC]";
mes "Sorry, I can't give any skills to you.";
close;

Lnogetskills:
emotion e_sry;
mes "[Platinum Skills NPC]";
mes "Ok... So, be like you want...";
close;

Lskillkina:
mes "[Platinum Skills NPC]";
mes "I see that you are a Knight, Lord Knight or Baby Knight. I will add the special skills now.";
skill 142,1,0;
skill 144,1,0;
skill 145,1,0;
skill 146,1,0;
skill 1001,1,0;
next;
goto LskillsEND;

Lskillcrus:
mes "[Platinum Skills NPC]";
mes "I see that you are a Crusader, Paladin or Baby Crusader. I will add the special skills now.";
skill 142,1,0;
skill 144,1,0;
skill 145,1,0;
skill 146,1,0;
skill 1002,1,0;
next;
goto LskillsEND;

Lskillwiza:
mes "[Platinum Skills NPC]";
mes "I see that you are a Wizard, High Wizard or Baby Wizard. I will add the special skills now.";
skill 142,1,0;
skill 157,1,0;
skill 1006,1,0;
next;
goto LskillsEND;

Lskillsage:
mes "[Platinum Skills NPC]";
mes "I see that you are a Sage, Professor or Baby Sage. I will add the special skills now.";
skill 142,1,0;
skill 157,1,0;
skill 1007,1,0;
if(sage_ele == 1) skill 1008,1,0;
if(sage_ele == 2) skill 1017,1,0;
if(sage_ele == 3) skill 1018,1,0;
if(sage_ele == 4) skill 1019,1,0;
if(sage_ele == 0) {
next;
mes "[Platinum Skills NPC]";
mes "Well, now you need select wich element you want for the Elemental Change.";
switch( select("I want Water!","I want Earth!","I want Fire!","I want Wind!") ) {
case 1: skill 1008,1,0; set sage_ele,1;
case 2: skill 1017,1,0; set sage_ele,2;
case 3: skill 1018,1,0; set sage_ele,3;
case 4: skill 1019,1,0; set sage_ele,4;
}
goto LskillsEND;

Lskillhunt:
mes "[Platinum Skills NPC]";
mes "I see that you are a Hunter, Sniper or Baby Hunter. I will add the special skills now.";
skill 142,1,0;
skill 147,1,0;
skill 148,1,0;
skill 1009,1,0;
next;
goto LskillsEND;

Lskillbard:
mes "[Platinum Skills NPC]";
mes "I see that you are a Bard, Clown or Baby Bard. I will add the special skills now.";
skill 142,1,0;
skill 147,1,0;
skill 148,1,0;
skill 1010,1,0;
next;
goto LskillsEND;

Lskilldanc:
mes "[Platinum Skills NPC]";
mes "I see that you are a Dancer, Gypsy or Baby Dancer. I will add the special skills now.";
skill 142,1,0;
skill 147,1,0;
skill 148,1,0;
skill 1011,1,0;
next;
goto LskillsEND;

Lskillprie:
mes "[Platinum Skills NPC]";
mes "I see that you are a Priest, High Priest or Baby Priest. I will add the special skills now.";
skill 142,1,0;
skill 156,1,0;
skill 1014,1,0;
skill 363,10,0;
next;
goto LskillsEND;

Lskillmonk:
mes "[Platinum Skills NPC]";
mes "I see that you are a Monk, Champion or Baby Monk. I will add the special skills now.";
skill 142,1,0;
skill 156,1,0;
skill 1015,1,0;
skill 1016,10,0;
next;
goto LskillsEND;

Lskillblac:
mes "[Platinum Skills NPC]";
mes "I see that you are a BlackSmith, White Smith or Baby BlackSmith. I will add the special skills now.";
skill 142,1,0;
skill 153,1,0;
skill 154,1,0;
skill 155,1,0;
skill 1012,1,0;
skill 1013,1,0;
next;
goto LskillsEND;

Lskillalch:
mes "[Platinum Skills NPC]";
mes "I see that you are a Alchemist, Creator or Baby Alchemist. I will add the special skills now.";
skill 142,1,0;
skill 153,1,0;
skill 154,1,0;
skill 155,1,0;
if(alch_bock != 1) {
getitem 7434,1; }
set alch_bock,1;
}
next;
goto LskillsEND;

Lskillassa:
mes "[Platinum Skills NPC]";
mes "I see that you are a Assassin, Assassin Cross or Baby Assassin. I will add the special skills now.";
skill 142,1,0;
skill 149,1,0;
skill 150,1,0;
skill 151,1,0;
skill 152,1,0;
skill 1003,1,0;
skill 1004,1,0;
next;
goto LskillsEND;

Lskillrogu:
mes "[Platinum Skills NPC]";
mes "I see that you are a Rogue, Stalker or Baby Rogue. I will add the special skills now.";
skill 142,1,0;
skill 149,1,0;
skill 150,1,0;
skill 151,1,0;
skill 152,1,0;
skill 1005,1,0;
next;
goto LskillsEND;

LskillsEND:
emotion 10;
mes "[Platinum Skills NPC] ";
mes "Now you have the special skills available for your class.";
next;
mes "[Platinum Skills NPC]";
mes "Have a good day.";
close;
}