[SERVICE] Die Questerstellung

Page 81 of 248

03/23/2014 06:54 Simplex2�#1201

Ich brauche umbedingt ne quest
die einen sofort lvl 75 macht ohne kick etc.
Irgendwie finde ich den thread nicht wo der befehl drin war.
Habe befehl "command("level 127")" versucht funktionuiert auch nicht.
Und ich meine auch nicht den befehl.
pc. give exp(500) <--- Bei dem Befehl bekommt man ja kick.

03/23/2014 08:42 Rofelmau#1202

Quote:

Originally Posted by Simplex2�

Ich brauche umbedingt ne quest
die einen sofort lvl 75 macht ohne kick etc.
Irgendwie finde ich den thread nicht wo der befehl drin war.
Habe befehl "command("level 127")" versucht funktionuiert auch nicht.
Und ich meine auch nicht den befehl.
pc. give exp(500) <--- Bei dem Befehl bekommt man ja kick.

Gibt es meines Wissens nach keine Anderen befehle
command("level 127") funktioniert nur mit GM Rechten und wenn es das level 127 �berhaupt gibt
und den exp kram wei�t du ja

03/23/2014 09:17 Simplex2�#1203

Es gibt ja ne M�glichkeit:
pc.get_level(75)
Aber habs schon gekl�rt.
Trz Danke

03/23/2014 10:31 Radiatos#1204

Hallo Community,

ich such ne M�glichkeit, Pets einzeln zu leveln...

Die Basis hab ich von DasKuchen aus seinem Thread..Nur bei seiner Methode kann man nur alle zusammen leveln...ich will sie aber EINZELN leveln...kann mir da wer ne quest erstellen?

hier mal meine 2 quest:

ph�nix.quest

Spoiler

PHP Code:


			
quest pets begin 

    state start begin     

     

        function givebonus(x) 

            local y,boni = {53,54,1},pets.bonusliste() 

            table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end ) 

            cmdchat("HaustierLevel "..pc.getqf('petlevel').."") 

            cmdchat("HaustierName "..pc.get_name().."") 

            pc.setqf("petruf",1)                 

        end 

        function bonusliste() 

            return { 

                [1] = {200,100,500}, 

                [2] = {250,150,1000}, 

                [3] = {300,200,1500}, 

                [4] = {350,250,2000}, 

                [5] = {400,300,3000}, 

            } 

        end     

        function removebonus(x) 

            local y,boni = {53,54,1},pets.bonusliste() 

            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end ) 

             pet.unsummon() 

            pc.setqf("petruf",0) 

            horse.set_level("21") 

            cmdchat("HidePetGui") 

            cleartimer("bugcheck") 

        end         

     

        when 53001.use begin 

            horse.unride() horse.unsummon()

            if pc.is_mount() then 

                say_title("Entschuldigung") 

                say("Bitte steige von deinem Mount ab!") 

                return 

            end 

            if pc.getqf('petlevel') == 0 then 

                pc.setqf('petlevel',1) 

            end 

            if pc.getqf("petruf") == 0 then 

                local Horselevel = 22 -- -pc.getqf('petlevel') 

                horse.set_level(Horselevel) 

                 pet.unsummon()  pet.summon() 

                cmdchat("buff8")

                chat("Dein Haustier wurde gerufen.") 

                pets.givebonus(pc.getqf('petlevel')) 

                local expprocent1 = {20, 80, 160, 350, 400} 

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."")                 

                cmdchat("ShowPetGui") 

                loop_timer("bugcheck", 0.2) 

            elseif pc.getqf("petruf") == 1 then         

                pets.removebonus(pc.getqf('petlevel')) 

                chat("Dein Haustier verabschiedet sich nun.") 

            end         

        end 

         

         

        when kill with pc.getqf("petruf") == 1 begin 

            if pc.getqf("petlevel") == 5 then 

                return 

            end     

            if not npc.is_pc() then 

                pc.setqf("exp",pc.getqf("exp")+1) 

                local exp2up = {2000, 8000, 16000, 35000, 40000} 

                local expprocent = {20, 80, 160, 350, 400} 

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."") 

                if pc.getqf("exp") == exp2up[pc.getqf("petlevel")] then 

                    if pc.getqf("petlevel") == 4 then 

                        say_title("Herzlichen Gl�ckwunsch") 

                        say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") 

                        say_reward("Dies war das letzte Level!") 

                    end 

                    say_title("Herzlichen Gl�ckwunsch") 

                    say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") 

                    say("Rufe dein Pet bitte erneut!") 

                    pc.setqf("petlevel",pc.getqf("petlevel")+1) 

                    pc.setqf("exp",0) 

                    pets.removebonus(pc.getqf('petlevel')) 

                end 

            end 

        end 

         

        -- Bugschutz 

         

        when bugcheck.timer begin 

            if pc.count_item(53001) == 0 then 

                say_title("Buguser") 

                say("Bugusing festgestellt!") 

                pets.removebonus(pc.getqf('petlevel')) 

            end 

        end 

         

        when login or logout or disconnect with pc.getqf("petruf") == 1 begin 

            pets.removebonus(pc.getqf('petlevel')) 

            chat("Dein Haustier ist nicht mitgekommen...") 

            chat("Rufe es erneut!")     

        end         

         

    end     

end

azrael quest

Spoiler

PHP Code:


			
quest pets begin 

    state start begin     

     

        function givebonus(x) 

            local y,boni = {53,54,1},pets.bonusliste() 

            table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end ) 

            cmdchat("HaustierLevel "..pc.getqf('petlevel').."") 

            cmdchat("HaustierName "..pc.get_name().."") 

            pc.setqf("petruf",1)                 

        end 

        function bonusliste() 

            return { 

                [1] = {200,100,500}, 

                [2] = {250,150,1000}, 

                [3] = {300,200,1500}, 

                [4] = {350,250,2000}, 

                [5] = {400,300,3000}, 

            } 

        end     

        function removebonus(x) 

            local y,boni = {53,54,1},pets.bonusliste() 

            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end ) 

             pet.unsummon() 

            pc.setqf("petruf",0) 

            horse.set_level("21") 

            cmdchat("HidePetGui") 

            cleartimer("bugcheck") 

        end         

     

        when 53005.use begin 

            horse.unride() horse.unsummon()

            if pc.is_mount() then 

                say_title("Entschuldigung") 

                say("Bitte steige von deinem Mount ab!") 

                return 

            end 

            if pc.getqf('petlevel') == 0 then 

                pc.setqf('petlevel',1) 

            end 

            if pc.getqf("petruf") == 0 then 

                local Horselevel = 25 -- -pc.getqf('petlevel') 

                horse.set_level(Horselevel) 

                 pet.unsummon()  pet.summon() 

                cmdchat ("buff11")

                chat("Dein Haustier wurde gerufen.") 

                pets.givebonus(pc.getqf('petlevel')) 

                local expprocent1 = {20, 80, 160, 350, 400} 

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."")                 

                cmdchat("ShowPetGui") 

                loop_timer("bugcheck", 0.2) 

            elseif pc.getqf("petruf") == 1 then         

                pets.removebonus(pc.getqf('petlevel')) 

                chat("Dein Haustier verabschiedet sich nun.") 

            end         

        end 

         

         

        when kill with pc.getqf("petruf") == 1 begin 

            if pc.getqf("petlevel") == 5 then 

                return 

            end     

            if not npc.is_pc() then 

                pc.setqf("exp",pc.getqf("exp")+1) 

                local exp2up = {2000, 8000, 16000, 35000, 40000} 

                local expprocent = {20, 80, 160, 350, 400} 

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."") 

                if pc.getqf("exp") == exp2up[pc.getqf("petlevel")] then 

                    if pc.getqf("petlevel") == 4 then 

                        say_title("Herzlichen Gl�ckwunsch") 

                        say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") 

                        say_reward("Dies war das letzte Level!") 

                    end 

                    say_title("Herzlichen Gl�ckwunsch") 

                    say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") 

                    say("Rufe dein Pet bitte erneut!") 

                    pc.setqf("petlevel",pc.getqf("petlevel")+1) 

                    pc.setqf("exp",0) 

                    pets.removebonus(pc.getqf('petlevel')) 

                end 

            end 

        end 

         

        -- Bugschutz 

         

        when bugcheck.timer begin 

            if pc.count_item(53005) == 0 then 

                say_title("Buguser") 

                say("Bugusing festgestellt!") 

                pets.removebonus(pc.getqf('petlevel')) 

            end 

        end 

         

        when login or logout or disconnect with pc.getqf("petruf") == 1 begin 

            pets.removebonus(pc.getqf('petlevel')) 

            chat("Dein Haustier ist nicht mitgekommen...") 

            chat("Rufe es erneut!")     

        end         

         

    end     

