Cod: Selectaţi tot

say_title ( "Piatra Curcubeu:" ) 
say ( "Cu aceastã piatrã ai posibilitatea de aþi" ) 
say ( "perfecþiona magiile la gradul de Perfect Master." ) 
say ( "Doreºti sã îþi perfecþionezi magiile?" ) 
if pc . job == 0 then 
say ( "Selecteazã categoria magiilor tale:" ) 
local s = select ( "Corp" , "Mental" , "Închide" ) 
if s == 1 then 
pc . set_skill_group ( 1 ) 
pc . set_skill_level ( 1 , 59 ) 
pc . set_skill_level ( 2 , 59 ) 
pc . set_skill_level ( 3 , 59 ) 
pc . set_skill_level ( 4 , 59 ) 
pc . set_skill_level ( 5 , 59 ) 
pc . set_skill_level ( 6 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
if s == 2 then 
pc . set_skill_group ( 2 ) 
pc . set_skill_level ( 16 , 59 ) 
pc . set_skill_level ( 17 , 59 ) 
pc . set_skill_level ( 18 , 59 ) 
pc . set_skill_level ( 19 , 59 ) 
pc . set_skill_level ( 20 , 59 ) 
pc . set_skill_level ( 21 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
elseif pc . job == 1 then 
say ( "Selecteazã categoria magiilor tale:" ) 
local s = select ( "Lamã " , "Arc" , "Închide" ) 
if s == 1 then 
pc . set_skill_group ( 3 ) 
pc . set_skill_level ( 31 , 59 ) 
pc . set_skill_level ( 32 , 59 ) 
pc . set_skill_level ( 33 , 59 ) 
pc . set_skill_level ( 34 , 59 ) 
pc . set_skill_level ( 35 , 59 ) 
pc . set_skill_level ( 36 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
if s == 2 then 
pc . set_skill_group ( 4 ) 
pc . set_skill_level ( 46 , 59 ) 
pc . set_skill_level ( 47 , 59 ) 
pc . set_skill_level ( 48 , 59 ) 
pc . set_skill_level ( 49 , 59 ) 
pc . set_skill_level ( 50 , 59 ) 
pc . set_skill_level ( 51 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
elseif pc . job == 2 then 
say ( "Selecteazã categoria magiilor tale:" ) 
local s = select ( "Magie neagrã " , "Arme magice" , "Închide" ) 
if s == 1 then 
pc . set_skill_group ( 5 ) 
pc . set_skill_level ( 76 , 59 ) 
pc . set_skill_level ( 77 , 59 ) 
pc . set_skill_level ( 78 , 59 ) 
pc . set_skill_level ( 79 , 59 ) 
pc . set_skill_level ( 80 , 59 ) 
pc . set_skill_level ( 81 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
if s == 2 then 
pc . set_skill_group ( 6 ) 
pc . set_skill_level ( 61 , 59 ) 
pc . set_skill_level ( 62 , 59 ) 
pc . set_skill_level ( 63 , 59 ) 
pc . set_skill_level ( 64 , 59 ) 
pc . set_skill_level ( 65 , 59 ) 
pc . set_skill_level ( 66 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
elseif pc . job == 3 then 
say ( "Selecteazã categoria magiilor tale:" ) 
local s = select ( "Vindecare" , "Binecuvântare" , "Închide" ) 
if s == 1 then 
pc . set_skill_group ( 7 ) 
pc . set_skill_level ( 106 , 59 ) 
pc . set_skill_level ( 107 , 59 ) 
pc . set_skill_level ( 108 , 59 ) 
pc . set_skill_level ( 109 , 59 ) 
pc . set_skill_level ( 110 , 59 ) 
pc . set_skill_level ( 111 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
if s == 2 then 
pc . set_skill_group ( 8 ) 
pc . set_skill_level ( 91 , 59 ) 
pc . set_skill_level ( 92 , 59 ) 
pc . set_skill_level ( 93 , 59 ) 
pc . set_skill_level ( 94 , 59 ) 
pc . set_skill_level ( 95 , 59 ) 
pc . set_skill_level ( 96 , 59 ) 
chat ( "[Piatra Curcubeului] Magiile tale au fost îmbunãtãþite la rangul de Maestru Perfect." ) 
pc . removeitem ( 50512 , 1 ) 
end 
end