Regenbogenstein

07/16/2013 18:53 BlackVIP94#1
Hallo,

Wie kann ich den Regenbogenstein entbuggen?
Und auch ab G1 ein Regenbogenstein gleich auf P

mfg
07/16/2013 19:05 Ivica.Lovro#2
Du kannst es auch direkt mit der Quest hier machen.

Code:
quest regenbogen begin
	state start begin
		when 50512.use begin                
			say_title("Regenbogenstein:")
			say("Du möchtest also deine Skills auf")
			say("Perfekter-Meister setzen?")
			if pc.get_skill_group()==0 then
				say_reward("Du musst zuerst eine Lehre wählen,")
				say_reward("bevor ich dir deine Skills auf Perfeckt")
				say_reward("setzen kann!")
				say_reward("Du kannst deine Lehre bei den Lehrern wählen")
				return
			end			
			if pc.job ==0 then
				say("Wähle deine Lehre aus")                
				local s=select("Körper","Mental","Doch nicht!")                
				if s==1 and pc.count_item(50512)>=1 then                
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)
				end                
				if s==2 and pc.count_item(50512)>=1 then                
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)	
				end  
				if s==3 then
					return
				end
            elseif pc.job ==1 then
				say("Wähle deine Lehre aus")                
				local s=select("Nahkampf","Fernkampf","Doch nicht!")                
				if s==1 and pc.count_item(50512)>=1 then                
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)
				end
				if s==2 and pc.count_item(50512)>=1 then
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)			
				end  
				if s==3 then
					return
				end
            elseif pc.job ==2 then
				say("Wähle deine Lehre aus")
				local s=select("Magie","Waffe","Doch nicht!")                
				if s==1 and pc.count_item(50512)>=1 then
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)			
				end              
				if s==2 and pc.count_item(50512)>=1 then 		
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)
				end
				if s==3 then
					return
				end
            elseif pc.job ==3 then
				say("Wähle deine Lehre aus")
				local s=select("Drachen","Heil","Doch nicht!")                
				if s==1 and pc.count_item(50512)>=1 then			
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)
				end			
				if s==2 and pc.count_item(50512)>=1 then				
					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)
					say("Deine Skills sind auf Perfekter Meister")
					pc.remove_item(50512, 1)
                end 
				if s==3 then
					return
				end				
            end			
        end
    end
end

Quest aus den Invoice-Files.
Was meinst du überhaupt mit entbuggen?
07/16/2013 19:07 zуℓση#3
Type auf 18 setzen + Quest