end

03/23/2014 13:00 Rofelmau#1205

Quote:

Originally Posted by Radiatos

Hallo Community,

ich such ne M�glichkeit, Pets einzeln zu leveln...

Die Basis hab ich von DasKuchen aus seinem Thread..Nur bei seiner Methode kann man nur alle zusammen leveln...ich will sie aber EINZELN leveln...kann mir da wer ne quest erstellen?

hier mal meine 2 quest:

ph�nix.quest

Spoiler

PHP Code:

quest pets begin state start begin function givebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end ) cmdchat("HaustierLevel "..pc.getqf('petlevel').."") cmdchat("HaustierName "..pc.get_name().."") pc.setqf("petruf",1) end function bonusliste() return { [1] = {200,100,500}, [2] = {250,150,1000}, [3] = {300,200,1500}, [4] = {350,250,2000}, [5] = {400,300,3000}, } end function removebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end ) pet.unsummon() pc.setqf("petruf",0) horse.set_level("21") cmdchat("HidePetGui") cleartimer("bugcheck") end when 53001.use begin horse.unride() horse.unsummon() if pc.is_mount() then say_title("Entschuldigung") say("Bitte steige von deinem Mount ab!") return end if pc.getqf('petlevel') == 0 then pc.setqf('petlevel',1) end if pc.getqf("petruf") == 0 then local Horselevel = 22 -- -pc.getqf('petlevel') horse.set_level(Horselevel) pet.unsummon() pet.summon() cmdchat("buff8") chat("Dein Haustier wurde gerufen.") pets.givebonus(pc.getqf('petlevel')) local expprocent1 = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."") cmdchat("ShowPetGui") loop_timer("bugcheck", 0.2) elseif pc.getqf("petruf") == 1 then pets.removebonus(pc.getqf('petlevel')) chat("Dein Haustier verabschiedet sich nun.") end end when kill with pc.getqf("petruf") == 1 begin if pc.getqf("petlevel") == 5 then return end if not npc.is_pc() then pc.setqf("exp",pc.getqf("exp")+1) local exp2up = {2000, 8000, 16000, 35000, 40000} local expprocent = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."") if pc.getqf("exp") == exp2up[pc.getqf("petlevel")] then if pc.getqf("petlevel") == 4 then say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") say_reward("Dies war das letzte Level!") end say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") say("Rufe dein Pet bitte erneut!") pc.setqf("petlevel",pc.getqf("petlevel")+1) pc.setqf("exp",0) pets.removebonus(pc.getqf('petlevel')) end end end -- Bugschutz when bugcheck.timer begin if pc.count_item(53001) == 0 then say_title("Buguser") say("Bugusing festgestellt!") pets.removebonus(pc.getqf('petlevel')) end end when login or logout or disconnect with pc.getqf("petruf") == 1 begin pets.removebonus(pc.getqf('petlevel')) chat("Dein Haustier ist nicht mitgekommen...") chat("Rufe es erneut!") end end end

azrael quest

Spoiler

PHP Code:

quest pets begin state start begin function givebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end ) cmdchat("HaustierLevel "..pc.getqf('petlevel').."") cmdchat("HaustierName "..pc.get_name().."") pc.setqf("petruf",1) end function bonusliste() return { [1] = {200,100,500}, [2] = {250,150,1000}, [3] = {300,200,1500}, [4] = {350,250,2000}, [5] = {400,300,3000}, } end function removebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end ) pet.unsummon() pc.setqf("petruf",0) horse.set_level("21") cmdchat("HidePetGui") cleartimer("bugcheck") end when 53005.use begin horse.unride() horse.unsummon() if pc.is_mount() then say_title("Entschuldigung") say("Bitte steige von deinem Mount ab!") return end if pc.getqf('petlevel') == 0 then pc.setqf('petlevel',1) end if pc.getqf("petruf") == 0 then local Horselevel = 25 -- -pc.getqf('petlevel') horse.set_level(Horselevel) pet.unsummon() pet.summon() cmdchat ("buff11") chat("Dein Haustier wurde gerufen.") pets.givebonus(pc.getqf('petlevel')) local expprocent1 = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."") cmdchat("ShowPetGui") loop_timer("bugcheck", 0.2) elseif pc.getqf("petruf") == 1 then pets.removebonus(pc.getqf('petlevel')) chat("Dein Haustier verabschiedet sich nun.") end end when kill with pc.getqf("petruf") == 1 begin if pc.getqf("petlevel") == 5 then return end if not npc.is_pc() then pc.setqf("exp",pc.getqf("exp")+1) local exp2up = {2000, 8000, 16000, 35000, 40000} local expprocent = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."") if pc.getqf("exp") == exp2up[pc.getqf("petlevel")] then if pc.getqf("petlevel") == 4 then say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") say_reward("Dies war das letzte Level!") end say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."") say("Rufe dein Pet bitte erneut!") pc.setqf("petlevel",pc.getqf("petlevel")+1) pc.setqf("exp",0) pets.removebonus(pc.getqf('petlevel')) end end end -- Bugschutz when bugcheck.timer begin if pc.count_item(53005) == 0 then say_title("Buguser") say("Bugusing festgestellt!") pets.removebonus(pc.getqf('petlevel')) end end when login or logout or disconnect with pc.getqf("petruf") == 1 begin pets.removebonus(pc.getqf('petlevel')) chat("Dein Haustier ist nicht mitgekommen...") chat("Rufe es erneut!") end end end

Habs jetzt einfach mal so gemacht, das f�r beide eine Andere Variable unter der das Level abgespeichert wird genutzt wird und auch f�r den petruf neuen qf und nat�rlich die quest umbenannt, brauchen dann auch 2 namen
einfach mal ausprobieren

Spoiler

