[SERVICE] Die Questkontrolle

Page 819 of 845

819

04/06/2016 23:58 Jantux#12271

Quote:

Originally Posted by #..SyNTeX..<3

PHP Code:

quest change_name begin state start begin when 71055.use begin local bugfix_count = pc.count_item(item.get_vnum()) say_title "Wunschnamen - Einf�hrung" say "Herzlich Willkommen Nalunia2-Reloaded User:" say "Hier hast du die M�glichkeit dir deinen" say "Wunschnamen zu w�hlen." say "Sowohl Umlaute, Sonderzeichen als auch [] k�nnen" say "verwendet werden." say "" say_reward "Beachte bei der Wahl deines Namens die" say_reward "L�nge!" say "M�chtest du deinen Namen �ndern?" if select("Name wechseln", "Abbrechen") == 2 then return end say_title "Wunschnamen - Auswahl" say "Gib nun bitte deinen Wunschnamen an:" local inp = "" repeat inp = input() if inp == "" then say_title "Wunschnamen - Auswahl" say "M�chtest du abbrechen?" if select("Ja","Nein") == 1 then return end end until inp ~= "" for _,l in pairs{" "} do -- delete this characters inp = string.gsub(inp,l,"") end say_title "Wunschnamen - Best�tigung" say "Du hast dir folgenden Namen ausgew�hlt:" say_title (string.format("%q",string.gsub(string.gsub(inp,"%]",")"),"%[","("))) say_reward "Bist du dir sicher, dass du diesen Namen" say_reward "verwenden m�chtest?" if select("Best�tigen", "Abbrechen") == 2 then return end local _,_,y = string.find(inp,"^%[([^%]]*)%]") if y then local ly = string.upper(y) for _,l in pairs{"SA","GM","GA","SGA","SGM","TGM","MOD", "DEV", "SL", "Team", "SMOD", "TMOD", "TA", "BA", "CoMa", "YT", "N2"} do if ly == l then return say "Du kannst diesen Namen nicht benutzen!" end end end if bugfix_count ~= pc.count_item(item.get_vnum()) then notice "BUGUSER!" -- Als Strafe ALLE entfernen! pc.remove_item(item.get_vnum(),pc.count_item(item.get_vnum())) end local formatted_name = string.sub(string.format("%q",inp),2,-2) -- CHANGED local change = pc.change_name(formatted_name) if change == 4 then item.remove() -- Wenn stackbar: -- pc.remove_item(item.get_vnum(),1) end say_title "Wunschnamen - �nderung" say (({ "Namens�nderung fehlgeschlagen:[ENTER]Du hast deinen Namen innerhalb der letzten[ENTER]14 Tage bereits gewechselt.[ENTER]Bitte f�hre einen Relog durch!", "ERROR - Parameter fehler", -- << wird nie ingame angezeigt "Namens�nderung fehlgeschlagen:[ENTER]Du hast einen ung�ltigen Namen angegeben.", "Namens�nderung fehlgeschlagen:[ENTER]Dein ausgew�hlter Name existiert bereits.", "Namens�nderung erfolgreich:[ENTER]Herzlichen Gl�ckwunsch![ENTER]Dein Name wurde erfolgreich gewechselt.[ENTER]Bitte f�hre einen Relog durch, damit dein[ENTER]neuer Name sichtbar wird.", })[change+1]) say_reward "Auf Wiedersehen!" end end end

Laut der Quest kann man sein Namen �ndern mit SONDERZEICHEN dies klappt jedoch nicht :/ Kann mir da vlt jmd helfen?

Die Quest kann auch nicht so funktionieren wie du sie dir vorstellst,weil nirgends mysql_querry ausgef�hrt wird,die in die player table zugreift und dort den Namen �ndert.

04/07/2016 10:24 .SmartBoosterZ#12272

Hallo e*PvP,
habe ein Problem mit meiner Quest..
Quest wird angezeigt, funktioniert soweit auch, nur allerdings wird mir kein Text ausgegeben als notice_all..

PHP Code:


			
quest time_notice begin 

    state start begin 

        when 9009.chat."Automatische Nachrichten" with pc.is_gm() begin 

            say_title(mob_name(npc.get_race())) 

            say() 

            say("Serverzeit: "..os.date("%H:%M:%S")) 

            say("Das Nachrichtsystem ist gerade "..({[0]="Aus",[1]="An"})[game.get_event_flag("loop_time")]) 

            say("was m�chtest du tun?") 

            local s= select("Anschalten","Ausschalten","Abbrechen") 

            if s==3 then return end 

            if s==1 then 

                game.set_event_flag("loop_time",1) 

                server_loop_timer("loop_time",2,get_server_timer_arg()) 

            else 

                game.set_event_flag("loop_time",0) 

                clear_server_timer("loop_time") 

            end 

            say("Nachrichtsystem ist jetzt "..({"An","Aus"})[s]) 

        end 

        when loop_time.timer begin 

            local time_notice={ 

                ['hour']={ 

                    [01]='Test 01', 

                    [02]='Test 02', 

            [03]='Test 03', 

                    [04]='Test 04', 

            [05]='Test 05', 

                    [06]='Test 06', 

            [07]='Test 07', 

                    [08]='Test 08', 

            [09]='Test 09', 

                    [10]='Test 10', 

            [11]='Test 11', 

                    [12]='Test 12', 

                    [13]='Test 13', 

                    [14]='Test 14', 

            [15]='Test 15', 

                    [16]='Test 16', 

            [17]='Test 17', 

                    [18]='Test 18', 

            [19]='Test 19', 

                    [20]='Test 20', 

            [21]='Test 21', 

                    [22]='Test 22', 

            [23]='Test 23', 

                    [00]='Test 00',  

                    ['min']={ 

                        [15]='Minute 15', 

                        [30]='Minute 30', 

                        [45]='Minute 45', 

                    }, 

                } 

            } 

            if game.get_event_flag("hour_time")!=tonumber(os.date("%H")) and game.get_event_flag("min_time")!=tonumber(os.date("%M")) then 

                game.set_event_flag("hour_time",0) game.set_event_flag("min_time",0) 

                for zeit,text in pairs(time_notice.hour) do 

                    if type(zeit)=='number' then 

                        if zeit==tonumber(os.date("%H")) then 

                            notice_all(text) 

                            game.set_event_flag("hour_time",tonumber(os.date("%H"))) 

                        end 

                    end 

                    if type(text)=='table' then 

                        table.foreach(time_notice['hour']['min'], 

                        function(t_ime,t_ext) 

                            if t_ime==tonumber(os.date("%M")) then 

                                notice_all(t_ext) 

                                game.set_event_flag("min_time",tonumber(os.date("%M"))) 

                            end 

                        end) 

                    end 

                end 

            end 

        end  

    end 

