[SERVICE] Die Questkontrolle

Page 572 of 845 « First 72472522562570571 572 573574582622672 Last »
07/14/2013 15:20 Nunuh91#8566
Hi Guys, can u tell me what is wrong with this quest?
I receive this error:
Quote:
qc in malloc(): error: allocation failed
Abort (core dumped)
And Here is the Quest:
Code:
quest horse_buy begin
	state start begin
		when 20349."Comprar Cavalo" with horse.get_grade()==0 begin
			if pc.level<=4 then
				say_title("Comprar Cavalo")
				say("Precisas de ser um pouco experiente no reino")
				say("para poderes comprar um cavalo")
				say("")
				say_reward("Precisas de LV:5")
				say("")
			elseif pc.level>=4 then
				say_title("Comprar Cavalo")
				say("")
				say("Possuis alguma experiencia!")
				say("Queres comprar um cavalo?")
				say("Armado: 10K | Militar: 500K")
				say("")
				local b=select("Cavalo Armado" , "Cavalo Militar", "Fechar")
				if 1==b then
					if pc.money>=10000 then
					horse.set_level("11")
					pc.chagemoney(-10000)
					pc.giveitem(50052, 1)
					say_title("Comprar Cavalo")
					say("Ai tens o teu cavalo armado!")
					say("Trata bem dele.")
					say("")
				else
					if pc.money<10000 then
					say_title("Comprar Cavalo")
					say("Nao tens dinheiro suficiente")
					say("")
					say_reward("Precisas de 10K")
					say("")
				end
			
				elseif 2==b then
					if pc.money>=500000 then
					horse.set_level("21")
					pc.chagemoney(-500000)
					pc.giveitem(50053, 1)
					say_title("Comprar Cavalo")
					say("Ai tens o teu cavalo militar!")
					say("Trata bem dele.")
					say("")
				else
					if pc.money<500000 then
					say_title("Comprar Cavalo")
					say("Nao tens dinheiro suficiente")
					say("")
					say_reward("Precisas de 500K")
					say("")
				end
		end
	end
end
Help me :) and Thanks
07/14/2013 15:58 .LuckyStrike#8567
Quote:
Originally Posted by Nunuh91 View Post
Hi Guys, can u tell me what is wrong with this quest?
I receive this error:


And Here is the Quest:
Code:
quest horse_buy begin
	state start begin
		when 20349."Comprar Cavalo" with horse.get_grade()==0 begin
			if pc.level<=4 then
				say_title("Comprar Cavalo")
				say("Precisas de ser um pouco experiente no reino")
				say("para poderes comprar um cavalo")
				say("")
				say_reward("Precisas de LV:5")
				say("")
			elseif pc.level>=4 then
				say_title("Comprar Cavalo")
				say("")
				say("Possuis alguma experiencia!")
				say("Queres comprar um cavalo?")
				say("Armado: 10K | Militar: 500K")
				say("")
				local b=select("Cavalo Armado" , "Cavalo Militar", "Fechar")
				if 1==b then
					if pc.money>=10000 then
					horse.set_level("11")
					pc.chagemoney(-10000)
					pc.giveitem(50052, 1)
					say_title("Comprar Cavalo")
					say("Ai tens o teu cavalo armado!")
					say("Trata bem dele.")
					say("")
				else
					if pc.money<10000 then
					say_title("Comprar Cavalo")
					say("Nao tens dinheiro suficiente")
					say("")
					say_reward("Precisas de 10K")
					say("")
				end
			
				elseif 2==b then
					if pc.money>=500000 then
					horse.set_level("21")
					pc.chagemoney(-500000)
					pc.giveitem(50053, 1)
					say_title("Comprar Cavalo")
					say("Ai tens o teu cavalo militar!")
					say("Trata bem dele.")
					say("")
				else
					if pc.money<500000 then
					say_title("Comprar Cavalo")
					say("Nao tens dinheiro suficiente")
					say("")
					say_reward("Precisas de 500K")
					say("")
				end
		end
	end
end
Help me :) and Thanks

PHP Code:
quest horse_buy begin 
    state start begin 
        when 20349."Comprar Cavalo" with horse.get_grade() == 0 begin 
            if pc.level <= 4 then 
                say_title("Comprar Cavalo") 
                say("Precisas de ser um pouco experiente no reino") 
                say("para poderes comprar um cavalo") 
                say("") 
                say_reward("Precisas de LV:5") 
                say("") 
            elseif pc.level >= 4 then 
                say_title("Comprar Cavalo") 
                say("") 
                say("Possuis alguma experiencia!") 
                say("Queres comprar um cavalo?") 
                say("Armado: 10K | Militar: 500K") 
                say("") 
                local b=select("Cavalo Armado" , "Cavalo Militar", "Fechar") 
                if 1 == b then 
                    if pc.money>=10000 then 
                    horse.set_level("11") 
                    pc.chagemoney(-10000) 
                    pc.giveitem(50052, 1) 
                        say_title("Comprar Cavalo") 
                        say("Ai tens o teu cavalo armado!") 
                        say("Trata bem dele.") 
                        say("") 
                else 
                    if pc.money <= 10000 then 
                        say_title("Comprar Cavalo") 
                        say("Nao tens dinheiro suficiente") 
                        say("") 
                        say_reward("Precisas de 10K") 
                        say("") 
                end 
             
                elseif 2 == b then 
                    if pc.money >= 500000 then 
                    horse.set_level("21") 
                    pc.chagemoney(-500000) 
                    pc.giveitem(50053, 1) 
                        say_title("Comprar Cavalo") 
                        say("Ai tens o teu cavalo militar!") 
                        say("Trata bem dele.") 
                        say("") 
                else 
                    if pc.money <= 500000 then 
                    say_title("Comprar Cavalo") 
                        say("Nao tens dinheiro suficiente") 
                        say("") 
                        say_reward("Precisas de 500K") 
                        say("") 
                    end
                end 
            end 
        end 
    end 
