Regenbogen Quest

02/10/2013 17:36 hoizi22111995#1
Hi liebe Com!

Da ich keine 0815 regenbogen.quest haben wollte, hab ich mir kurzerhand ne eigene geschrieben. Ist eig wie ne normale regenbogen.quest nur werden Rang, Pferd, Pferdeskill, ... auch perfektioniert. Als ich quests reloaded hab, hat mir der Server einen Fehler ausgespuckt :confused:
Error occured on compile .quest
Hier meine Quest:
PHP Code:

quest regenbogen begin
    state start begin
            when 50512.
use  begin
                
                say_title
("Regenbogenstein:")
                
say("Du möchtest also alle deine Skills auf")
                
say("Perfekter-Meister setzen?")
                
command("set "..pc.get_name() .." align 20000")
                
command("horse_level "..pc.get_name() .." 21")
                
pc.set_skill_level(122 2") 
                pc.set_skill_level(121 59"

                
pc.set_skill_level(124 59") 
                pc.set_skill_level(125 59"

                
pc.set_skill_level(126 59") 
                pc.set_skill_level(127 59"

                
pc.set_skill_level(128 59") 
                pc.set_skill_level(129 59"

                
pc.set_skill_level(130 59") 
                pc.set_skill_level(131 59"
)
                
pc.set_skill_level(137 59") 
                pc.set_skill_level(138 59"

                
pc.set_skill_level(139 59") 
                pc.set_skill_level(140 59"

                    
                if 
pc.job ==0 then
                say
("Wähle deine Lehre aus")
                        
                
local s=select("Körper","Mental")
                        
                if 
s==1 then
                
--Körper
                pc
.set_skill_group(1)
                
pc.set_skill_level(,59)
                
pc.set_skill_level(,59)
                
pc.set_skill_level(,59)
                
pc.set_skill_level(,59)
                
pc.set_skill_level(,59)
                
pc.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
if s==2 then
                
--Mentalo
                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.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
elseif pc.job ==1 then
                say
("Wähle deine Lehre aus")
                        
                
local s=select("Nahkampf","Bogen")
                        
                if 
s==1 then
                
--Nahkampf
                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.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
if s==2 then
                
--Fernkampf
                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.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
elseif pc.job ==2 then
                say
("Wähle deine Lehre aus")
                
local s=select("Magie","Waffe")
                        
                if 
s==1 then
                
--Magie
                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(8159)
                
pc.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
if s==2 then
                
--Waffe
                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)
                
pc.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
elseif pc.job ==3 then
                say
("Wähle deine Lehre aus")
                
local s=select("Heil","Drachen")
                        
                if 
s==1 then
                
--Heil
                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)
                
pc.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
                        
                
if s==2 then
                
--Drachen
                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)
                
pc.removeitem("50512"1)
                
say("Deine Skills sind auf Perfekter Meister")
                
end
            end
        end
    end
end 
02/10/2013 18:18 xLikeaBozzx3#2
Versuch es mal hier:
[Only registered and activated users can see links. Click Here To Register...]
02/10/2013 18:55 ©by Noa#3
PHP Code:
quest regenbogen begin 
    state start begin 
        when 50512.
use  begin         
            table
.foreachi(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()],function(r,skillpc.set_skill_level(skill,59end)
            
pc.changealignment(20000)
            
horse.set_level("21")
            
say("Deine Skills sind auf Perfekter Meister"
        
end
    end
end 
man kann hier nichts falsch machen