end

04/07/2016 10:29 #..SyNTeX..<3#12273

Quote:

Originally Posted by Jantux

Die Quest kann auch nicht so funktionieren wie du sie dir vorstellst,weil nirgends mysql_querry ausgef�hrt wird,die in die player table zugreift und dort den Namen �ndert.

Edit: Die Quest an sich klappt ja zur h�lfte man kann sein Namen �ndern halt nur ohne Sonderzeichen, versucht man es mit Sonderzeichen klappt es nicht.

Hab mich wohl Falsch ausgedr�ckt s�rry.

04/09/2016 19:47 Chaosnightx3#12274

Hallo, vielleicht hat da jemand etwas f�r: Eine Quest, die
abfragt, ob das Item xy im socket ist ( Da, wo auch Windschuhe drin sind.)
Wenn ja, soll man rausgeportet werden, wenn nicht, dann nicht.

meine Quest sieht aktuell so aus:

PHP Code:


			
    elseif item.get_socket(71135) then
                chat("Leg deine Leoparden-Siegel ins Lager!")
                kaitowarp()
            elseif item.get_socket(71136) then
                chat("Leg deine Leoparden-Siegel ins Lager!")
                kaitowarp()

je doch bewirkt dies, dass man immer, sobald man die Map betritt, rausgeportet wird.
Hoffe jemand hat da eine L�sung oder kann den Code erweitern, da dies nur ein Ausschnitt aus der Quest ist.

04/09/2016 22:28 slipknot009#12275

K�nnte mir jemand diese Handelscenter quest ein wenig umschreiben so das man keinen bug mehr hat

sprich : bitte eine funktion einbauen das der K�ufer und der Verk�ufer das item nicht gleichzeitig kaufen/rausnehmen k�nnen , also bitte es so machen das wenn jemand ein item kauft die Rausnahme des Items in der zeit gespert ist somit ist das Duplizieren verhindert wird .

Hoffe doch jemand macht mir das Danke im Voraus

[Only registered and activated users can see links. Click Here To Register...]

04/10/2016 23:36 .Tera.#12276

Hey, ich habe einen Auftrag geschrieben, doch wenn ich ingame bin sieht man nur den Auftragtitel und wenn man draufklickt, kommt kein Text (letter) und die Quest startet nicht. Danke im voraus.

PHP Code:


			
quest Orkjagd begin

state start begin

when login or levelup with pc.get_level() >= 30 begin

set_state(start)

end

end

 

state start begin

when letter begin

local v = find_npc_by_vnum(20091)

if v != 0 then target.vid("__TARGET__", v, "Orkjagd")

end

send_letter("Orkjagd")

end

 

when button or info begin

say_title("Orkjagd")

say("")

say("Seon-Pyeong sucht dich!")

say("")

say_reward("Sprich mit Seon-Pyeong!")

say("")

end

 

when __TARGET__.target.click or 20091.chat."Orkjagd" begin

target.delete("__TARGET__")

say("Seon-Pyeong:")

say("")

say("Toete 30 Orks. /m 601 30")

say("")

say("Belohnung:")

say("2.000.000 Yang")

say("1x Karotte")

say("")

say_reward("Toete 30 Orks!")

say("")

set_state(killmonster)

pc.setqf("state", 30)

q.set_counter("Ork", 30)

end

end

 

state killmonster begin

when letter begin

send_letter("Orkjagd")

end

 

when button or info begin

say_title("Orkjagd")

say("")

say("Toete 30 Orks /m 601 30 und")

say("kehre dann zu Seon-Pyeong")

say("zurueck.")

say("")

say("Belohnung:")

say("2.000.000 Yang")

say("1x Karotte")

say("")

say_reward("Toete 30 Orks!")

say("")

end

 

when 601.kill begin

local count = pc.getqf("state") - 1

if count <= 30 then

pc.setqf("state", count)

q.set_counter("Ork", count)

end

 

if count == 0 then

set_state(reward)

end

end

end

 

state reward begin

when letter begin

local v = find_npc_by_vnum(20091)

if v != 0 then target.vid("__TARGET__", v, "Orkjagd")

end

send_letter("Orkjagd")

end

 

when button or info begin

say_title("Orkjagd")

say("")

say("Du hast alle Orks getoetet!")

say("Seon-Pyeong gibt dir deine")

say("Belohnung.")

say("")

say("2.000.000 Yang")

say("1x Karotte")

say("")

say_reward("Sprich mit Seon-Pyeong!")

say("")

end

 

when __TARGET__.target.click or 20091.chat."Orkjagd" begin

target.delete("__TARGET__")

say("Seon-Pyeong:")

say("")

say("Du erhaelst deine Belohnung.")

say("")

say("Belohnung:")

say("2.000.000 Yang")

say("1x Karotte")

say("")

pc.change_money(2000000)

pc.give_item2(50055, 1)

clear_letter()

set_state(__COMPLETE__)