end 
You forgott "ends"
07/14/2013 19:09 dopeness'#8568
PHP Code:
quest truhen_zero begin 
    state start begin 
        when login or pc.get_level() >= 1 begin
            set_state(truhen)
        end
    end
    state truhen begin
        when 50187.use begin
            local item_vnum = 10 --Schwert+0
            if pc.get_job() == 1 then
                item_vnum = 1000 --Dolche+0
            elseif pc.get_job() == 2 then                
                item_vnum = 10   --Schwert+0
            elseif pc.get_job() == 3 then
                item_vnum = 7000 --Fächer+0
            end
            pc.give_item2(item_vnum) --lvl 1er waffe je nach rasse
            pc.give_item2(27001, 20) --Roter Trank(K)
            pc.give_item2(27004, 10) --Blauer Trank(K)
            pc.give_item2(27110, 5)  --Grüner Trank(K)
            pc.give_item2(27113, 5)  --Violetter Trank(K)
            pc.remove_item(50187, 1) --Lehrlingstruhe I verschwindet
        end 
        when 50188.use with pc.get_level() >= 10 begin 
            pc.give_item2(72723, 1)  --Elixier der Sonne (K)
            pc.give_item2(27111, 3)  --Grüner Trank(M) 
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K)
            pc.give_item2(76008, 3)  --Medaille des Drachen 
            pc.give_item2(50189, 1)  --Lehrlingstruhe III
            pc.remove_item(50188, 1) --Lehrlingstruhe II verschwindet
        end 
        when 50189.use with pc.get_level() >= 20 begin 
            pc.give_item2(72727, 1)  --Elixier des Mondes (K)
            pc.give_item2(27111, 3)  --Grüner Trank(M)
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K) 
            pc.give_item2(76006, 1)  --Kompass des Metinsteins 
            pc.give_item2(76024, 3)  --Grüner Zauber
            pc.give_item2(76025, 3)  --Grüne Stärke
            pc.give_item2(50190, 1)  --Expertentruhe I
            pc.remove_item(50189, 1) --Lehrlingstruhe III verschwindet
        end 
        when 50190.use with pc.get_level() >= 30 begin 
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K) 
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(25040, 5)  --Segenschriftrollen
            pc.give_item2(70003, 1)  --Buch des Anführers            
            pc.give_item2(50191, 1)  --Expertentruhe II
            pc.remove_item(50190, 1) --Expertentruhe I verschwindet
        end 
        when 50191.use with pc.get_level() >= 40 begin 
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(71153, 1)  --Trank der Weisheit
            pc.give_item2(70003, 1)  --Buch des Anführers
            pc.give_item2(50192, 1)  --Expertentruhe III
            pc.remove_item(50191, 1) --Expertentruhe II verschwindet
        end 
        when 50192.use with pc.get_level() >= 50 begin 
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(70038, 20)  --Tapferkeitsümhänge
            pc.give_item2(71095, 5)  --Passierschein
            pc.give_item2(70058, 1)  --Teleportationsring
            pc.give_item2(50193, 1)  --Meistertruhe I
            pc.remove_item(50192, 1) --Expertentruhe III verschwindet
        end 
        when 50193.use with pc.get_level() >= 60 begin 
            pc.give_item2(71032, 3)  --Schriftrolle des Drachen
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(76000, 5)  --Pfirsichblütenwein
            pc.give_item2(50194, 1)  --Meistertruhe II
            pc.remove_item(50193, 1) --Meistertruhe I verschwindet
        end 
        when 50194.use with pc.get_level() >= 70 begin
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(76001, 2)  --Status-Neuverteilung
            pc.give_item2(71084, 3)  --Gegenstand verstärken
            pc.give_item2(71085, 3)  --Gegenstand verzaubern
            pc.give_item2(50195, 1)  --Meistertruhe III
            pc.remove_item(50194, 1) --Meistertruhe II verschwindet
        end 
        when 50195.use with pc.get_level() >= 80 begin
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(72728, 1)  --Elixier des Mondes (M)
            pc.give_item2(72728, 3)  --Elixier des Forschers
            pc.give_item2(50196, 1)  --Großmeistertruhe
            pc.remove_item(50195, 1) --Meistertruhe III verschwindet
        end 
        when 50196.use with pc.get_level() >= 90 begin
            pc.give_item2(39004, 1)  --Segenskugel
            pc.give_item2(72724, 1)  --Elixier der Sonne (M)
            pc.give_item2(76010, 3)  --Blutstein
            pc.give_item2(30319, 3)  --Schrumpfkopf
            pc.give_item2(50127, 1)  --Grüne Zaubertruhe
            pc.remove_item(50196, 1) --Großmeistertruhe verschwindet
        end 
    end 