PHP Code:


			
quest phoenixpets begin  

    state start begin      

      

        function givebonus(x)  

            local y,boni = {53,54,1},pets.bonusliste()  

            table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end )  

            cmdchat("HaustierLevel "..pc.getqf('phoenixlevel').."")  

            cmdchat("HaustierName "..pc.get_name().."")  

            pc.setqf("petrufphoenix",1)                  

        end  

        function bonusliste()  

            return {  

                [1] = {200,100,500},  

                [2] = {250,150,1000},  

                [3] = {300,200,1500},  

                [4] = {350,250,2000},  

                [5] = {400,300,3000},  

            }  

        end      

        function removebonus(x)  

            local y,boni = {53,54,1},pets.bonusliste()  

            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end )  

             pet.unsummon()  

            pc.setqf("petrufphoenix",0)  

            horse.set_level("21")  

            cmdchat("HidePetGui")  

            cleartimer("bugcheck")  

        end          

      

        when 53001.use begin  

            horse.unride() horse.unsummon() 

            if pc.is_mount() then  

                say_title("Entschuldigung")  

                say("Bitte steige von deinem Mount ab!")  

                return  

            end  

            if pc.getqf('phoenixlevel') == 0 then  

                pc.setqf('phoenixlevel',1)  

            end  

            if pc.getqf("petrufphoenix") == 0 then  

                local Horselevel = 22 -- -pc.getqf('phoenixlevel')  

                horse.set_level(Horselevel)  

                 pet.unsummon()  pet.summon()  

                cmdchat("buff8") 

                chat("Dein Haustier wurde gerufen.")  

                pets.givebonus(pc.getqf('phoenixlevel'))  

                local expprocent1 = {20, 80, 160, 350, 400}  

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("phoenixlevel")]).."")                  

                cmdchat("ShowPetGui")  

                loop_timer("bugcheck", 0.2)  

            elseif pc.getqf("petrufphoenix") == 1 then          

                pets.removebonus(pc.getqf('phoenixlevel'))  

                chat("Dein Haustier verabschiedet sich nun.")  

            end          

        end  

          

          

        when kill with pc.getqf("petrufphoenix") == 1 begin  

            if pc.getqf("phoenixlevel") == 5 then  

                return  

            end      

            if not npc.is_pc() then  

                pc.setqf("exp",pc.getqf("exp")+1)  

                local exp2up = {2000, 8000, 16000, 35000, 40000}  

                local expprocent = {20, 80, 160, 350, 400}  

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("phoenixlevel")]).."")  

                if pc.getqf("exp") == exp2up[pc.getqf("phoenixlevel")] then  

                    if pc.getqf("phoenixlevel") == 4 then  

                        say_title("Herzlichen Gl�ckwunsch")  

                        say("Dein Haustier erreicht Level "..(pc.getqf("phoenixlevel")+1).."")  

                        say_reward("Dies war das letzte Level!")  

                    end  

                    say_title("Herzlichen Gl�ckwunsch")  

                    say("Dein Haustier erreicht Level "..(pc.getqf("phoenixlevel")+1).."")  

                    say("Rufe dein Pet bitte erneut!")  

                    pc.setqf("phoenixlevel",pc.getqf("phoenixlevel")+1)  

                    pc.setqf("exp",0)  

                    pets.removebonus(pc.getqf('phoenixlevel'))  

                end  

            end  

        end  

          

        -- Bugschutz  

          

        when bugcheck.timer begin  

            if pc.count_item(53001) == 0 then  

                say_title("Buguser")  

                say("Bugusing festgestellt!")  

                pets.removebonus(pc.getqf('phoenixlevel'))  

            end  

        end  

          

        when login or logout or disconnect with pc.getqf("petrufphoenix") == 1 begin  

            pets.removebonus(pc.getqf('phoenixlevel'))  

            chat("Dein Haustier ist nicht mitgekommen...")  

            chat("Rufe es erneut!")      

        end          

          

    end      

end

PHP Code:


			
quest azraelpets begin  

    state start begin      

      

        function givebonus(x)  

            local y,boni = {53,54,1},pets.bonusliste()  

            table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end )  

            cmdchat("HaustierLevel "..pc.getqf('azraellevel').."")  

            cmdchat("HaustierName "..pc.get_name().."")  

            pc.setqf("petrufazrael",1)                  

        end  

        function bonusliste()  

            return {  

                [1] = {200,100,500},  

                [2] = {250,150,1000},  

                [3] = {300,200,1500},  

                [4] = {350,250,2000},  

                [5] = {400,300,3000},  

            }  

        end      

        function removebonus(x)  

            local y,boni = {53,54,1},pets.bonusliste()  

            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end )  

             pet.unsummon()  

            pc.setqf("petrufazrael",0)  

            horse.set_level("21")  

            cmdchat("HidePetGui")  

            cleartimer("bugcheck")  

        end          

      

        when 53005.use begin  

            horse.unride() horse.unsummon() 

            if pc.is_mount() then  

                say_title("Entschuldigung")  

                say("Bitte steige von deinem Mount ab!")  

                return  

            end  

            if pc.getqf('azraellevel') == 0 then  

                pc.setqf('azraellevel',1)  

            end  

            if pc.getqf("petrufazrael") == 0 then  

                local Horselevel = 25 -- -pc.getqf('azraellevel')  

                horse.set_level(Horselevel)  

                 pet.unsummon()  pet.summon()  

                cmdchat ("buff11") 

                chat("Dein Haustier wurde gerufen.")  

                pets.givebonus(pc.getqf('azraellevel'))  

                local expprocent1 = {20, 80, 160, 350, 400}  

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("azraellevel")]).."")                  

                cmdchat("ShowPetGui")  

                loop_timer("bugcheck", 0.2)  

            elseif pc.getqf("petrufazrael") == 1 then          

                pets.removebonus(pc.getqf('azraellevel'))  

                chat("Dein Haustier verabschiedet sich nun.")  

            end          

        end  

          

          

        when kill with pc.getqf("petrufazrael") == 1 begin  

            if pc.getqf("azraellevel") == 5 then  

                return  

            end      

            if not npc.is_pc() then  

                pc.setqf("exp",pc.getqf("exp")+1)  

                local exp2up = {2000, 8000, 16000, 35000, 40000}  

                local expprocent = {20, 80, 160, 350, 400}  

                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("azraellevel")]).."")  

                if pc.getqf("exp") == exp2up[pc.getqf("azraellevel")] then  

                    if pc.getqf("azraellevel") == 4 then  

                        say_title("Herzlichen Gl�ckwunsch")  

                        say("Dein Haustier erreicht Level "..(pc.getqf("azraellevel")+1).."")  

                        say_reward("Dies war das letzte Level!")  

                    end  

                    say_title("Herzlichen Gl�ckwunsch")  

                    say("Dein Haustier erreicht Level "..(pc.getqf("azraellevel")+1).."")  

                    say("Rufe dein Pet bitte erneut!")  

                    pc.setqf("azraellevel",pc.getqf("azraellevel")+1)  

                    pc.setqf("exp",0)  

                    pets.removebonus(pc.getqf('azraellevel'))  

                end  

            end  

        end  

          

        -- Bugschutz  

          

        when bugcheck.timer begin  

            if pc.count_item(53005) == 0 then  

                say_title("Buguser")  

                say("Bugusing festgestellt!")  

                pets.removebonus(pc.getqf('azraellevel'))  

            end  

        end  

          

        when login or logout or disconnect with pc.getqf("petrufazrael") == 1 begin  

            pets.removebonus(pc.getqf('azraellevel'))  

            chat("Dein Haustier ist nicht mitgekommen...")  

            chat("Rufe es erneut!")      

        end          

          

    end      

end

03/23/2014 13:53 Radiatos#1206

Quote:

Originally Posted by Rofelmau

Habs jetzt einfach mal so gemacht, das f�r beide eine Andere Variable unter der das Level abgespeichert wird genutzt wird und auch f�r den petruf neuen qf und nat�rlich die quest umbenannt, brauchen dann auch 2 namen
einfach mal ausprobieren

Spoiler

PHP Code:

quest phoenixpets begin state start begin function givebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end ) cmdchat("HaustierLevel "..pc.getqf('phoenixlevel').."") cmdchat("HaustierName "..pc.get_name().."") pc.setqf("petrufphoenix",1) end function bonusliste() return { [1] = {200,100,500}, [2] = {250,150,1000}, [3] = {300,200,1500}, [4] = {350,250,2000}, [5] = {400,300,3000}, } end function removebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end ) pet.unsummon() pc.setqf("petrufphoenix",0) horse.set_level("21") cmdchat("HidePetGui") cleartimer("bugcheck") end when 53001.use begin horse.unride() horse.unsummon() if pc.is_mount() then say_title("Entschuldigung") say("Bitte steige von deinem Mount ab!") return end if pc.getqf('phoenixlevel') == 0 then pc.setqf('phoenixlevel',1) end if pc.getqf("petrufphoenix") == 0 then local Horselevel = 22 -- -pc.getqf('phoenixlevel') horse.set_level(Horselevel) pet.unsummon() pet.summon() cmdchat("buff8") chat("Dein Haustier wurde gerufen.") pets.givebonus(pc.getqf('phoenixlevel')) local expprocent1 = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("phoenixlevel")]).."") cmdchat("ShowPetGui") loop_timer("bugcheck", 0.2) elseif pc.getqf("petrufphoenix") == 1 then pets.removebonus(pc.getqf('phoenixlevel')) chat("Dein Haustier verabschiedet sich nun.") end end when kill with pc.getqf("petrufphoenix") == 1 begin if pc.getqf("phoenixlevel") == 5 then return end if not npc.is_pc() then pc.setqf("exp",pc.getqf("exp")+1) local exp2up = {2000, 8000, 16000, 35000, 40000} local expprocent = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("phoenixlevel")]).."") if pc.getqf("exp") == exp2up[pc.getqf("phoenixlevel")] then if pc.getqf("phoenixlevel") == 4 then say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("phoenixlevel")+1).."") say_reward("Dies war das letzte Level!") end say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("phoenixlevel")+1).."") say("Rufe dein Pet bitte erneut!") pc.setqf("phoenixlevel",pc.getqf("phoenixlevel")+1) pc.setqf("exp",0) pets.removebonus(pc.getqf('phoenixlevel')) end end end -- Bugschutz when bugcheck.timer begin if pc.count_item(53001) == 0 then say_title("Buguser") say("Bugusing festgestellt!") pets.removebonus(pc.getqf('phoenixlevel')) end end when login or logout or disconnect with pc.getqf("petrufphoenix") == 1 begin pets.removebonus(pc.getqf('phoenixlevel')) chat("Dein Haustier ist nicht mitgekommen...") chat("Rufe es erneut!") end end end

PHP Code:

quest azraelpets begin state start begin function givebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end ) cmdchat("HaustierLevel "..pc.getqf('azraellevel').."") cmdchat("HaustierName "..pc.get_name().."") pc.setqf("petrufazrael",1) end function bonusliste() return { [1] = {200,100,500}, [2] = {250,150,1000}, [3] = {300,200,1500}, [4] = {350,250,2000}, [5] = {400,300,3000}, } end function removebonus(x) local y,boni = {53,54,1},pets.bonusliste() table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end ) pet.unsummon() pc.setqf("petrufazrael",0) horse.set_level("21") cmdchat("HidePetGui") cleartimer("bugcheck") end when 53005.use begin horse.unride() horse.unsummon() if pc.is_mount() then say_title("Entschuldigung") say("Bitte steige von deinem Mount ab!") return end if pc.getqf('azraellevel') == 0 then pc.setqf('azraellevel',1) end if pc.getqf("petrufazrael") == 0 then local Horselevel = 25 -- -pc.getqf('azraellevel') horse.set_level(Horselevel) pet.unsummon() pet.summon() cmdchat ("buff11") chat("Dein Haustier wurde gerufen.") pets.givebonus(pc.getqf('azraellevel')) local expprocent1 = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("azraellevel")]).."") cmdchat("ShowPetGui") loop_timer("bugcheck", 0.2) elseif pc.getqf("petrufazrael") == 1 then pets.removebonus(pc.getqf('azraellevel')) chat("Dein Haustier verabschiedet sich nun.") end end when kill with pc.getqf("petrufazrael") == 1 begin if pc.getqf("azraellevel") == 5 then return end if not npc.is_pc() then pc.setqf("exp",pc.getqf("exp")+1) local exp2up = {2000, 8000, 16000, 35000, 40000} local expprocent = {20, 80, 160, 350, 400} cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("azraellevel")]).."") if pc.getqf("exp") == exp2up[pc.getqf("azraellevel")] then if pc.getqf("azraellevel") == 4 then say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("azraellevel")+1).."") say_reward("Dies war das letzte Level!") end say_title("Herzlichen Gl�ckwunsch") say("Dein Haustier erreicht Level "..(pc.getqf("azraellevel")+1).."") say("Rufe dein Pet bitte erneut!") pc.setqf("azraellevel",pc.getqf("azraellevel")+1) pc.setqf("exp",0) pets.removebonus(pc.getqf('azraellevel')) end end end -- Bugschutz when bugcheck.timer begin if pc.count_item(53005) == 0 then say_title("Buguser") say("Bugusing festgestellt!") pets.removebonus(pc.getqf('azraellevel')) end end when login or logout or disconnect with pc.getqf("petrufazrael") == 1 begin pets.removebonus(pc.getqf('azraellevel')) chat("Dein Haustier ist nicht mitgekommen...") chat("Rufe es erneut!") end end end

ich habs grad angetestet mit dem azrael...ich kann ihn zwar rufen aber wenn ich nochmala uf des siegel draufklick kommt er nochmal. Sprich: er geht nicht weg, er kommt immer und immer wieder. Und beim Azrael steht nicht Haustierlevel: 1 sonder Haustierlevel: 0

03/23/2014 14:21 AciiDx3#1207

Hey habe ein problem und zwar will ich eine quest aufbauen wie die bio quests.
D.h es soll erst die lvl 30iger jagd.quest erledigt werden damit die 40iger jagd.quest erscheint bzw. gemacht werden kann so wie bei den bios..
erst die 30iger bio dann die 40iger

ich wollte keine quest hier posten kann mir jmd sagen was ich einf�gen muss und wo genau ich was einf�gen muss danke oder addet mich pls in skype.

niklas_x3

03/23/2014 14:53 Radiatos#1208

Quote:

Originally Posted by AciiDx3

Hey habe ein problem und zwar will ich eine quest aufbauen wie die bio quests.
D.h es soll erst die lvl 30iger jagd.quest erledigt werden damit die 40iger jagd.quest erscheint bzw. gemacht werden kann so wie bei den bios..
erst die 30iger bio dann die 40iger

ich wollte keine quest hier posten kann mir jmd sagen was ich einf�gen muss und wo genau ich was einf�gen muss danke oder addet mich pls in skype.

niklas_x3

probiers mal mit dem hier:

when login or levelup with pc.level>39 begin
set_state(Bio Quest))

03/23/2014 16:03 AciiDx3#1209

Quote:

probiers mal mit dem hier:

when login or levelup with pc.level>39 begin
set_state(Bio Quest))

Wo muss ich nicht am ende der quest einen befehl machen?

03/23/2014 16:25 Radiatos#1210

Quote:

Originally Posted by AciiDx3

Wo muss ich nicht am ende der quest einen befehl machen?

gleich am anfang

03/23/2014 21:00 Rofelmau#1211

Quote:

Originally Posted by AciiDx3

Hey habe ein problem und zwar will ich eine quest aufbauen wie die bio quests.
D.h es soll erst die lvl 30iger jagd.quest erledigt werden damit die 40iger jagd.quest erscheint bzw. gemacht werden kann so wie bei den bios..
erst die 30iger bio dann die 40iger

ich wollte keine quest hier posten kann mir jmd sagen was ich einf�gen muss und wo genau ich was einf�gen muss danke oder addet mich pls in skype.

niklas_x3

ede mich in skype
fragi. hei� ich dann mach ich dir die quest

# @Radiatos
hab was vergessen ist ge�ndert, versuch nochmal

Spoiler