end

end

 

state __COMPLETE__ begin

end  

end

04/11/2016 23:17 Frenii#12277

Huhu habe ein Problem.

Wie muss ich die quest umschreiben das sie Funktioniert?

Momentan killt man die Metins und in der quest l�uft es auch aber wenn man alle gekillt hat steht dort weiterhin das man sie killen muss d.h das state fertig wird nicht ausgef�hrt..

Spoiler

Code:

quest diemetinsteine begin
    state start begin
        when login or levelup with pc.level>19 begin 
            set_state(information)
        end
    end
    
    state information begin
        when letter begin
            send_letter("Jage die Metinsteine")
        end

        when info or button begin
        say_title("Jage die Metinsteine")
		say("")
        say("Ah du m�chtest mir helfen ? ")
		say("")
        say("Du hast auf deiner Reise sicherlich diese ")
        say("Metin Steine gesehen ?")
		say("")
		say("Ziehe los und zerst�re einige von ihnen.")
		say("")
		say("Du erh�lst von mir eine sch�ne Belohnung")
		say("solltest du es schaffen.")
		say("")
		wait()
        say_title("Eure Aufgabe:")
        say("")
        say("Ziehe los und t�te folgende Metin Steine:")  
		say("")
		say_reward("5x Metin der Gier")
		say_reward("5x Metin der Schw�rze")
		say_reward("5x Metin der Dunkelheit") 
		say_reward("5x Metin der Eifersucht")
		say_reward("5x Metin der Seele")
        say("")
		pc.setqf("state1", 0)
        q.set_counter("Metin der Gier", 5)
        pc.setqf("state2", 0)
        q.set_counter("Metin der Schw�rze", 5)
        pc.setqf("state3", 0)
        q.set_counter("Metin der Dunkelheit", 5)
		pc.setqf("state4", 0)
        q.set_counter("Metin der Eifersucht", 5)
		pc.setqf("state5", 0)
        q.set_counter("Metin der Seele", 5)
        set_state(kill)
        end
    end
    
    state kill begin
        when letter begin
            send_letter("Jage die Metinsteine")
        end
    
        when info or button begin
            say_title("Jage die Metinsteine")
			say("")
            say("Staus:")
			say("")
            say_reward("Du hast "..pc.getqf("state1").." von 5 x Metin der Gier zerst�rt.")
            say_reward("Du hast "..pc.getqf("state2").." von 5 x Metin der Schw�rze zerst�rt.")
            say_reward("Du hast "..pc.getqf("state3").." von 5 x Metin der Dunkelheit zerst�rt.")
			say_reward("Du hast "..pc.getqf("state4").." von 5 x Metin der Eifersucht zerst�rt.")
			say_reward("Du hast "..pc.getqf("state5").." von 5 x Metin der Seele zerst�rt.")
			say("")
        end
        
        when 8004.kill begin
            local count1 = pc.getqf("state1") + 1
            if count1 <= 5 then
                pc.setqf("state1", count1)
                q.set_counter("Metin der Gier", count1)
            end
            if count1 == 5 then
			pc.setqf("metinquest1", 1)
            end
        end
        
        when 8005.kill begin
            local count2 = pc.getqf("state2") + 1
            if count2 <= 5 then
                pc.setqf("state2", count2)
                q.set_counter("Metin der Schw�rze", count2)
            end
            if count2 == 5 then
            pc.setqf("metinquest2", 1)
            end
        end
        
        when 8006.kill begin
            local count3 = pc.getqf("state3") + 1
            if count3 <= 5 then
                pc.setqf("state3", count3)
                q.set_counter("Metin der Dunkelheit", count3)
            end
            if count3 == 5 then
            pc.setqf("metinquest3", 1)
            end
        end
		
		when 8007.kill begin
            local count4 = pc.getqf("state4") + 1
            if count4 <= 5 then
                pc.setqf("state4", count4)
                q.set_counter("Metin der Eifersucht", count4)
            end
            if count4 == 5 then
            pc.setqf("metinquest4", 1)
            end
        end
        
        when 8008.kill begin
            local count5 = pc.getqf("state5") + 1
            if count5 <= 5 then
                pc.setqf("state5", count5)
                q.set_counter("Metin der Seele", count5)
            end
            if count5 == 5 then
            pc.setqf("metinquest5", 1)
            end
			if pc.getqf("metinquest1") == 1 and pc.getqf("metinquest2") == 1 and pc.getqf("metinquest3") == 1 and pc.getqf("metinquest4") == 1 and pc.getqf("metinquest5") == 1 then
			set_state(fertig)
			end
        end	
    end
            
    state fertig begin
        when letter begin
            send_letter("Aufgabe abgeschlossen")
        end
        
        when info or button begin
            say_title("Aufgabe abgeschlossen!")
			say("")
            say("Du hast es geschaft,")
            say("ich dachte schon du schafst es nicht.")
			say("")
            say("Du bist wirklich Gut.")
			say("")
            say_reward("Du bekommst 5% Stark gegen Monster!")
			say_reward("Du bekommst einen Regenbogenstein!")
			say_reward("Du bekommst 1.000.000 Yang!")
			say_reward("Du bekommst 1.000.000 Erfahrung!")
			pc.change_money(100000)
			pc.give_exp2(1000000)
			pc.give_item2(50512)
			affect.add_collect(apply.ATT_BONUS_TO_MONSTER,5,60*60*24*365*60)
            clear_letter()
            set_state(metinquestlevel50)           
        end
    end

HOffe jemand kann mir helfen danke.

04/12/2016 14:29 #..SyNTeX..<3#12278