end 
Ich bekomme zwar mit Lvl 1 die Truhe ins Inventar, kann sie jedoch nicht öffnen. Der Type ist auf 18 in der DB, und putty zeigt bei der quest auch keinen fehler an?
07/14/2013 19:35 .LuckyStrike#8569
Quote:
Originally Posted by .s[H]orty View Post
PHP Code:
quest truhen_zero begin 
    state start begin 
        when login or pc.get_level() >= 1 begin
            set_state(truhen)
        end
    end
    state truhen begin
        when 50187.use begin
            local item_vnum = 10 --Schwert+0
            if pc.get_job() == 1 then
                item_vnum = 1000 --Dolche+0
            elseif pc.get_job() == 2 then                
                item_vnum = 10   --Schwert+0
            elseif pc.get_job() == 3 then
                item_vnum = 7000 --Fächer+0
            end
            pc.give_item2(item_vnum) --lvl 1er waffe je nach rasse
            pc.give_item2(27001, 20) --Roter Trank(K)
            pc.give_item2(27004, 10) --Blauer Trank(K)
            pc.give_item2(27110, 5)  --Grüner Trank(K)
            pc.give_item2(27113, 5)  --Violetter Trank(K)
            pc.remove_item(50187, 1) --Lehrlingstruhe I verschwindet
        end 
        when 50188.use with pc.get_level() >= 10 begin 
            pc.give_item2(72723, 1)  --Elixier der Sonne (K)
            pc.give_item2(27111, 3)  --Grüner Trank(M) 
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K)
            pc.give_item2(76008, 3)  --Medaille des Drachen 
            pc.give_item2(50189, 1)  --Lehrlingstruhe III
            pc.remove_item(50188, 1) --Lehrlingstruhe II verschwindet
        end 
        when 50189.use with pc.get_level() >= 20 begin 
            pc.give_item2(72727, 1)  --Elixier des Mondes (K)
            pc.give_item2(27111, 3)  --Grüner Trank(M)
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K) 
            pc.give_item2(76006, 1)  --Kompass des Metinsteins 
            pc.give_item2(76024, 3)  --Grüner Zauber
            pc.give_item2(76025, 3)  --Grüne Stärke
            pc.give_item2(50190, 1)  --Expertentruhe I
            pc.remove_item(50189, 1) --Lehrlingstruhe III verschwindet
        end 
        when 50190.use with pc.get_level() >= 30 begin 
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K) 
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(25040, 5)  --Segenschriftrollen
            pc.give_item2(70003, 1)  --Buch des Anführers            
            pc.give_item2(50191, 1)  --Expertentruhe II
            pc.remove_item(50190, 1) --Expertentruhe I verschwindet
        end 
        when 50191.use with pc.get_level() >= 40 begin 
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(71153, 1)  --Trank der Weisheit
            pc.give_item2(70003, 1)  --Buch des Anführers
            pc.give_item2(50192, 1)  --Expertentruhe III
            pc.remove_item(50191, 1) --Expertentruhe II verschwindet
        end 
        when 50192.use with pc.get_level() >= 50 begin 
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(70038, 20)  --Tapferkeitsümhänge
            pc.give_item2(71095, 5)  --Passierschein
            pc.give_item2(70058, 1)  --Teleportationsring
            pc.give_item2(50193, 1)  --Meistertruhe I
            pc.remove_item(50192, 1) --Expertentruhe III verschwindet
        end 
        when 50193.use with pc.get_level() >= 60 begin 
            pc.give_item2(71032, 3)  --Schriftrolle des Drachen
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(76000, 5)  --Pfirsichblütenwein
            pc.give_item2(50194, 1)  --Meistertruhe II
            pc.remove_item(50193, 1) --Meistertruhe I verschwindet
        end 
        when 50194.use with pc.get_level() >= 70 begin
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(76001, 2)  --Status-Neuverteilung
            pc.give_item2(71084, 3)  --Gegenstand verstärken
            pc.give_item2(71085, 3)  --Gegenstand verzaubern
            pc.give_item2(50195, 1)  --Meistertruhe III
            pc.remove_item(50194, 1) --Meistertruhe II verschwindet
        end 
        when 50195.use with pc.get_level() >= 80 begin
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(72728, 1)  --Elixier des Mondes (M)
            pc.give_item2(72728, 3)  --Elixier des Forschers
            pc.give_item2(50196, 1)  --Großmeistertruhe
            pc.remove_item(50195, 1) --Meistertruhe III verschwindet
        end 
        when 50196.use with pc.get_level() >= 90 begin
            pc.give_item2(39004, 1)  --Segenskugel
            pc.give_item2(72724, 1)  --Elixier der Sonne (M)
            pc.give_item2(76010, 3)  --Blutstein
            pc.give_item2(30319, 3)  --Schrumpfkopf
            pc.give_item2(50127, 1)  --Grüne Zaubertruhe
            pc.remove_item(50196, 1) --Großmeistertruhe verschwindet
        end 
    end 
end 
Ich bekomme zwar mit Lvl 1 die Truhe ins Inventar, kann sie jedoch nicht öffnen. Der Type ist auf 18 in der DB, und putty zeigt bei der quest auch keinen fehler an?