PHP Code:


			
quest azraelpets begin   
    state start begin       
       
        function givebonus(x)   
            local y,boni = {53,54,1},azraelpets.bonusliste()   
            table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end )   
            cmdchat("HaustierLevel "..pc.getqf('azraellevel').."")   
            cmdchat("HaustierName "..pc.get_name().."")   
            pc.setqf("petrufazrael",1)                   
        end   
        function bonusliste()   
            return {   
                [1] = {200,100,500},   
                [2] = {250,150,1000},   
                [3] = {300,200,1500},   
                [4] = {350,250,2000},   
                [5] = {400,300,3000},   
            }   
        end       
        function removebonus(x)   
            local y,boni = {53,54,1},azraelpets.bonusliste()   
            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end )   
             pet.unsummon()   
            pc.setqf("petrufazrael",0)   
            horse.set_level("21")   
            cmdchat("HidePetGui")   
            cleartimer("bugcheck")   
        end           
       
        when 53005.use begin   
            horse.unride() horse.unsummon()  
            if pc.is_mount() then   
                say_title("Entschuldigung")   
                say("Bitte steige von deinem Mount ab!")   
                return   
            end   
            if pc.getqf('azraellevel') == 0 then   
                pc.setqf('azraellevel',1)   
            end   
            if pc.getqf("petrufazrael") == 0 then   
                local Horselevel = 25 -- -pc.getqf('azraellevel')   
                horse.set_level(Horselevel)   
                 pet.unsummon()  pet.summon()   
                cmdchat ("buff11")  
                chat("Dein Haustier wurde gerufen.")   
                azraelpets.givebonus(pc.getqf('azraellevel'))   
                local expprocent1 = {20, 80, 160, 350, 400}   
                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("azraellevel")]).."")                   
                cmdchat("ShowPetGui")   
                loop_timer("bugcheck", 0.2)   
            elseif pc.getqf("petrufazrael") == 1 then           
                azraelpets.removebonus(pc.getqf('azraellevel'))   
                chat("Dein Haustier verabschiedet sich nun.")   
            end           
        end   
           
           
        when kill with pc.getqf("petrufazrael") == 1 begin   
            if pc.getqf("azraellevel") == 5 then   
                return   
            end       
            if not npc.is_pc() then   
                pc.setqf("exp",pc.getqf("exp")+1)   
                local exp2up = {2000, 8000, 16000, 35000, 40000}   
                local expprocent = {20, 80, 160, 350, 400}   
                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("azraellevel")]).."")   
                if pc.getqf("exp") == exp2up[pc.getqf("azraellevel")] then   
                    if pc.getqf("azraellevel") == 4 then   
                        say_title("Herzlichen Gl�ckwunsch")   
                        say("Dein Haustier erreicht Level "..(pc.getqf("azraellevel")+1).."")   
                        say_reward("Dies war das letzte Level!")   
                    end   
                    say_title("Herzlichen Gl�ckwunsch")   
                    say("Dein Haustier erreicht Level "..(pc.getqf("azraellevel")+1).."")   
                    say("Rufe dein Pet bitte erneut!")   
                    pc.setqf("azraellevel",pc.getqf("azraellevel")+1)   
                    pc.setqf("exp",0)   
                    azraelpets.removebonus(pc.getqf('azraellevel'))   
                end   
            end   
        end   
           
        -- Bugschutz   
           
        when bugcheck.timer begin   
            if pc.count_item(53005) == 0 then   
                say_title("Buguser")   
                say("Bugusing festgestellt!")   
                azraelpets.removebonus(pc.getqf('azraellevel'))   
            end   
        end   
           
        when login or logout or disconnect with pc.getqf("petrufazrael") == 1 begin   
            azraelpets.removebonus(pc.getqf('azraellevel'))   
            chat("Dein Haustier ist nicht mitgekommen...")   
            chat("Rufe es erneut!")       
        end           
           
    end       
end

PHP Code:


			
quest phoenixpets begin   
    state start begin       
       
        function givebonus(x)   
            local y,boni = {53,54,1},phoenixpets.bonusliste()   
            table.foreach(boni[x],function(i,l)  cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end )   
            cmdchat("HaustierLevel "..pc.getqf('phoenixlevel').."")   
            cmdchat("HaustierName "..pc.get_name().."")   
            pc.setqf("petrufphoenix",1)                   
        end   
        function bonusliste()   
            return {   
                [1] = {200,100,500},   
                [2] = {250,150,1000},   
                [3] = {300,200,1500},   
                [4] = {350,250,2000},   
                [5] = {400,300,3000},   
            }   
        end       
        function removebonus(x)   
            local y,boni = {53,54,1},phoenixpets.bonusliste()   
            table.foreach(boni[x],function(i,l) affect.remove_collect(y[i],l,60*60*24*365*60) end )   
             pet.unsummon()   
            pc.setqf("petrufphoenix",0)   
            horse.set_level("21")   
            cmdchat("HidePetGui")   
            cleartimer("bugcheck")   
        end           
       
        when 53001.use begin   
            horse.unride() horse.unsummon()  
            if pc.is_mount() then   
                say_title("Entschuldigung")   
                say("Bitte steige von deinem Mount ab!")   
                return   
            end   
            if pc.getqf('phoenixlevel') == 0 then   
                pc.setqf('phoenixlevel',1)   
            end   
            if pc.getqf("petrufphoenix") == 0 then   
                local Horselevel = 22 -- -pc.getqf('phoenixlevel')   
                horse.set_level(Horselevel)   
                 pet.unsummon()  pet.summon()   
                cmdchat("buff8")  
                chat("Dein Haustier wurde gerufen.")   
                phoenixpets.givebonus(pc.getqf('phoenixlevel'))   
                local expprocent1 = {20, 80, 160, 350, 400}   
                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("phoenixlevel")]).."")                   
                cmdchat("ShowPetGui")   
                loop_timer("bugcheck", 0.2)   
            elseif pc.getqf("petrufphoenix") == 1 then           
                phoenixpets.removebonus(pc.getqf('phoenixlevel'))   
                chat("Dein Haustier verabschiedet sich nun.")   
            end           
        end   
           
           
        when kill with pc.getqf("petrufphoenix") == 1 begin   
            if pc.getqf("phoenixlevel") == 5 then   
                return   
            end       
            if not npc.is_pc() then   
                pc.setqf("exp",pc.getqf("exp")+1)   
                local exp2up = {2000, 8000, 16000, 35000, 40000}   
                local expprocent = {20, 80, 160, 350, 400}   
                cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("phoenixlevel")]).."")   
                if pc.getqf("exp") == exp2up[pc.getqf("phoenixlevel")] then   
                    if pc.getqf("phoenixlevel") == 4 then   
                        say_title("Herzlichen Gl�ckwunsch")   
                        say("Dein Haustier erreicht Level "..(pc.getqf("phoenixlevel")+1).."")   
                        say_reward("Dies war das letzte Level!")   
                    end   
                    say_title("Herzlichen Gl�ckwunsch")   
                    say("Dein Haustier erreicht Level "..(pc.getqf("phoenixlevel")+1).."")   
                    say("Rufe dein Pet bitte erneut!")   
                    pc.setqf("phoenixlevel",pc.getqf("phoenixlevel")+1)   
                    pc.setqf("exp",0)   
                    phoenixpets.removebonus(pc.getqf('phoenixlevel'))   
                end   
            end   
        end   
           
        -- Bugschutz   
           
        when bugcheck.timer begin   
            if pc.count_item(53001) == 0 then   
                say_title("Buguser")   
                say("Bugusing festgestellt!")   
                phoenixpets.removebonus(pc.getqf('phoenixlevel'))   
            end   
        end   
           
        when login or logout or disconnect with pc.getqf("petrufphoenix") == 1 begin   
            phoenixpets.removebonus(pc.getqf('phoenixlevel'))   
            chat("Dein Haustier ist nicht mitgekommen...")   
            chat("Rufe es erneut!")       
        end           
           
    end       