PHP Code:


			
quest change_name begin 

    state start begin 

        when 71055.use begin 

            local bugfix_count = pc.count_item(item.get_vnum()) 

            say_title "Wunschnamen - Einf�hrung" 

            say    "Herzlich Willkommen Nalunia2-Reloaded User:" 

            say    "Hier hast du die M�glichkeit dir deinen" 

            say    "Wunschnamen zu w�hlen." 

            say    "Sowohl Umlaute, Sonderzeichen als auch [] k�nnen" 

            say "verwendet werden." 

            say "" 

            say_reward    "Beachte bei der Wahl deines Namens die" 

            say_reward    "L�nge!" 

            say    "M�chtest du deinen Namen �ndern?" 

            if select("Name wechseln", "Abbrechen") == 2 then 

                return 

            end 

             

            say_title "Wunschnamen - Auswahl" 

            say "Gib nun bitte deinen Wunschnamen an:" 

            local inp = "" 

            repeat 

                inp = input() 

                if inp == "" then 

                    say_title "Wunschnamen - Auswahl" 

                    say "M�chtest du abbrechen?" 

                    if select("Ja","Nein") == 1 then 

                        return 

                    end 

                end 

            until inp ~= "" 

            for _,l in pairs{" "} do -- delete this characters 

                inp = string.gsub(inp,l,"") 

            end 

            say_title "Wunschnamen - Best�tigung" 

            say "Du hast dir folgenden Namen ausgew�hlt:" 

            say_title (string.format("%q",string.gsub(string.gsub(inp,"%]",")"),"%[","("))) 

            say_reward "Bist du dir sicher, dass du diesen Namen" 

            say_reward    "verwenden m�chtest?" 

            if select("Best�tigen", "Abbrechen") == 2 then 

                return 

            end 

             

            local _,_,y = string.find(inp,"^%[([^%]]*)%]") 

            if y then 

                local ly = string.upper(y) 

                for _,l in pairs{"SA","GM","GA","SGA","SGM","TGM","MOD", "DEV", "SL", "Team", "SMOD", "TMOD", "TA", "BA", "CoMa", "YT", "N2"} do 

                    if ly == l then 

                        return say "Du kannst diesen Namen nicht benutzen!" 

                    end 

                end 

            end 

             

            if bugfix_count ~= pc.count_item(item.get_vnum()) then 

                notice "BUGUSER!" 

                -- Als Strafe ALLE entfernen! 

                pc.remove_item(item.get_vnum(),pc.count_item(item.get_vnum())) 

            end 

             

            local formatted_name = string.sub(string.format("%q",inp),2,-2) -- CHANGED 

            local change = pc.change_name(formatted_name) 

            if change == 4 then 

                item.remove() 

                -- Wenn stackbar: 

                -- pc.remove_item(item.get_vnum(),1) 

            end 

             

            say_title "Wunschnamen - �nderung" 

            say (({ 

                "Namens�nderung fehlgeschlagen:[ENTER]Du hast deinen Namen innerhalb der letzten[ENTER]14 Tage bereits gewechselt.[ENTER]Bitte f�hre einen Relog durch!", 

                "ERROR - Parameter fehler", -- << wird nie ingame angezeigt 

                "Namens�nderung fehlgeschlagen:[ENTER]Du hast einen ung�ltigen Namen angegeben.", 

                "Namens�nderung fehlgeschlagen:[ENTER]Dein ausgew�hlter Name existiert bereits.", 

                "Namens�nderung erfolgreich:[ENTER]Herzlichen Gl�ckwunsch![ENTER]Dein Name wurde erfolgreich gewechselt.[ENTER]Bitte f�hre einen Relog durch, damit dein[ENTER]neuer Name sichtbar wird.", 

            })[change+1]) 

             

            say_reward "Auf Wiedersehen!" 

        end 

    end 

end

Normale Namen funktionieren aber sobald ich ein Namen mit Sonderzeichen versuche klappt es nicht warum

04/12/2016 20:10 slipknot009#12279

04/14/2016 20:57 JoJoey1998#12280

K�nnte mir wer sagen wo es hierbei hapert?

Spoiler

04/15/2016 12:24 Rofelmau#12281

Quote:

Originally Posted by JoJoey1998

K�nnte mir wer sagen wo es hierbei hapert?

Spoiler