Die geht bei mir
PHP Code:
quest truhen_zero begin 
    state start begin 
        when login begin
            pc.give_item2(50187)
            set_state(truhen)
        end
    end
    state truhen begin
        when 50187.use begin
            local item_vnum = 19 --Schwert+9
            horse.set_level(30)
            horse.summon(10)
            pc.change_money ( 50000000 )
            if pc.get_job() == 1 then
                item_vnum = 1009 --Dolche+9
            horse.set_level(30)
            horse.summon(10)
            pc.change_money ( 50000000 )
            elseif pc.get_job() == 2 then                
                item_vnum = 19   --Schwert+9
            horse.set_level(30)
            horse.summon(10)
            pc.change_money ( 50000000 )
            elseif pc.get_job() == 3 then
                item_vnum = 7009 --Fächer+9
            horse.set_level(30)
            horse.summon(10)
            pc.change_money ( 50000000 )
            end
            pc.give_item2(item_vnum) --lvl 1er waffe je nach rasse
            pc.give_item2(27001, 20) --Roter Trank(K)
            pc.give_item2(27004, 10) --Blauer Trank(K)
            pc.give_item2(27110, 5)  --Grüner Trank(K)
            pc.give_item2(27113, 5)  --Violetter Trank(K)
            pc.remove_item(50187, 1) --Lehrlingstruhe I verschwindet
        end 
        when 50188.use with pc.get_level() >= 10 begin 
            pc.give_item2(72723, 1)  --Elixier der Sonne (K)
            pc.give_item2(27111, 3)  --Grüner Trank(M) 
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K)
            pc.give_item2(76008, 3)  --Medaille des Drachen 
            pc.give_item2(50189, 1)  --Lehrlingstruhe III
            pc.remove_item(50188, 1) --Lehrlingstruhe II verschwindet
        end 
        when 50189.use with pc.get_level() >= 20 begin 
            pc.give_item2(72727, 1)  --Elixier des Mondes (K)
            pc.give_item2(27111, 3)  --Grüner Trank(M)
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K) 
            pc.give_item2(76006, 1)  --Kompass des Metinsteins 
            pc.give_item2(76024, 3)  --Grüner Zauber
            pc.give_item2(76025, 3)  --Grüne Stärke
            pc.give_item2(50190, 1)  --Expertentruhe I
            pc.remove_item(50189, 1) --Lehrlingstruhe III verschwindet
        end 
        when 50190.use with pc.get_level() >= 30 begin 
            pc.give_item2(27113, 3)  --Geschwindigkeits Trank(K) 
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(25040, 5)  --Segenschriftrollen
            pc.give_item2(70003, 1)  --Buch des Anführers            
            pc.give_item2(50191, 1)  --Expertentruhe II
            pc.remove_item(50190, 1) --Expertentruhe I verschwindet
        end 
        when 50191.use with pc.get_level() >= 40 begin 
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(71153, 1)  --Trank der Weisheit
            pc.give_item2(70003, 1)  --Buch des Anführers
            pc.give_item2(50192, 1)  --Expertentruhe III
            pc.remove_item(50191, 1) --Expertentruhe II verschwindet
        end 
        when 50192.use with pc.get_level() >= 50 begin 
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(70038, 20)  --Tapferkeitsümhänge
            pc.give_item2(71095, 5)  --Passierschein
            pc.give_item2(70058, 1)  --Teleportationsring
            pc.give_item2(50193, 1)  --Meistertruhe I
            pc.remove_item(50192, 1) --Expertentruhe III verschwindet
        end 
        when 50193.use with pc.get_level() >= 60 begin 
            pc.give_item2(71032, 3)  --Schriftrolle des Drachen
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(76000, 5)  --Pfirsichblütenwein
            pc.give_item2(50194, 1)  --Meistertruhe II
            pc.remove_item(50193, 1) --Meistertruhe I verschwindet
        end 
        when 50194.use with pc.get_level() >= 70 begin
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(76001, 2)  --Status-Neuverteilung
            pc.give_item2(71084, 3)  --Gegenstand verstärken
            pc.give_item2(71085, 3)  --Gegenstand verzaubern
            pc.give_item2(50195, 1)  --Meistertruhe III
            pc.remove_item(50194, 1) --Meistertruhe II verschwindet
        end 
        when 50195.use with pc.get_level() >= 80 begin
            pc.give_item2(71101, 3)  --Trank der Hast
            pc.give_item2(27112, 3)  --Trank des Angriffs
            pc.give_item2(72728, 1)  --Elixier des Mondes (M)
            pc.give_item2(72728, 3)  --Elixier des Forschers
            pc.give_item2(50196, 1)  --Großmeistertruhe
            pc.remove_item(50195, 1) --Meistertruhe III verschwindet
        end 
        when 50196.use with pc.get_level() >= 90 begin
            pc.give_item2(39004, 1)  --Segenskugel
            pc.give_item2(72724, 1)  --Elixier der Sonne (M)
            pc.give_item2(76010, 3)  --Blutstein
            pc.give_item2(30319, 3)  --Schrumpfkopf
            pc.give_item2(50127, 1)  --Grüne Zaubertruhe
            pc.remove_item(50196, 1) --Großmeistertruhe verschwindet
        end 
    end 
end 
07/14/2013 20:36 Azuko#8570
Hier habe einequest um BabyAzrael einen Bonus zu geben und zwar er soll den Bonus stark gegen monster geben jedoch bekommt man die 30% start gegen monster ned

Woran liegt das?

PHP Code:
when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
            if pc.getqf("pwahuang") == 0 then
                local old_horse_name = horse.get_name() ;
                    if string.len(old_horse_name) == 0 then
                        chat("Dein Haustier hat noch keinen Namen!")
                    end
                chat("Dein Haustier wurde gerufen!")
                local your_horse_level = horse.get_level()
                pc.setqf("horse_level_save", your_horse_level)
                pc.setqf("pwahuang_use", 1)
                pc.setqf("pwahuang", 1)
                affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 30, 60*60*8)
                horse.set_level("25")
                pet.unsummon() pet.summon()
                
                local horse_settings = pc.getqf("horse_level_save")
                horse.set_level(horse_settings)
            else
                chat("Dein Haustier verabschiedet sich nun von dir!")
                affect.remove_collect(apply.ATT_BONUS_TO_MONSTER, 30, 60*60*8)       
                pet.unsummon()
                pc.setqf("pwahuang_use", 0)
                pc.setqf("pwahuang", 0)
                
                local horse_settings = pc.getqf("horse_level_save")
                horse.set_level(horse_settings)
            
            end
        end
        when logout or login with pc.getqf("pwahuang_use") == 1 begin
            
            pc.setqf("pwahuang_use", 0)
            pc.setqf("pwahuang", 0)
                
            local horse_settings = pc.getqf("horse_level_save")
            horse.set_level(horse_settings)
            
            chat("Dein Haustier verlässt dich nun!")
                affect.remove_collect(apply.ATT_BONUS_TO_MONSTER, 30, 60*60*8) 