end

03/24/2014 16:06 aaaccb111#1212

Hallo ich habe ein Fehler kann sich das bitte einer anschauen?

Quest:

Spoiler

Ich bekomme immer den Fehler:

syntax error : [string "start"]:8: `=' expected near `target'
Spiegel.quest:18:Error occured on compile Spiegel.quest

03/24/2014 17:42 .yorliK#1213

Quote:

Originally Posted by aaaccb111

Hallo ich habe ein Fehler kann sich das bitte einer anschauen?

Quest:

Spoiler

quest Spiegel begin
state start begin
when login or levelup with pc.level() >= 99 begin
send_letter("Kampf gegen das Wasser")
end
when button or info begin
say_title("Kampf gegen das Wasser")
say("")
say("Uriel braucht deine Hilfe")
say("Gehe bitte zu ihm.")
local v=find_npc_by_vnum(20011)
if 0==v then
els
target.vid("__TARGET__"), v, mob_name(3401))
clear_letter()
set_state(information)
end
end
end
state information begin
when __TARGET__.target.click or
20011.chat."Unsichtbarkeitsspiegel" begin
say("Hallo, "..pc.get_name().."!")
say("Die Wasserkreaturen haben es schon wieder geschafft")
say("uns zu berauben, ohne das wir etwas mitbekommen haben.")
say("ich habe die Vermutung, das sie durch einen")
say("Unsichtbarkeitsspiegel sich Unsichtbar machen und")
say("uns berauben. Ich werde dich reichlich belohen,")
say("wenn du mir so einen Spiegel bringst, damit ich")
say("ihn Untersuchen kann. Willst du mir Helfen?")
local s = select("Ja", "Nein, keine Zeit!")
if s == 1 then
say("Vielen Dank. Versuch dein Gl�ck.")
say("Dich wird eine tolle Belohnung erwarten.")
set_state(weiter)
end
end
end
state weiter begin
when letter begin
send_letter("Die Suche nach dem Spiegel")
end
when button or info begin
say_title("Der Unsichtbarkeitsspiegel")
say("")
say("Suche den Unsichtbarkeitsspiegel!")
say_item_vnum(70026)
end
when 3401.kill begin
local x = number(1, 500)
if x == 1 then
game.drop_item(70026, 1)
end
end
when 3402.kill begin
local y = number(1, 500)
if y == 1 then
game.drop_item(70026, 1)
end
end
when 3403.kill begin
local w = number(1, 500)
if w == 1 then
game.drop_item(70026, 1)
end
end
when 20011.chat."Unsichtbarkeitsspiegel gefunden!" with pc.count_item(70026) > 0 begin
say("oh danke! Jetzt kann ich meine Forschungen")
say("�ber die Unsichtbarkeit anfangen")
say("")
say("Vielen Dank!")
pc.remove_item("70026", 1)
pc.give_item2(90003,1)

say("Als Belohnung erh�lst du:")
say("1 Kristall")
clear_letter()
set_state(__complete)
end
end
state __complete begin
end
end

Ich bekomme immer den Fehler:

syntax error : [string "start"]:8: `=' expected near `target'
Spiegel.quest:18:Error occured on compile Spiegel.quest

Spoiler

PHP Code:


			
quest Spiegel begin

    state start begin

        when login or levelup with pc.level>= 99 begin

            set_state(warten)

        end

    end

    state warten begin

        when letter begin

            local v = find_npc_by_vnum(20011)

            if v != 0 then

                target.vid("Target1", v, "Uriel")

            end

            send_letter("Kampf gegen das Wasser")

        end



        when button or info begin

            say_title("Kampf gegen das Wasser")

            say("")

            say("Uriel braucht deine Hilfe")

            say("Gehe bitte zu ihm.")

        end

        when Target1.target.click or 20011.chat."Unsichtbarkeitsspiegel" begin

            target.delete("Target1")

            say("Hallo, "..pc.get_name().."!")

            say("Die Wasserkreaturen haben es schon wieder geschafft")

            say("uns zu berauben, ohne das wir etwas mitbekommen haben.")

            say("ich habe die Vermutung, das sie durch einen")

            say("Unsichtbarkeitsspiegel sich Unsichtbar machen und")

            say("uns berauben. Ich werde dich reichlich belohen,")

            say("wenn du mir so einen Spiegel bringst, damit ich")

            say("ihn Untersuchen kann. Willst du mir Helfen?")

            if select("Ja", "Nein, keine Zeit!")==2 then set_state(__COMPLETE__) return end

            say("Vielen Dank. Versuch dein Gl�ck.")

            say("Dich wird eine tolle Belohnung erwarten.")

            set_state(weiter)

        end

    end

    state weiter begin

        when letter begin

            send_letter("Die Suche nach dem Spiegel") 

        end

        when button or info begin

            say_title("Der Unsichtbarkeitsspiegel")

            say("")

            say("Suche den Unsichtbarkeitsspiegel!")

            say_item_vnum(70026)

        end



        when kill with npc.get_race() == 3401 begin

            local x = number(1, 500)

            if x == 1 then

                game.drop_item(70026, 1)

                set_state(spiegel)

            end 

        end 

        when kill with npc.get_race() == 3402 begin

            local x = number(1, 500)

            if x == 1 then

                game.drop_item(70026, 1)

                set_state(spiegel)

            end 

        end 

        when kill with npc.get_race() == 3403 begin

            local x = number(1, 500)

            if x == 1 then

                game.drop_item(70026, 1)

                set_state(spiegel)

            end 

        end 

    end

    state spiegel begin

        when letter begin

            local v = find_npc_by_vnum(20011)

            if v != 0 then

                target.vid("Target1", v, "Uriel")

            end

            send_letter("Unsichtbarkeitsspiegel gefunden")

        end

        when Target1.target.click or 20011.chat."Unsichtbarkeitsspiegel gefunden!" with pc.count_item(70026) > 0 begin

            target.delete("Target1")

            say("oh danke! Jetzt kann ich meine Forschungen")

            say("�ber die Unsichtbarkeit anfangen")

            say("")

            say("Vielen Dank!")

            pc.remove_item("70026", 1)

            pc.give_item2(90003,1)

            say("Als Belohnung erh�lst du:")

            say_reward("1x Kristall")

            clear_letter()

            set_state(__COMPLETE__)

        end

    end

    state __COMPLETE__ begin

    end

end

03/24/2014 18:50 .Namikaze#1214

Quote:

Originally Posted by .Namikaze

Hallo,

k�nnte mir jemand eine premium quest schreiben wenn man ein gewisses item benutzt bekommt man ein (P) vor dem namen und das Premium sollte 1 monat gehen dazu vlt noch eine quest f�r einen shop das leute mit premium den besagten shop �ffnen k�nnen

mfg
.Namikaze

Suche immer noch eine quest mit den oben genannten sachen

03/25/2014 09:07 SkyWodka#1215

Quote:

Hallo Com.,

ich habe folgende quest hier im Forum gefunden...

Spoiler

PHP Code:

quest mining begin state start begin when 20011.chat."Minensystem starten" with pc.is_gm() and game.get_event_flag("Minensystem_an") == 0 begin say("Hallo "..pc.get_name()) say("") say("Hier kannst du das Minensystem f�r den") say("gesamten Server starten") say("Das System kann allerdings nicht gestoppt") say("werden sobald is einmal gestartet wurde") say("M�chtest du Fortfahren?") local sel = select("Fortfahren", "Lieber nicht") if sel == 1 then say("Du hast das System Erfolgreich gestartet") game.set_event_flag("Minensystem_an", 1) notice_all("Das Mining System wurde Aktiviert. Besuche Uriel um mehr zu Erfahren") elseif sel == 2 then say("Okey vielleicht wann anders") end end when 20011.chat."Minensystem Cooldown" with pc.is_gm() and pc.getqf("upgrade") > get_time() begin pc.setqf("upgrade", get_time() + 1) say("Erfolgreich durchgef�hrt") end when 20011.chat."Minensystem" with game.get_event_flag("Minensystem_an") == 1 begin if pc.getqf("system") != 1 then say("Hallo "..pc.get_name()) say("Hier kannst du deine Eigene Mine bauen") say("Du kannst durch sie Geld und Gegenst�nde") say("erwirtschaften ohne etwas tun zu m�ssen") say("Du kannst sie auch aufstufen um schneller") say("an mehr Geld kommen zu k�nnen") wait() say("Die Maximal anzahl an Minen ist 4") say("Jede Mine kann bis zu 10 mal Aufgestuft werden") say("Mit jeder Stufe steigt die Produktion") say("Allerdings kostet die erste Mine 20'000.000 Gold") local sel = select("Fortfahren", "Lieber nicht") if sel == 1 then if pc.get_money() >= 20000000 then pc.change_money(-20000000) say("Du hast das System Erfolgreich gestartet") pc.setqf("system", 1) pc.setqf("Minen_frei", 1) pc.setqf("Mine1", 1) pc.setqf("Mine2", 0) pc.setqf("Mine3", 0) pc.setqf("Mine4", 0) pc.setqf("Hacker1", 1) pc.setqf("Hacker2", 1) pc.setqf("last_pay", get_time()) pc.setqf("upgrade", get_time()) else say("Tut mir leid die hast nicht genug Gold") say("Komm zur�ck wenn du 20'000.000 Gold hast") end elseif sel == 2 then say("Okey vielleicht wann anders") end elseif pc.getqf("system") == 1 then local Stunden = math.floor((get_time()-pc.getqf("last_pay")) / 60 / 60) local Minuten = math.floor(((get_time()-pc.getqf("last_pay")) / 60 ) - Stunden * 60) local Sekunden = math.floor((get_time()-pc.getqf("last_pay")) - Stunden * 60 * 60 - Minuten * 60) say("Hallo "..pc.get_name()) say("Du bist hier bei deine Mine") say("Hier kannst du sie Verwahlten") say("Deine Mine Produziert seit: "..Stunden.."h "..Minuten.."min "..Sekunden.."sek") local verwahltung = select("Minen Verwalten", "Geld Auszahlen", "Beenden") if verwahltung == 1 then say("Was m�chtest du machen?") if pc.getqf("Minen_frei") > 0 then local string mine1 = "Mine 1 Verwahlten" end if pc.getqf("Minen_frei") > 1 then local string mine2 = "Mine 2 Verwahlten" else local string mine2 = "Mine 2 Freischalten" end if pc.getqf("Minen_frei") > 2 then local string mine3 = "Mine 3 Verwahlten" else local string mine3 = "Mine 3 Freischalten" end if pc.getqf("Minen_frei") > 3 then local string mine4 = "Mine 4 Verwahlten" else local string mine4 = "Mine 4 Freischalten" end local minesel = select(mine1, mine2, mine3, mine4, "Minenhacker", "Abbrechen") if minesel == 6 then say("Okey bis bald "..pc.get_name()) return end if minesel == 5 then say("Minenhacker erh�hen deine Erfolgschance beim Abbaun") say("Bei niedriger Stufe kann die Mine �fters einst�rzen") local who = select("Erster Minenhacker (Stufe "..pc.getqf("Hacker1")..")", "Zweiter Minenhacker (Stufe "..pc.getqf("Hacker2")..")", "Abbrechen") if who == 3 then say("Okey bis bald "..pc.get_name()) return end say("Aktuelle Stufe: "..pc.getqf("Hacker"..who)) say("Kosten f�r Verbesserung: "..pc.getqf("Hacker"..who) * 1000000) say("Upgrade dauert: "..pc.getqf("Hacker"..who).." Minuten") say("Aktuelle Erfolgschance: ".. 100 - (100 / (pc.getqf("Hacker1") * 2 + pc.getqf("Hacker2") * 2)) .."%") if pc.getqf("upgrade") < get_time() then say("Du kannst wieder Upgraden") else local Stunden = math.floor((pc.getqf("upgrade")-get_time()) / 60 / 60) local Minuten = math.floor(((pc.getqf("upgrade")-get_time()) / 60 ) - Stunden * 60) local Sekunden = math.floor((pc.getqf("upgrade")-get_time()) - Stunden * 60 * 60 - Minuten * 60) say("Du kannst erst in "..Stunden.."h "..Minuten.."min "..Sekunden.."sek wieder Upgraden") end local upornot = select("Stufe Erh�hen", "Abbrechen") if upornot == 1 then say("Bist du sicher das du Fortfahren m�chtest?") say("Verbessern kostet "..pc.getqf("Hacker"..who) * 1000000 .." Gold") local janein = select("Fortfahren", "Lieber nicht") if janein == 1 then if pc.getqf("Hacker"..who) == 10 then say("Du kannst die Mine Mommentan nicht weiter Aufwerten") elseif pc.getqf("upgrade") < get_time() then if pc.get_money() >= (pc.getqf("Hacker"..who) * 1000000) then pc.change_money(-pc.getqf("Hacker"..who) * 1000000) pc.setqf("Hacker"..who, pc.getqf("Hacker"..who) + 1) pc.setqf("upgrade", get_time() + pc.getqf("Hacker"..who) * 60 * 1) say("Erfolgreich durchgef�hrt") else say("Du hast nicht genug Gold") say("Komm wieder wenn du mehr hast") return end else say("Du must noch warten bis du wieder Upgraden kannst") return end elseif janein == 2 then say("Okey bis bald "..pc.get_name()) return end elseif upornot == 2 then say("Okey bis bald "..pc.get_name()) return end return end if pc.getqf("Mine"..minesel) == 0 then say("Du bist dabei deine n�chste Mine Freizuschalten") say("Dieser Vorgang kostet 20'000.000 Gold") say("M�chtest du Fortfahren?") local sel = select("Fortfahren", "Lieber nicht") if sel == 1 then if pc.get_money() >= 20000000 then pc.change_money(-20000000) say("Du hast die Mine Erfolgreich Freigeschaltet") pc.setqf("Minen_frei", pc.getqf("Minen_frei") + 1) pc.setqf("Mine"..minesel, pc.getqf("Mine"..minesel) + 1) else say("Tut mir leid die hast nicht genug Gold") say("Komm zur�ck wenn du 20'000.000 Gold hast") end elseif sel == 2 then say("Okey vielleicht wann anders") end elseif pc.getqf("Mine"..minesel) == 1 then pc.setqf("temp.produktion", 50) elseif pc.getqf("Mine"..minesel) == 2 then pc.setqf("temp.produktion", 75) elseif pc.getqf("Mine"..minesel) == 3 then pc.setqf("temp.produktion", 110) elseif pc.getqf("Mine"..minesel) == 4 then pc.setqf("temp.produktion", 150) elseif pc.getqf("Mine"..minesel) == 5 then pc.setqf("temp.produktion", 225) elseif pc.getqf("Mine"..minesel) == 6 then pc.setqf("temp.produktion", 300) elseif pc.getqf("Mine"..minesel) == 7 then pc.setqf("temp.produktion", 400) elseif pc.getqf("Mine"..minesel) == 8 then pc.setqf("temp.produktion", 550) elseif pc.getqf("Mine"..minesel) == 9 then pc.setqf("temp.produktion", 750) elseif pc.getqf("Mine"..minesel) == 10 then pc.setqf("temp.produktion", 1000) end say("Willkommen bei deiner "..minesel..". Mine") say("Hier findest du Informationen zu ihr") say("Und hast die M�glichkeit sie Aufzuwerten") wait() say("Aktuelle Stufe: "..pc.getqf("Mine"..minesel)) say("Aktuelle Produktion: "..pc.getqf("temp.produktion") * 60 * 60 .." Gold pro Stunde") say("Upgrade kosten: "..pc.getqf("temp.produktion") * 60 * 60 * 24 * 5 .." Gold") say("Upgrade dauert: "..pc.getqf("Mine"..minesel) * 5 .." Minuten") if pc.getqf("upgrade") < get_time() then say("Du kannst wieder Upgraden") else local Stunden = math.floor((pc.getqf("upgrade")-get_time()) / 60 / 60) local Minuten = math.floor(((pc.getqf("upgrade")-get_time()) / 60 ) - Stunden * 60) local Sekunden = math.floor((pc.getqf("upgrade")-get_time()) - Stunden * 60 * 60 - Minuten * 60) say("Du kannst erst in "..Stunden.."h "..Minuten.."min "..Sekunden.."sek wieder Upgraden") end local upornot = select("Stufe Erh�hen", "Abbrechen") if upornot == 1 then say("Bist du sicher das du Fortfahren m�chtest?") say("Verbessern kostet "..pc.getqf("temp.produktion") * 60 * 60 * 24 * 5 .." Gold") local janein = select("Fortfahren", "Lieber nicht") if janein == 1 then if pc.getqf("Mine"..minesel) == 10 then say("Du kannst die Mine Mommentan nicht weiter Aufwerten") elseif pc.getqf("upgrade") < get_time() then if pc.get_money() >= (pc.getqf("temp.produktion") * 60 * 60 * 24 * 5) then pc.change_money(-pc.getqf("temp.produktion") * 60 * 60 * 24 * 5) pc.setqf("Mine"..minesel, pc.getqf("Mine"..minesel) + 1) pc.setqf("upgrade", get_time() + pc.getqf("Mine"..minesel) * 60 * 5) say("Erfolgreich durchgef�hrt") else say("Du hast nicht genug Gold") say("Komm wieder wenn du mehr hast") end else say("Du must noch warten bis du wieder Upgraden kannst") end elseif janein == 2 then say("Okey bis bald "..pc.get_name()) end elseif upornot == 2 then say("Okey bis bald "..pc.get_name()) end elseif verwahltung == 2 then say("Bist du sicher das du alles") say("Erwirtschaftete Gold Abheben willst?") local sel = select("Ja", "Nein") if sel == 1 then pc.setqf("money.temp", 0) if pc.getqf("Mine1") == 0 then elseif pc.getqf("Mine1") == 1 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 50) elseif pc.getqf("Mine1") == 2 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay"))* 75) elseif pc.getqf("Mine1") == 3 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 110) elseif pc.getqf("Mine1") == 4 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 150) elseif pc.getqf("Mine1") == 5 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 225) elseif pc.getqf("Mine1") == 6 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 300) elseif pc.getqf("Mine1") == 7 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 400) elseif pc.getqf("Mine1") == 8 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 550) elseif pc.getqf("Mine1") == 9 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 750) elseif pc.getqf("Mine1") == 10 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 1000) end if pc.getqf("Mine2") == 0 then elseif pc.getqf("Mine2") == 1 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 50) elseif pc.getqf("Mine2") == 2 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 75) elseif pc.getqf("Mine2") == 3 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 110) elseif pc.getqf("Mine2") == 4 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 150) elseif pc.getqf("Mine2") == 5 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 225) elseif pc.getqf("Mine2") == 6 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 300) elseif pc.getqf("Mine2") == 7 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 400) elseif pc.getqf("Mine2") == 8 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 550) elseif pc.getqf("Mine2") == 9 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 750) elseif pc.getqf("Mine2") == 10 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 1000) end if pc.getqf("Mine3") == 0 then elseif pc.getqf("Mine3") == 1 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 50) elseif pc.getqf("Mine3") == 2 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 75) elseif pc.getqf("Mine3") == 3 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 110) elseif pc.getqf("Mine3") == 4 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 150) elseif pc.getqf("Mine3") == 5 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 225) elseif pc.getqf("Mine3") == 6 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 300) elseif pc.getqf("Mine3") == 7 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 400) elseif pc.getqf("Mine3") == 8 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 550) elseif pc.getqf("Mine3") == 9 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 750) elseif pc.getqf("Mine3") == 10 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 1000) end if pc.getqf("Mine4") == 0 then elseif pc.getqf("Mine4") == 1 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 50) elseif pc.getqf("Mine4") == 2 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 75) elseif pc.getqf("Mine4") == 3 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 110) elseif pc.getqf("Mine4") == 4 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 150) elseif pc.getqf("Mine4") == 5 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 225) elseif pc.getqf("Mine4") == 6 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 300) elseif pc.getqf("Mine4") == 7 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 400) elseif pc.getqf("Mine4") == 8 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 550) elseif pc.getqf("Mine4") == 9 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 750) elseif pc.getqf("Mine4") == 10 then pc.setqf("money.temp", pc.getqf("money.temp") + (get_time()-pc.getqf("last_pay")) * 1000) end say("Es handelt sich um "..pc.getqf("money.temp").." Gold") say("Allerdings kann es auch schiefgehen") say("Und die Mine wird Versch�ttet") local sel = select("Abheben", "Sp�ter") if sel == 1 then if pc.get_money() + pc.getqf("money.temp") > 2000000000 then say("Du hast zuviel Gold bei dir") say("Komm wieder wenn du weniger dabei hast") else local chance = (pc.getqf("Hacker1") * 2 + (pc.getqf("Hacker2")) * 2) local fail = number(1, chance) if fail == 1 then say("Leider ist deine Mine eingest�rzt") say("Dadurch ging deine Bergung Verlohren") pc.setqf("last_pay", get_time()+1) else local bigbomb = number(1, 50) if bigbomb == 1 then pc.give_item2(27992, 1) elseif bigbomb == 2 then pc.give_item2(27993, 1) elseif bigbomb == 3 then pc.give_item2(27994, 1) end pc.change_gold(pc.getqf("money.temp")) pc.setqf("last_pay", get_time()+1) say("Du hast das Gold erfolgreich erhalten") end end end elseif sel == 2 then say("Okey bis bald") end elseif verwahltung == 3 then say("Bis bald "..pc.get_name()) end end end end end