quest eintauschen begin
state start begin
when 20355.chat."Perlen" begin
say_title("Hey Du!")
say("Ich habe eine gro�e Sammlung an wertvollen Gegenst�nden,")
say("und ich bin immer bereit gegen Perlen zu tauschen!")
say("")
say("Was willst du haben?")
say("")
local v1 = select ("R�stung","Waffen","Steine","Ausr�stung","Abbrech en")
if v1 == 5 then
return
end
if v1 == 1 then
say_title("Ahhh")
say("Du willst also eine R�stung haben?")
say("")
say_reward("Bist du dir sicher??")
local v2 = select ("R�stung","Abbrechen")
if v2 == 2 then
return
end
if v2 == 1 then
if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 then
pc.remove_item(27992, 20)
pc.remove_item(27993, 20)
pc.give_item2(50112, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du erneut")
say("etwas tauschen magst....")
say("")
say("")
say_reward("R�stungskiste erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("20x Wei�e Perle")
say("20x Blaue Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v1 == 2 then
say_title("Ahhh")
say("Du willst also eine Waffe haben?")
say("")
say_reward("Welche denn?")
local v3 = select ("99er","105er","115er","127er","135er","140er","1 50er","Abbrechen")
if v3 == 8 then
return
end
end
if v3 == 1 then
if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 then
pc.remove_item(27992, 20)
pc.remove_item(27993, 20)
pc.give_item2(50113, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("99iger Waffen erhalten!")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("20x Wei�e Perle")
say("20x Blaue Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v3 == 2 then
if pc.count_item(27992) >= 25 and pc.count_item(27993) >= 25 then
pc.remove_item(27992, 25)
pc.remove_item(27993, 25)
pc.give_item2(50114, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("105er Waffen erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("25x Wei�e Perlen")
say("25x Blaue Perlen")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v3 == 3 then
if pc.count_item(27992) >= 30 and pc.count_item(27993) >= 30 then
pc.remove_item(27992, 30)
pc.remove_item(27993, 30)
pc.give_item2(50095, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("115er Waffen erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("30x Wei�e Perlen")
say("30x Blaue Perlen")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v3 == 4 then
if pc.count_item(27992) >= 15 and pc.count_item(27993) >= 15 and pc.count_item(27994) >= 15 then
pc.remove_item(27992, 15)
pc.remove_item(27993, 15)
pc.remove_item(27994, 15)
pc.give_item2(50111, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("127er Waffen erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("15x Wei�e Perle")
say("15x Blaue Perle")
say("15x Rote Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v3 == 5 then
if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 and pc.count_item(27994) >= 15 then
pc.remove_item(27992, 20)
pc.remove_item(27993, 20)
pc.remove_item(27994, 15)
pc.give_item2(50124, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("135iger Waffen erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("20x Wei�e Perle")
say("20x Blaue Perle")
say("15x Rote Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v3 == 6 then
if pc.count_item(27992) >= 25 and pc.count_item(27993) >= 25 and pc.count_item(27994) >= 20 then
pc.remove_item(27992, 25)
pc.remove_item(27993, 25)
pc.remove_item(27994, 20)
pc.give_item2(50131, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("140iger Waffen erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("25x Wei�e Perle")
say("25x Blaue Perle")
say("20x Rote Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v3 == 7 then
if pc.count_item(27992) >= 30 and pc.count_item(27993) >= 30 and pc.count_item(27994) >= 25 then
pc.remove_item(27992, 30)
pc.remove_item(27993, 30)
pc.remove_item(27994, 25)
pc.give_item2(50129, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("150iger Waffen erhalten")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("30x Wei�e Perle")
say("30x Blaue Perle")
say("25x Rote Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v1 == 3 then
say_title("Ahhh")
say("Du willst also einen Stein haben?")
say("")
say_reward("Bist du dir sicher??")
local v4 = select ("Stein","Abbrechen")
if v4 == 2 then
return
end
if v4 == 1 then
if pc.count_item(27993) >= 10 and pc.count_item(27994) >= 10 then
pc.remove_item(27993, 10)
pc.remove_item(27994, 10)
pc.give_item2(50127, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("Perfekte Stein Truhe erhalten!")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("10x Blaue Perle")
say("10x Rote Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end
if v1 == 4 then
say_title("Ahhh")
say("Du willst also etwas Ausr�stung haben?")
say("")
say_reward("Bist du dir sicher??")
local v5 = select ("Ausr�stung","Abbrechen")
if v5 == 2 then
return
end
if v5 == 1 then
if pc.count_item(27992) >= 10 and pc.count_item(27993) >= 10 and pc.count_item(27994) >= 10 then
pc.remove_item(27994, 10)
pc.remove_item(27993, 10)
pc.remove_item(27994, 10)
pc.give_item2(50128, 1)
say("Ich freue mich das wir ein Gesch�ft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen m�chtest....")
say("")
say("")
say_reward("Ausr�stungs Truhe erhalten!")
else
say_red("Du hast nicht alle Materialien!")
say("")
say_title("Du ben�tigst:")
say("10x Wei�e Perle")
say("10x Blaue Perle")
say("10x Rote Perle")
say("")
say_reward("Wenn du das alles hast Tausche ich!")
say("")
end
end

Hab dir das mal zu lernzwecken nur einger�ck, wenn du dir das anschaust, dann siehst du ziemlich schnell dass deine Ends nicht passen

Spoiler

PHP Code:


			
quest eintauschen begin
    state start begin
        when 20355.chat."Perlen" begin 
            say_title("Hey Du!")
            say("Ich habe eine gro�e Sammlung an wertvollen Gegenst�nden,")
            say("und ich bin immer bereit gegen Perlen zu tauschen!")
            say("")
            say("Was willst du haben?")
            say("")
            local v1 = select ("R�stung","Waffen","Steine","Ausr�stung","Abbrech en")
            if v1 == 5 then 
                return
            end
            if v1 == 1 then 
                say_title("Ahhh")
                say("Du willst also eine R�stung haben?")
                say("")
                say_reward("Bist du dir sicher??")
                local v2 = select ("R�stung","Abbrechen")
                if v2 == 2 then 
                    return
                end 
                if v2 == 1 then 
                    if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 then
                        pc.remove_item(27992, 20)
                        pc.remove_item(27993, 20) 
                        pc.give_item2(50112, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du erneut")
                        say("etwas tauschen magst....")
                        say("")
                        say("")
                        say_reward("R�stungskiste erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("20x Wei�e Perle")
                        say("20x Blaue Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end
                end 
            if v1 == 2 then
                say_title("Ahhh")
                say("Du willst also eine Waffe haben?")
                say("")
                say_reward("Welche denn?")
                local v3 = select ("99er","105er","115er","127er","135er","140er","1 50er","Abbrechen")
                if v3 == 8 then 
                    return
                end 
            end
                if v3 == 1 then
                    if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 then
                        pc.remove_item(27992, 20)
                        pc.remove_item(27993, 20)
                        pc.give_item2(50113, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("99iger Waffen erhalten!")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("20x Wei�e Perle")
                        say("20x Blaue Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v3 == 2 then 
                    if pc.count_item(27992) >= 25 and pc.count_item(27993) >= 25 then
                        pc.remove_item(27992, 25)
                        pc.remove_item(27993, 25)
                        pc.give_item2(50114, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("105er Waffen erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("25x Wei�e Perlen")
                        say("25x Blaue Perlen")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v3 == 3 then 
                    if pc.count_item(27992) >= 30 and pc.count_item(27993) >= 30 then
                        pc.remove_item(27992, 30)
                        pc.remove_item(27993, 30) 
                        pc.give_item2(50095, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("115er Waffen erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("30x Wei�e Perlen")
                        say("30x Blaue Perlen")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v3 == 4 then 
                    if pc.count_item(27992) >= 15 and pc.count_item(27993) >= 15 and pc.count_item(27994) >= 15 then
                        pc.remove_item(27992, 15) 
                        pc.remove_item(27993, 15)
                        pc.remove_item(27994, 15) 
                        pc.give_item2(50111, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("127er Waffen erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("15x Wei�e Perle")
                        say("15x Blaue Perle")
                        say("15x Rote Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v3 == 5 then 
                    if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 and pc.count_item(27994) >= 15 then
                        pc.remove_item(27992, 20)
                        pc.remove_item(27993, 20)
                        pc.remove_item(27994, 15) 
                        pc.give_item2(50124, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("135iger Waffen erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("20x Wei�e Perle")
                        say("20x Blaue Perle")
                        say("15x Rote Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v3 == 6 then 
                    if pc.count_item(27992) >= 25 and pc.count_item(27993) >= 25 and pc.count_item(27994) >= 20 then
                        pc.remove_item(27992, 25) 
                        pc.remove_item(27993, 25)
                        pc.remove_item(27994, 20) 
                        pc.give_item2(50131, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("140iger Waffen erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("25x Wei�e Perle")
                        say("25x Blaue Perle")
                        say("20x Rote Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v3 == 7 then 
                    if pc.count_item(27992) >= 30 and pc.count_item(27993) >= 30 and pc.count_item(27994) >= 25 then
                        pc.remove_item(27992, 30) 
                        pc.remove_item(27993, 30)
                        pc.remove_item(27994, 25) 
                        pc.give_item2(50129, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("150iger Waffen erhalten")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("30x Wei�e Perle")
                        say("30x Blaue Perle")
                        say("25x Rote Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end
            if v1 == 3 then 
                say_title("Ahhh")
                say("Du willst also einen Stein haben?")
                say("")
                say_reward("Bist du dir sicher??")
                local v4 = select ("Stein","Abbrechen")
                if v4 == 2 then 
                    return
                end 
                if v4 == 1 then
                    if pc.count_item(27993) >= 10 and pc.count_item(27994) >= 10 then
                        pc.remove_item(27993, 10)
                        pc.remove_item(27994, 10)
                        pc.give_item2(50127, 1)
                        say("Ich freue mich das wir ein Gesch�ft")
                        say("machen konnten. Lass dich mal wieder")
                        say("bei mir blicken falls du etwas")
                        say("eintauschen m�chtest....")
                        say("")
                        say("")
                        say_reward("Perfekte Stein Truhe erhalten!")
                    else
                        say_red("Du hast nicht alle Materialien!")
                        say("")
                        say_title("Du ben�tigst:")
                        say("10x Blaue Perle")
                        say("10x Rote Perle")
                        say("")
                        say_reward("Wenn du das alles hast Tausche ich!")
                        say("")
                    end 
                end 
                if v1 == 4 then 
                    say_title("Ahhh")
                    say("Du willst also etwas Ausr�stung haben?")
                    say("")
                    say_reward("Bist du dir sicher??")
                    local v5 = select ("Ausr�stung","Abbrechen")
                    if v5 == 2 then 
                        return
                    end 
                    if v5 == 1 then
                        if pc.count_item(27992) >= 10 and pc.count_item(27993) >= 10 and pc.count_item(27994) >= 10 then
                            pc.remove_item(27994, 10)
                            pc.remove_item(27993, 10)
                            pc.remove_item(27994, 10)
                            pc.give_item2(50128, 1)
                            say("Ich freue mich das wir ein Gesch�ft")
                            say("machen konnten. Lass dich mal wieder")
                            say("bei mir blicken falls du etwas")
                            say("eintauschen m�chtest....")
                            say("")
                            say("")
                            say_reward("Ausr�stungs Truhe erhalten!")
                        else
                            say_red("Du hast nicht alle Materialien!")
                            say("")
                            say_title("Du ben�tigst:")
                            say("10x Wei�e Perle")
                            say("10x Blaue Perle")
                            say("10x Rote Perle")
                            say("")
                            say_reward("Wenn du das alles hast Tausche ich!")
                            say("")
    end 
end

@[Only registered and activated users can see links. Click Here To Register...]

Falls du es noch brauchst, dein Fehler liegt in der abfrage

PHP Code:


			
 if count1 <= 5 then
                pc.setqf("state1", count1)
                q.set_counter("Metin der Gier", count1)
            end
            if count1 == 5 then
            pc.setqf("metinquest1", 1)
            end

weil du

PHP Code:


			
 if count1 <= 5 then

hast wird es niemals zu

PHP Code:


			
 if count1 == 5 then

kommen, denn "<=" schlie�t "==" mit ein.
und das hast du bei allen kills
Du kansnt die auch �brigens zusammen fassen.
einfach

PHP Code:


			
when kill begin
if npc.get_race() == 101 then
elseif npc.get_race() == 102 then
end
--hier kansnt du noch die counts abfragen
end

ist auch ebsser weil bei zu vielen .kills werden die rigendwann nicht mehr aktiviert.

04/16/2016 18:34 gerald500#12282

Quote:

Originally Posted by Rofelmau

Hab dir das mal zu lernzwecken nur einger�ck, wenn du dir das anschaust, dann siehst du ziemlich schnell dass deine Ends nicht passen

Spoiler

PHP Code:

quest eintauschen begin state start begin when 20355.chat."Perlen" begin say_title("Hey Du!") say("Ich habe eine gro�e Sammlung an wertvollen Gegenst�nden,") say("und ich bin immer bereit gegen Perlen zu tauschen!") say("") say("Was willst du haben?") say("") local v1 = select ("R�stung","Waffen","Steine","Ausr�stung","Abbrech en") if v1 == 5 then return end if v1 == 1 then say_title("Ahhh") say("Du willst also eine R�stung haben?") say("") say_reward("Bist du dir sicher??") local v2 = select ("R�stung","Abbrechen") if v2 == 2 then return end if v2 == 1 then if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 then pc.remove_item(27992, 20) pc.remove_item(27993, 20) pc.give_item2(50112, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du erneut") say("etwas tauschen magst....") say("") say("") say_reward("R�stungskiste erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("20x Wei�e Perle") say("20x Blaue Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v1 == 2 then say_title("Ahhh") say("Du willst also eine Waffe haben?") say("") say_reward("Welche denn?") local v3 = select ("99er","105er","115er","127er","135er","140er","1 50er","Abbrechen") if v3 == 8 then return end end if v3 == 1 then if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 then pc.remove_item(27992, 20) pc.remove_item(27993, 20) pc.give_item2(50113, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("99iger Waffen erhalten!") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("20x Wei�e Perle") say("20x Blaue Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v3 == 2 then if pc.count_item(27992) >= 25 and pc.count_item(27993) >= 25 then pc.remove_item(27992, 25) pc.remove_item(27993, 25) pc.give_item2(50114, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("105er Waffen erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("25x Wei�e Perlen") say("25x Blaue Perlen") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v3 == 3 then if pc.count_item(27992) >= 30 and pc.count_item(27993) >= 30 then pc.remove_item(27992, 30) pc.remove_item(27993, 30) pc.give_item2(50095, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("115er Waffen erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("30x Wei�e Perlen") say("30x Blaue Perlen") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v3 == 4 then if pc.count_item(27992) >= 15 and pc.count_item(27993) >= 15 and pc.count_item(27994) >= 15 then pc.remove_item(27992, 15) pc.remove_item(27993, 15) pc.remove_item(27994, 15) pc.give_item2(50111, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("127er Waffen erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("15x Wei�e Perle") say("15x Blaue Perle") say("15x Rote Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v3 == 5 then if pc.count_item(27992) >= 20 and pc.count_item(27993) >= 20 and pc.count_item(27994) >= 15 then pc.remove_item(27992, 20) pc.remove_item(27993, 20) pc.remove_item(27994, 15) pc.give_item2(50124, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("135iger Waffen erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("20x Wei�e Perle") say("20x Blaue Perle") say("15x Rote Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v3 == 6 then if pc.count_item(27992) >= 25 and pc.count_item(27993) >= 25 and pc.count_item(27994) >= 20 then pc.remove_item(27992, 25) pc.remove_item(27993, 25) pc.remove_item(27994, 20) pc.give_item2(50131, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("140iger Waffen erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("25x Wei�e Perle") say("25x Blaue Perle") say("20x Rote Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v3 == 7 then if pc.count_item(27992) >= 30 and pc.count_item(27993) >= 30 and pc.count_item(27994) >= 25 then pc.remove_item(27992, 30) pc.remove_item(27993, 30) pc.remove_item(27994, 25) pc.give_item2(50129, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("150iger Waffen erhalten") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("30x Wei�e Perle") say("30x Blaue Perle") say("25x Rote Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v1 == 3 then say_title("Ahhh") say("Du willst also einen Stein haben?") say("") say_reward("Bist du dir sicher??") local v4 = select ("Stein","Abbrechen") if v4 == 2 then return end if v4 == 1 then if pc.count_item(27993) >= 10 and pc.count_item(27994) >= 10 then pc.remove_item(27993, 10) pc.remove_item(27994, 10) pc.give_item2(50127, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("Perfekte Stein Truhe erhalten!") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("10x Blaue Perle") say("10x Rote Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end if v1 == 4 then say_title("Ahhh") say("Du willst also etwas Ausr�stung haben?") say("") say_reward("Bist du dir sicher??") local v5 = select ("Ausr�stung","Abbrechen") if v5 == 2 then return end if v5 == 1 then if pc.count_item(27992) >= 10 and pc.count_item(27993) >= 10 and pc.count_item(27994) >= 10 then pc.remove_item(27994, 10) pc.remove_item(27993, 10) pc.remove_item(27994, 10) pc.give_item2(50128, 1) say("Ich freue mich das wir ein Gesch�ft") say("machen konnten. Lass dich mal wieder") say("bei mir blicken falls du etwas") say("eintauschen m�chtest....") say("") say("") say_reward("Ausr�stungs Truhe erhalten!") else say_red("Du hast nicht alle Materialien!") say("") say_title("Du ben�tigst:") say("10x Wei�e Perle") say("10x Blaue Perle") say("10x Rote Perle") say("") say_reward("Wenn du das alles hast Tausche ich!") say("") end end

@[Only registered and activated users can see links. Click Here To Register...]

Falls du es noch brauchst, dein Fehler liegt in der abfrage

PHP Code:

if count1 <= 5 then pc.setqf("state1", count1) q.set_counter("Metin der Gier", count1) end if count1 == 5 then pc.setqf("metinquest1", 1) end

weil du

PHP Code:

if count1 <= 5 then

hast wird es niemals zu

PHP Code:

if count1 == 5 then

kommen, denn "<=" schlie�t "==" mit ein.
und das hast du bei allen kills
Du kansnt die auch �brigens zusammen fassen.
einfach

PHP Code:

when kill begin if npc.get_race() == 101 then elseif npc.get_race() == 102 then end --hier kansnt du noch die counts abfragen end

ist auch ebsser weil bei zu vielen .kills werden die rigendwann nicht mehr aktiviert.

oder man machts gleich gscheit und sagt

Code:

when kill begin
	local mob_vnums = {{8008,"state5","Metin der Seele","metinquests5"},{8007,"state5","Metin der Seele","metinquests5"}}
	local mob_ = mob_vnums[npc.get_race()]
	local count = pc.getqf(mob_[2])+1
	if (mob_[1] ~= nil and count < 5) then
		pc.setqf(mob_[2],count)
		q.set_counter(mob_[3],count)
	end
	if count >= 5 then
		pc.setqf(mob_[4],1)
	end
end

somit hat man eine l�ssige tabelle die man ganz einfach erweitern kann

04/17/2016 17:51 -Exploit#12283

PHP Code:


			
quest horse_lv35 begin 

    state start begin 

        when login or levelup with pc.get_level() >= 35 and not pc.is_gm() begin 

            send_letter("Hole dein Kampfgaul!") 

        end 

        when button or info begin 

            say("Es wird viel Zeit und Arbeit ben�tigt")

            say("bis man das K�nnen und Geschickt besizt")

            say("um das Millit�rpferd zu beherrschen.")

            say("")

            say("Wenn du m�chtest das ich dir diese Arbeit")

            say("erspare, bringe mir bitte 10 Pferdemedaille")

            say("daf�r werde ich dir beibringen das Millit�r-")

            say("pferd zu kontrollieren und zu beherrschen")

            say("")

            wait()

            if pc.count_item("50050") >= 10 then

                pc.remove_item(50050, 10)

                say_title("Stallbursche:")

                say("Wie ich sehe hast du 10 Pferdemedaille gesammelt.")

                say("Daf�r werde ich dir beibringen ")

                say("wie man das Millit�rpferd beherrscht")

                say("")

                wait()

                say_reward("Du hast die Kunst des Millit�rpferdes erlernt.")

                say_reward("Du hast das Millit�rpferde Buch erhalten.")

                pc.give_item2 ( "50053" , 1)

                horse.set_level("21")

                setstate(__COMPLETE__)

            else

                say("Wie gesagt.. wenn du 10 Pferdemedaille")

                say("bringst, Werde ich dir daf�r ")

                say("beibringen das Millit�rpferd")

                say("zubeherrschen. Bis Bald.")

        end

        end

        state __COMPLETE__ begin 

    end 

end

Quest/millitar_pferd.quest:37:expecting 'when' or 'function'
Error occured on compile Quest/millitar_pferd.quest

04/17/2016 20:10 gerald500#12284

Quote:

Originally Posted by [Splash]

PHP Code:

quest horse_lv35 begin state start begin when login or levelup with pc.get_level() >= 35 and not pc.is_gm() begin send_letter("Hole dein Kampfgaul!") end when button or info begin say("Es wird viel Zeit und Arbeit ben�tigt") say("bis man das K�nnen und Geschickt besizt") say("um das Millit�rpferd zu beherrschen.") say("") say("Wenn du m�chtest das ich dir diese Arbeit") say("erspare, bringe mir bitte 10 Pferdemedaille") say("daf�r werde ich dir beibringen das Millit�r-") say("pferd zu kontrollieren und zu beherrschen") say("") wait() if pc.count_item("50050") >= 10 then pc.remove_item(50050, 10) say_title("Stallbursche:") say("Wie ich sehe hast du 10 Pferdemedaille gesammelt.") say("Daf�r werde ich dir beibringen ") say("wie man das Millit�rpferd beherrscht") say("") wait() say_reward("Du hast die Kunst des Millit�rpferdes erlernt.") say_reward("Du hast das Millit�rpferde Buch erhalten.") pc.give_item2 ( "50053" , 1) horse.set_level("21") setstate(__COMPLETE__) else say("Wie gesagt.. wenn du 10 Pferdemedaille") say("bringst, Werde ich dir daf�r ") say("beibringen das Millit�rpferd") say("zubeherrschen. Bis Bald.") end end state __COMPLETE__ begin end end

Quest/millitar_pferd.quest:37:expecting 'when' or 'function'
Error occured on compile Quest/millitar_pferd.quest

ein end zu wenig nach state __COMPLETE__

04/17/2016 20:35 -Exploit#12285

Quote:

Originally Posted by gerald500

ein end zu wenig nach state __COMPLETE__

PHP Code:


			
quest horse_lv35 begin  

    state start begin  

        when login or levelup with pc.get_level() >= 35 begin  

            send_letter("Hole dein Millit�rpferd!")  

        end  

        when button or info begin  

            say("Es wird viel Zeit und Arbeit ben�tigt") 

            say("bis man das K�nnen und Geschickt besizt") 

            say("um das Millit�rpferd zu beherrschen.") 

            say("") 

            say("Wenn du m�chtest das ich dir diese Arbeit") 

            say("erspare, bringe mir bitte 10 Pferdemedaille") 

            say("daf�r werde ich dir beibringen das Millit�r-") 

            say("pferd zu kontrollieren und zu beherrschen") 

            say("") 

            wait() 

            if pc.count_item("50050") >= 10 then 

                pc.remove_item(50050, 10) 

                say_title("Stallbursche:") 

                say("Wie ich sehe hast du 10 Pferdemedaille gesammelt.") 

                say("Daf�r werde ich dir beibringen ") 

                say("wie man das Millit�rpferd beherrscht") 

                say("") 

                wait() 

                say_reward("Du hast die Kunst des Millit�rpferdes erlernt.") 

                say_reward("Du hast das Millit�rpferde Buch erhalten.") 

                pc.remove_item(50052, 1)

                pc.give_item2 ( "50053" , 1) 

                horse.set_level("21") 

                setstate(__COMPLETE__) 

            else 

                say("Wie gesagt.. wenn du 10 Pferdemedaille") 

                say("bringst, Werde ich dir daf�r ") 

                say("beibringen das Millit�rpferd") 

                say("zubeherrschen. Bis Bald.") 

            end

        end

        state __COMPLETE__ begin 

        end

    end  

end

Danke, jedoch kommt der selbe Fehler.

PHP Code:


			
pferd.quest:38:expecting 'when' or 'function'

Page 819 of 845

819