Es kommt kein fehler für die lösung gibts 15 e*g xD
07/14/2013 20:45 hr4rjuku#8571
Quote:
Originally Posted by Azuko View Post
Hier habe einequest um BabyAzrael einen Bonus zu geben und zwar er soll den Bonus stark gegen monster geben jedoch bekommt man die 30% start gegen monster ned

Woran liegt das?

PHP Code:
when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("icephoenix") == 0 and pc.getqf("reindeer") == 0 and pc.getqf("dog") == 0 and pc.getqf("lion") == 0 and pc.getqf("pig") == 0 and pc.getqf("tiger") == 0 begin
            if pc.getqf("pwahuang") == 0 then
                local old_horse_name = horse.get_name() ;
                    if string.len(old_horse_name) == 0 then
                        chat("Dein Haustier hat noch keinen Namen!")
                    end
                chat("Dein Haustier wurde gerufen!")
                local your_horse_level = horse.get_level()
                pc.setqf("horse_level_save", your_horse_level)
                pc.setqf("pwahuang_use", 1)
                pc.setqf("pwahuang", 1)
                affect.add_collect(apply.ATT_BONUS_TO_MONSTER, 30, 60*60*8)
                horse.set_level("25")
                pet.unsummon() pet.summon()
                
                local horse_settings = pc.getqf("horse_level_save")
                horse.set_level(horse_settings)
            else
                chat("Dein Haustier verabschiedet sich nun von dir!")
                affect.remove_collect(apply.ATT_BONUS_TO_MONSTER, 30, 60*60*8)       
                pet.unsummon()
                pc.setqf("pwahuang_use", 0)
                pc.setqf("pwahuang", 0)
                
                local horse_settings = pc.getqf("horse_level_save")
                horse.set_level(horse_settings)
            
            end
        end
        when logout or login with pc.getqf("pwahuang_use") == 1 begin
            
            pc.setqf("pwahuang_use", 0)
            pc.setqf("pwahuang", 0)
                
            local horse_settings = pc.getqf("horse_level_save")
            horse.set_level(horse_settings)
            
            chat("Dein Haustier verlässt dich nun!")
                affect.remove_collect(apply.ATT_BONUS_TO_MONSTER, 30, 60*60*8) 
Es kommt kein fehler für die lösung gibts 15 e*g xD
Es liegt daran, dass es "ATTBONUS_MONSTER" heißt und nicht "ATT_BONUS_TO_MONSTER"


Mfg Hr4rjuku
07/15/2013 12:21 Nunuh91#8572
Error:
Quote:
syntax error : [streing "ndhorsehorse . get_grade ( ) == 3"]:18 'then' expected
near 'pc'
get_horse.quest:73:abort (core dumped)

Quest:

PHP Code:
quest get_horse begin
    state start begin
        when 20349.chat."Cavalo Militar" begin
            say_title("Cavalo Militar")
            say("Bem Vindo a AlmaMT2, eu sou o")
            say("responsavel pelos cavalos do reino")
            say("Queres um cavalo militar?")
            local b=select("Sim" , "Nao")
            if 1 == b then
                pc.give_item2(50053, 1)
                horse.set_level("21")
                horse.summon()
                horse.ride()
                say_title("Cavalo Militar")
                say("Cuidado, se perderes o Livro do Cavalo")
                say("Militar, tera um custo bem grande")
                say("para conseguir um novo, o primeiro")
                say("e sempre gratuito.")
                say("")
                set_quest_state("get_horse", "ndhorse")
                set_state("ndhorse")
            end
        end
    end
    state ndhorse begin
        when 20349.chat."Cavalo Militar" with horse.get_grade() == 3 begin
            say_title("Outro Cavalo")
            say("O Livro do Cavalo Armado?")
            say("Perdeste o livro agora nao te vou")
            say("dar outro cavalo assim tao facilmente")
            say("Voces jovens querem tudo de mao dada")
            say("Se queres novamente um livro desses")
            say("Ou pagas um belo montante ou vais")
            say("numa missao, o que preferes?")
            say("")
            local d=select("Dar Gold" , "Fazer Missao" , "Fechar")
            if 1 == d then
                say_title("Dar Gold")
                say("Muito bem, um novo livro tem um custo")
                say("de 1KK, queres comprar?")
                local z=select("Sim" , "Nao")
                if 1 == z then
                    if pc.money >= 1000000
                    pc.give_item2(50053, 1)
                    pc.change_gold (-1000000)
                    horse.summon()
                    horse.ride()
                    say_title("Dar Gold")
                    say("")
                    say("")
                    say_reward("Ganhaste Livro do Cavalo Armado")
                    say("")
                else
                    pc.money <= 999999
                    say_title("Dar Gold")
                    say("Nao tens dinheiro rapaz")
                    say("")
            elseif 2 == d then
                say("Fazer Missao")
                say("Entao tu preferes fazer uma missao,")
                say("Quero um item especial que podes encontrar")
                say("na terra do gelo, faz-me isso")
                say("")
            end
        end
    end