...jedoch gef�llt sie mir so nicht und ich wei� nicht so genau wie ich sie so ver�ndere wie ich euch nun aufz�hle.

Die Quest soll k�nnen:

-> Ein Item was sagen wir nach ca. einer Stunde (oder auch nach einer x beliebigen Zeit die per Zufall genereiert wird) aus der Mine "gedroppt" wird (z.B. Eisenbarren) und was man dann bei dem jeweiligen NPC abholen kann indem man durch eine Quest am Rand (Da wo auch immer steht "Herzlich Willkommen auf...") informiert wird.

-> Zudem soll es so sein, dass wenn man das Item in dem Beispiel einen "Eisenbarren" heraus holen will es auch fehlschlagen kann und der Barren somit verloren ist.

Extra info:

-> W�re es m�glich das man diese Quest 4 mal bekommt, sprich man klickt den NPC an und dann kommt da "Die Goldmine","Die Silbermine",Die Bronzemine" und vllt. "Die Eisenmine"?
Wenn ja k�nnte mir jemand dabei behilflich sein wie das geht das ich dann sogesehen entweder 4 Quests habe die auf einem NPC laufen oder ist das dann so eine art Multiquest (sowie bei den Multishops "Krieger R�ssis",Ninja R�ssis"...)

Frage: Was bedeutet in der Quest das "Cooldown"?

LG SkyWodka

Suche immer noch das oben beschriebene.

LG SkyWodka

Page 81 of 248