end 
07/15/2013 12:50 fabian1233#8573
Here u are. End has missing



Quest:

PHP Code:
quest get_horse begin
    state start begin
        when 20349.chat."Cavalo Militar" begin
            say_title("Cavalo Militar")
            say("Bem Vindo a AlmaMT2, eu sou o")
            say("responsavel pelos cavalos do reino")
            say("Queres um cavalo militar?")
            local b=select("Sim" , "Nao")
            if 1 == b then
                pc.give_item2(50053, 1)
                horse.set_level("21")
                horse.summon()
                horse.ride()
                say_title("Cavalo Militar")
                say("Cuidado, se perderes o Livro do Cavalo")
                say("Militar, tera um custo bem grande")
                say("para conseguir um novo, o primeiro")
                say("e sempre gratuito.")
                say("")
                set_quest_state("get_horse", "ndhorse")
                set_state("ndhorse")
            end
        end
    end
    state ndhorse begin
        when 20349.chat."Cavalo Militar" with horse.get_grade() == 3 begin
            say_title("Outro Cavalo")
            say("O Livro do Cavalo Armado?")
            say("Perdeste o livro agora nao te vou")
            say("dar outro cavalo assim tao facilmente")
            say("Voces jovens querem tudo de mao dada")
            say("Se queres novamente um livro desses")
            say("Ou pagas um belo montante ou vais")
            say("numa missao, o que preferes?")
            say("")
            local d=select("Dar Gold" , "Fazer Missao" , "Fechar")
            if 1 == d then
                say_title("Dar Gold")
                say("Muito bem, um novo livro tem um custo")
                say("de 1KK, queres comprar?")
                local z=select("Sim" , "Nao")
                if 1 == z then
                    if pc.money >= 1000000
                    pc.give_item2(50053, 1)
                    pc.change_gold (-1000000)
                    horse.summon()
                    horse.ride()
                    say_title("Dar Gold")
                    say("")
                    say("")
                    say_reward("Ganhaste Livro do Cavalo Armado")
                    say("")
                else
                    pc.money <= 999999
                    say_title("Dar Gold")
                    say("Nao tens dinheiro rapaz")
                    say("")
                   end
            elseif 2 == d then
                say("Fazer Missao")
                say("Entao tu preferes fazer uma missao,")
                say("Quero um item especial que podes encontrar")
                say("na terra do gelo, faz-me isso")
                say("")
            end
        end
    end
end 
07/15/2013 13:03 Nunuh91#8574
Quote:
Originally Posted by fabian1233 View Post
Here u are. End has missing



Quest:

PHP Code:
quest get_horse begin
    state start begin
        when 20349.chat."Cavalo Militar" begin
            say_title("Cavalo Militar")
            say("Bem Vindo a AlmaMT2, eu sou o")
            say("responsavel pelos cavalos do reino")
            say("Queres um cavalo militar?")
            local b=select("Sim" , "Nao")
            if 1 == b then
                pc.give_item2(50053, 1)
                horse.set_level("21")
                horse.summon()
                horse.ride()
                say_title("Cavalo Militar")
                say("Cuidado, se perderes o Livro do Cavalo")
                say("Militar, tera um custo bem grande")
                say("para conseguir um novo, o primeiro")
                say("e sempre gratuito.")
                say("")
                set_quest_state("get_horse", "ndhorse")
                set_state("ndhorse")
            end
        end
    end
    state ndhorse begin
        when 20349.chat."Cavalo Militar" with horse.get_grade() == 3 begin
            say_title("Outro Cavalo")
            say("O Livro do Cavalo Armado?")
            say("Perdeste o livro agora nao te vou")
            say("dar outro cavalo assim tao facilmente")
            say("Voces jovens querem tudo de mao dada")
            say("Se queres novamente um livro desses")
            say("Ou pagas um belo montante ou vais")
            say("numa missao, o que preferes?")
            say("")
            local d=select("Dar Gold" , "Fazer Missao" , "Fechar")
            if 1 == d then
                say_title("Dar Gold")
                say("Muito bem, um novo livro tem um custo")
                say("de 1KK, queres comprar?")
                local z=select("Sim" , "Nao")
                if 1 == z then
                    if pc.money >= 1000000
                    pc.give_item2(50053, 1)
                    pc.change_gold (-1000000)
                    horse.summon()
                    horse.ride()
                    say_title("Dar Gold")
                    say("")
                    say("")
                    say_reward("Ganhaste Livro do Cavalo Armado")
                    say("")
                else
                    pc.money <= 999999
                    say_title("Dar Gold")
                    say("Nao tens dinheiro rapaz")
                    say("")
                   end
            elseif 2 == d then
                say("Fazer Missao")
                say("Entao tu preferes fazer uma missao,")
                say("Quero um item especial que podes encontrar")
                say("na terra do gelo, faz-me isso")
                say("")
            end
        end
    end
end 
I Continue with the same error :/
07/15/2013 13:19 .LuckyStrike#8575
Quote:
Originally Posted by Nunuh91 View Post
I Continue with the same error :/
I Cant found the error but i can give u a german
Horse_getting quest when this is helpfull.

PHP Code:
quest horse_getting begin
    state start begin
        when 20349.chat."Mein Pferd" with horse.get_level()==0 begin
            say_title("Stallbursche")
            say("Hallo "..pc.get_name())
            say("Um ein Pferd von mir zu bekommen")
            say("kannst du mir einfach einen")
            say("Gutschein abgeben.")
            say_item_vnum(50083)            
            if pc.count_item("50083")==0 then
                say("Bitte hole mir einen, dann werde")
                say("ich dir ein Pferd schenken.")
                return
            end
            say("Möchtest du mir den geben?")
            local s=select("Ja", "Nein")
            if s==2 then
                say_title("Stallbursche")
                say("Schade, dann geh bitte wieder.")
                return
            end
            if pc.count_item("50083")==0 then
                chat("ERROR!!!!")
                return
            end
            pc.remove_item("50083", 1)
            pc.give_item2("50051", 1)            
            say_title("Stallbursche")
            say("Oh danke! Hier kriegst du ein Pferd.")
            say("Pass gut drauf auf!")
            pc.set_skill_level(131, 10)
            horse.set_level(1)
            horse.summon()    
            horse.ride()                
        end
        when 20349.chat."Mein Kampfpferd" with horse.get_level()==1 and pc.get_level()>=20 begin
            say_title("Stallbursche")
            say("Hallo "..pc.get_name())
            say("Um ein Kampfpferd von mir zu bekommen")
            say("musst du mir etwas Yang bezahlen.")
            say("Die Pferde pflegen sich nicht von")
            say("alleine und mir geht bald das Futter")
            say("aus. Wenn du mir ein Kampfpferd für")
            say("7kk Yang abkaufst währe ich dir sehr")
            say("dankbar.")
            local s = select("Kaufen", "Nicht kaufen")
            if s==2 then return end
            say_title("Stallbursche")
            if pc.get_gold()<7000000 then
                say("Du hast zu wenig Yang um mir")
                say("eines abzukaufen.")
                return
            end            
            say("Oh danke! Hier kriegst du ein Kampfpferd.")
            say("Pass gut drauf auf!")
            pc.change_gold(-7000000)
            pc.give_item2("50052", 1)
            pc.remove_item("50051", 1)
            horse.unride()
            horse.set_level(11)
            horse.summon()    
            horse.ride()
        end
        when 20349.chat."Mein Millitärspferd" with horse.get_level()==11 and pc.get_level()>=35 begin
            say_title("Stallbursche")
            say("Hallo "..pc.get_name())
            say("Um ein Millitärspferd von mir zu bekommen")
            say("musst du mir einen Gefallen tun.")
            say("Der Oberork hat letztens eines meiner")
            say("Pferde getötet. Um ihn zu rächen wünsche")
            say("ich mir von dir, dass du ihn tötest.")
            say_reward("Willst du das für mich machen?")
            local s=select("Ja", "Nein")
            if s==2 then return    end
            say_title("Stallbursche")
            say("Danke, komme wieder wenn er erledigt")
            say("ist.")
            set_state(obi)
        end
    end
    state obi begin
        when 691.kill begin
            pc.setqf("obi", 1)
        end
        when 20349.chat."Mein Millitärspferd" begin    
            if pc.getqf("obi")==0 then
                say_title("Stallbursche")
                say("Hallo "..pc.get_name())
                say("Um ein Millitärspferd von mir zu bekommen")
                say("musst du mir einen Gefallen tun.")
                say("Der Oberork hat letztens eines meiner")
                say("Pferde getötet. Um ihn zu rächen wünsche")
                say("ich mir von dir, dass du ihn tötest.")
                say_reward("Willst du das für mich machen?")
                local s=select("Ja", "Nein")
                if s==2 then
                    return
                end            
                say_title("Stallbursche")
                say("Danke, komme wieder wenn er erledigt")
                say("ist.")
                return
            end
            say_title("Stallbursche")
            say("Oh danke, du hast ihn getötet!")
            say("Hier kriegst du ein Millitärspferd")
            say("Pass gut drauf auf!")                            
            pc.give_item2("50053", 1)
            pc.remove_item("50052", 1)
            horse.unride()
            horse.set_level(21)
            horse.summon()
            horse.ride()
            set_state(ende)            
        end
    end
    state ende begin
    end
end 
07/15/2013 13:47 dopeness'#8576
Irgentwie funktioniert die Quest nicht so ganz wie ich will.. (Kriege immer fehler in putty)

Kann mir auch jemand so einstellen das statt "Du kannst nicht auf das Tal der Finsterniss!" entweder "Dein level ist zu Niedrig" oder "Du besitzt keinen Glyphenstein" kommt?

PHP Code:
quest 80erMap begin 
    state start begin 
        when 33003.chat."Tal der Finsterniss" begin 
            say("Hallo Reisender.") 
            say("Du möchtest also auf das Tal der Finterniss?") 
            say("Harr. Harr.") 
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!") 
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst") 
            say_reward("Außerdem musst du mind. Level 80 sein!")            
            local s = select("Los!","Abbrechen") 
            if s == 1 then
                if pc.count_item(30619) >= 1 and pc.get_level() >= 80 then 
                    say("Mutig, mutig..") 
                    say("Viel spaß im Tal der Finsterniss!) 
                    pc.warp(13500,7000)
                else
                    say("Du kannst nicht auf das Tal der Finsterniss!")
                end
            elseif s == 2 then
                return
            end
        end 
    end 
end 
07/15/2013 15:55 .LuckyStrike#8577
Quote:
Originally Posted by .s[H]orty View Post
Irgentwie funktioniert die Quest nicht so ganz wie ich will.. (Kriege immer fehler in putty)

Kann mir auch jemand so einstellen das statt "Du kannst nicht auf das Tal der Finsterniss!" entweder "Dein level ist zu Niedrig" oder "Du besitzt keinen Glyphenstein" kommt?

PHP Code:
quest 80erMap begin 
    state start begin 
        when 33003.chat."Tal der Finsterniss" begin 
            say("Hallo Reisender.") 
            say("Du möchtest also auf das Tal der Finterniss?") 
            say("Harr. Harr.") 
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!") 
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst") 
            say_reward("Außerdem musst du mind. Level 80 sein!")            
            local s = select("Los!","Abbrechen") 
            if s == 1 then
                if pc.count_item(30619) >= 1 and pc.get_level() >= 80 then 
                    say("Mutig, mutig..") 
                    say("Viel spaß im Tal der Finsterniss!) 
                    pc.warp(13500,7000)
                else
                    say("Du kannst nicht auf das Tal der Finsterniss!")
                end
            elseif s == 2 then
                return
            end
        end 
    end 
end 

Hoffe, sie ist Richtig kann gerade keine Quests kontrollieren.

PHP Code:
quest 80erMap begin  
    state start begin  
        when 33003.chat."Tal der Finsterniss" begin  
            say("Hallo Reisender.")  
            say("Du möchtest also auf das Tal der Finterniss?")  
            say("Harr. Harr.")  
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!")  
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst")  
            say_reward("Außerdem musst du mind. Level 80 sein!")             
            local s = select("Los!","Abbrechen")  
            if s == 1 then with pc.get_item(30619) and pc.get_level() >= 80 then
                say("Mutig, mutig..")
                say("Viel Spaß im Tal der Finstaniss!")
                pc.warp(13500,7000)
            end
        else
            say("Du besitzt das Item nicht oder")
            say("dein Level ist zu niedrig.")
            say("")
        end
    end
end 
07/15/2013 16:45 dopeness'#8578
Quote:
Originally Posted by .LuckyStrike View Post
Hoffe, sie ist Richtig kann gerade keine Quests kontrollieren.

PHP Code:
quest 80erMap begin  
    state start begin  
        when 33003.chat."Tal der Finsterniss" begin  
            say("Hallo Reisender.")  
            say("Du möchtest also auf das Tal der Finterniss?")  
            say("Harr. Harr.")  
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!")  
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst")  
            say_reward("Außerdem musst du mind. Level 80 sein!")             
            local s = select("Los!","Abbrechen")  
            if s == 1 then with pc.get_item(30619) and pc.get_level() >= 80 then
                say("Mutig, mutig..")
                say("Viel Spaß im Tal der Finstaniss!")
                pc.warp(13500,7000)
            end
        else
            say("Du besitzt das Item nicht oder")
            say("dein Level ist zu niedrig.")
            say("")
        end
    end
end 
PHP Code:
Error occured on compile 80erMap.quest 
07/15/2013 17:17 .LuckyStrike#8579
Quote:
Originally Posted by .s[H]orty View Post
PHP Code:
Error occured on compile 80erMap.quest 

PHP Code:
quest 80erMap begin  
    state start begin  
        when 33003.chat."Tal der Finsterniss" begin  
            say("Hallo Reisender.")  
            say("Du möchtest also auf das Tal der Finterniss?")  
            say("Harr. Harr.")  
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!")  
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst")  
            say_reward("Außerdem musst du mind. Level 80 sein!")             
            local s = select("Los!","Abbrechen")  
            if s == 1 with item.get_vnum(30619) and pc.get_level() >= 80 then
                say("Mutig, mutig..")
                say("Viel Spaß im Tal der Finstaniss!")
                pc.warp(13500,7000)
            end
        else
            say("Du besitzt das Item nicht oder")
            say("dein Level ist zu niedrig.")
            say("")
        end
    end
end 
07/15/2013 17:51 ProfessorEnte#8580
Quote:
Originally Posted by .LuckyStrike View Post
PHP Code:
quest 80erMap begin  
    state start begin  
        when 33003.chat."Tal der Finsterniss" begin  
            say("Hallo Reisender.")  
            say("Du möchtest also auf das Tal der Finterniss?")  
            say("Harr. Harr.")  
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!")  
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst")  
            say_reward("Außerdem musst du mind. Level 80 sein!")             
            local s = select("Los!","Abbrechen")  
            if s == 1 with item.get_vnum(30619) and pc.get_level() >= 80 then
                say("Mutig, mutig..")
                say("Viel Spaß im Tal der Finstaniss!")
                pc.warp(13500,7000)
            end
        else
            say("Du besitzt das Item nicht oder")
            say("dein Level ist zu niedrig.")
            say("")
        end
    end
end 
PHP Code:
quest s80erMap begin  
    state start begin  
        when 33003.chat."Tal der Finsterniss" begin  
            say("Hallo Reisender.")  
            say("Du möchtest also auf das Tal der Finterniss?")  
            say("Harr. Harr.")  
            say("Wenn du nicht aufpasst werden dich meine Brüder zerfetzen!")  
            say_reward("Ich bringe dich dorthin, wenn du mir einen Glyphenstein bringst")  
            say_reward("Außerdem musst du mind. Level 80 sein!")             
            local s = select("Los!","Abbrechen")  
            if s == 1 then
                if pc.count_item(30619) > 0 and pc.get_level() >= 80 then
                    say("Mutig, mutig..")
                    say("Viel Spaß im Tal der Finstaniss!")
                    pc.warp(13500,7000)
                else
                    say("Du besitzt das Item nicht oder")
                    say("dein Level ist zu niedrig.")
                    say("")
                end
            end
        end
    end
end 
Page 572 of 845 « First 72472522562570571 572 573574582622672 Last »