[SERVICE] Die Questkontrolle

Page 651 of 845

651

02/24/2014 22:01 nOa##9751

Spoiler

Mal so testen, danke.

PHP Code:


			
quest tt begin

    state start begin

        when login begin

        timer("eins", 60*15) 

        end

    

        when eins.timer begin

            chat("Hallo zusammen!")

            chat("Vote t�glich MIT ABSTIMMUNG und verdiene dir Coins!")

            chat("")

            chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns")

            timer("zwei", 60*30)

        end

        

        when zwei.timer begin

            chat("Hallo zusammen!")

            chat("Ein Gamemaster fragt euch nie nach euren Logindaten!")

            chat("Geklaute Items werden von uns nicht zur�ck erstattet!")

            chat("")

            chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns")

            timer("drei", 60*30)

        end

        

        when drei.timer begin

            chat("Hallo zusammen!")

            chat("www.xxxxxx.de - Homepage // www.xxxxxx.com - Forum")

            chat("")

            chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns")

            timer("4", 60*30)

        end

    end

end

02/24/2014 22:25 -Zhui-#9752

Hey,

ich benutze die Quest von Epvp hier:

Spoiler

PHP Code:


			
quest warpring begin

    state start begin

        when 70007.use begin

            say_title("Warpring") 

            say("Wohin m�chtest du Teleportiert werden?")

        local empire = pc.get_empire() 

                    local selectmap = select("Map1","Map2","Orktal","W�ste","Eisland","Feuerland","Weiter","Abbrechen")

                    if selectmap == 8 then

                return

                    elseif selectmap == 7 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

            local selectmap2 = select("D�monenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Land der Riesen","Abbrechen")

                    if selectmap2 == 7 then

                        return

                    elseif selectmap2 == 1 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

            pc.warp(590500,110800)

                    elseif selectmap2 == 2 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local geisterselect = select("Anfang","Ende","Abbrechen")

                    if geisterselect == 3 then

                        return

                    elseif geisterselect == 1 then

            pc.warp(290500,5700)

                    elseif geisterselect == 2 then

            pc.warp(286400,44200)

            end

                    elseif selectmap2 == 3 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local roterselect = select("Anfang","Ende","Abbrechen")

                    if roterselect == 3 then

                        return

                    elseif roterselect == 1 then

            pc.warp(1119900,70800)

                    elseif geisterselect == 2 then

            pc.warp(1119100,7700)

            end

                    elseif selectmap2 == 4 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

            pc.warp(91700, 525300)

                    elseif selectmap2 == 5 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

            pc.warp(27600, 142700)

                    elseif selectmap2 == 6 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

            pc.warp(819200, 716800)

            end

                    elseif selectmap == 1 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")

                    if map1select == 4 then

                        return

                    elseif map1select == 1 then

            pc.warp(474300, 954800)

                    elseif map1select == 2 then

            pc.warp(63800, 166400)

                    elseif map1select == 3 then

            pc.warp(959900, 269200)

            end

                    elseif selectmap == 2 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")

                    if map2select == 4 then

                        return

                    elseif map2select == 1 then

            pc.warp(353100, 882900)

                    elseif map2select == 2 then

            pc.warp(145500, 240000)

                    elseif map2select == 3 then

            pc.warp(863900, 246000)

            end

                    elseif selectmap == 3 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local otselect = select("Anfang","Mitte","Abbrechen")

                    if otselect == 3 then

                        return

                    elseif otselect == 1 then

            if empire == 1 then

            pc.warp(402100, 673900)

                    elseif empire == 2 then

            pc.warp(270400, 739900)

                    elseif empire == 3 then

            pc.warp(321300, 808000)

            end

                    elseif otselect == 2 then

            pc.warp(332800, 745600)

            end

                    elseif selectmap == 4 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local wuesteselect = select("Anfang","Mitte","Abbrechen")

                    if wuesteselect == 3 then

                        return

                    elseif wuesteselect == 1 then

            if empire == 1 then

            pc.warp(217800, 627200)

                    elseif empire == 2 then

            pc.warp(221900, 502700)

                    elseif empire == 3 then

            pc.warp(344000, 502500)

            end

                    elseif wuesteselect == 2 then

            pc.warp(296800, 547100)

            end

                    elseif selectmap == 5 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local eisselect = select("Anfang","Mitte","Abbrechen")

                    if eisselect == 3 then

                        return

                    elseif eisselect == 1 then

            if empire == 1 then

            pc.warp(434200, 290600)

                    elseif empire == 2 then

            pc.warp(375200, 174900)

                    elseif empire == 3 then

            pc.warp(491800, 173600)

            end

                    elseif eisselect == 2 then

            pc.warp(436500, 215400)

            end

                    elseif selectmap == 6 then

                        say_title("Warpring") 

                        say("Wohin m�chtest du Teleportiert werden?")

                    local feuerselect = select("Anfang","Mitte","Abbrechen")

                    if feuerselect == 3 then

                        return

                    elseif feuerselect == 1 then

            if empire == 1 then

            pc.warp(599400, 756300)

                    elseif empire == 2 then

            pc.warp(597800, 622200)

                    elseif empire == 3 then

            pc.warp(730700, 689800)

            end

                    elseif feuerselect == 2 then

            pc.warp(600800, 687100)

            end

                end

                    end

                        end

                            end

Jedoch wenn ich den Warpring 1x benutzt habe, geht er nicht mehr.

Also ich kann ihn einfach nicht mehr anklicken.

Wie kann ich das beheben? o:

02/24/2014 23:03 BlackBynes#9753

Hi,

ich habe mir die 40k game datei besorgt und habe mir die quest angeschaut und dabei festgestellt das gameforge langeweile hatte und jegliche Quests umgeschrieben hat und zwar mit verzweigen wie zum Beispiel

PHP Code:


			
say_title(gameforge.buy_fishrod._20_sayTitle)

say(gameforge.buy_fishrod._60_say)

pc.give_item2("27400", 1)

kann mir zuf�llig jemand von euch sagen wo ich diese verzweigungen finden kann?

Vielen Dank

02/25/2014 07:40 deamoneye#9754

In der translate.lua

02/25/2014 08:39 Mijago#9755

Oftmals auch locale.lua :)

02/25/2014 16:49 Getreidekuchen66#9756

Mehrere Shops in einen NPC / VB sagt error.. Was ist falsch? :S

PHP Code:


			
quest shops begin
state start begin
when 20086.chat."Krieger-Frisuren" begin
say_title("Frisuren:")
say("")
say("M�chtest du den Frisuren-Shop �ffnen?")
local s = select("Ja", "Nein")

if s == 1 then
npc.open_shop(13)
else
return
end


end

when 20086.chat."Ninja-Frisuren" begin
say_title("Frisuren:")
say("")
say("M�chtest du den Frisuren-Shop �ffnen?")
local s = select("Ja", "Nein")

if s == 1 then
npc.open_shop(14)
else
return
end
end 

when 20086.chat."Sura-Frisuren" begin
say_title("Frisuren:")
say("")
say("M�chtest du den Frisuren-Shop �ffnen?")
local s = select("Ja", "Nein")

if s == 1 then
npc.open_shop(16)
else
return
end
end 

when 20086.chat."Schamie-Frisuren" begin
say_title("Frisuren:")
say("")
say("M�chtest du den Frisuren-Shop �ffnen?")
local s = select("Ja", "Nein")

if s == 1 then
npc.open_shop(17)
else
return
end
end 
end

02/25/2014 18:43 Tiger121282#9757

Kommen leider immer noch keine ansagen Ingame :(

Quote:

Originally Posted by 123Crusher123

Mal so testen, danke.

PHP Code:

quest tt begin state start begin when login begin timer("eins", 60*15) end when eins.timer begin chat("Hallo zusammen!") chat("Vote t�glich MIT ABSTIMMUNG und verdiene dir Coins!") chat("") chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns") timer("zwei", 60*30) end when zwei.timer begin chat("Hallo zusammen!") chat("Ein Gamemaster fragt euch nie nach euren Logindaten!") chat("Geklaute Items werden von uns nicht zur�ck erstattet!") chat("") chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns") timer("drei", 60*30) end when drei.timer begin chat("Hallo zusammen!") chat("www.xxxxxx.de - Homepage // www.xxxxxx.com - Forum") chat("") chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns") timer("4", 60*30) end end end

02/25/2014 18:49 rollback#9758

Quote:

Originally Posted by Getreidekuchen66

Mehrere Shops in einen NPC / VB sagt error.. Was ist falsch? :S

PHP Code:

quest shops begin state start begin when 20086.chat."Krieger-Frisuren" begin say_title("Frisuren:") say("") say("M�chtest du den Frisuren-Shop �ffnen?") local s = select("Ja", "Nein") if s == 1 then npc.open_shop(13) else return end end when 20086.chat."Ninja-Frisuren" begin say_title("Frisuren:") say("") say("M�chtest du den Frisuren-Shop �ffnen?") local s = select("Ja", "Nein") if s == 1 then npc.open_shop(14) else return end end when 20086.chat."Sura-Frisuren" begin say_title("Frisuren:") say("") say("M�chtest du den Frisuren-Shop �ffnen?") local s = select("Ja", "Nein") if s == 1 then npc.open_shop(16) else return end end when 20086.chat."Schamie-Frisuren" begin say_title("Frisuren:") say("") say("M�chtest du den Frisuren-Shop �ffnen?") local s = select("Ja", "Nein") if s == 1 then npc.open_shop(17) else return end end end

Kannst die hier nutzen (musst noch IDs anpassen)

PHP Code:


			
quest gemi_shop begin  

    state start begin  

        when 9003.click begin  

            say_title("Gemischtwarenh�ndlerin") 

            say("") 

            say("Willkommen bei der Gemischtwarenh�ndlerin!") 

            say("Alles was du im Alltag brauchst findest du hier.")

            say("")

            say_reward("Welchen Shop m�chtest du �ffnen?") 

            local shop = select("Itemshop", "Tr�nke", "Frisuren", "Abbrechen") 

            if shop == 1 then 

                npc.open_shop(1)  

                setskin(NOWINDOW) 

            end 

            if shop == 2 then 

                npc.open_shop(2) 

                setskin(NOWINDOW) 

            end 

            if shop == 3 then 

                say_title("Frisuren") 

                say("")

                say_reward("F�r welche Rasse suchst du eine Frisur?") 

                local race = select("Krieger", "Ninja", "Sura", "Schamane", "Abbrechen") 

                if race == 1 then 

                    npc.open_shop(10) 

                    setskin(NOWINDOW) 

                end 

                if race == 2 then 

                    npc.open_shop(11) 

                    setskin(NOWINDOW) 

                end 

                if race == 3 then 

                    npc.open_shop(12) 

                    setskin(NOWINDOW) 

                end 

                if race == 4 then 

                    npc.open_shop(13) 

                    setskin(NOWINDOW) 

                end 

                if race == 5 then 

                    return 

                end

            end    

            if shop == 4 then 

                return 

            end 

        end 

    end 

end

Quote:

Originally Posted by Tiger121282

Kommen leider immer noch keine ansagen Ingame :(

kenne mich mit timern und so nicht aus, aber probier mal so:

PHP Code:


			
quest tt begin 

    state start begin 

        when login begin 

            timer("eins", 60*15)  

        end 

        when eins.timer begin 

            chat("Hallo zusammen!") 

            chat("Vote t�glich MIT ABSTIMMUNG und verdiene dir Coins!") 

            chat("") 

            chat("Das xxxxxx Team w�nscht dir viel Spa� bei uns.") 

            timer("zwei", 60*30) 

        end 

        when zwei.timer begin 

            chat("Hallo zusammen!") 

            chat("Ein Gamemaster fragt dich nie nach deinen Logindaten!") 

            chat("Geklaute Items werden von uns nicht zur�ck erstattet!") 

            chat("") 

            chat("Das xxxxxx Team w�nscht dir viel Spa� bei uns.") 

            timer("drei", 60*30) 

        end 

        when drei.timer begin 

            chat("Hallo zusammen!") 

            chat("www.xxxxxx.de - Homepage // www.xxxxxx.com - Forum") 

            chat("") 

            chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns") 

            timer("eins", 60*30) 

        end 

    end 

end

02/25/2014 19:42 Tiger121282#9759

Danke f�r die M�he aber es geht immer noch nicht.

kenne mich mit timern und so nicht aus, aber probier mal so:

PHP Code:


			
quest tt begin 
    state start begin 
        when login begin 
            timer("eins", 60*15)  
        end 
        when eins.timer begin 
            chat("Hallo zusammen!") 
            chat("Vote t�glich MIT ABSTIMMUNG und verdiene dir Coins!") 
            chat("") 
            chat("Das xxxxxx Team w�nscht dir viel Spa� bei uns.") 
            timer("zwei", 60*30) 
        end 
        when zwei.timer begin 
            chat("Hallo zusammen!") 
            chat("Ein Gamemaster fragt dich nie nach deinen Logindaten!") 
            chat("Geklaute Items werden von uns nicht zur�ck erstattet!") 
            chat("") 
            chat("Das xxxxxx Team w�nscht dir viel Spa� bei uns.") 
            timer("drei", 60*30) 
        end 
        when drei.timer begin 
            chat("Hallo zusammen!") 
            chat("www.xxxxxx.de - Homepage // www.xxxxxx.com - Forum") 
            chat("") 
            chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns") 
            timer("eins", 60*30) 
        end 
    end 
end

[/quote]

02/25/2014 21:08 .yorliK#9760

Quote:

Originally Posted by Tiger121282

Danke f�r die M�he aber es geht immer noch nicht.

kenne mich mit timern und so nicht aus, aber probier mal so:

PHP Code:

quest tt begin state start begin when login begin timer("eins", 60*15) end when eins.timer begin chat("Hallo zusammen!") chat("Vote t�glich MIT ABSTIMMUNG und verdiene dir Coins!") chat("") chat("Das xxxxxx Team w�nscht dir viel Spa� bei uns.") timer("zwei", 60*30) end when zwei.timer begin chat("Hallo zusammen!") chat("Ein Gamemaster fragt dich nie nach deinen Logindaten!") chat("Geklaute Items werden von uns nicht zur�ck erstattet!") chat("") chat("Das xxxxxx Team w�nscht dir viel Spa� bei uns.") timer("drei", 60*30) end when drei.timer begin chat("Hallo zusammen!") chat("www.xxxxxx.de - Homepage // www.xxxxxx.com - Forum") chat("") chat("Das xxxxxx Team w�nscht euch viel Spa� bei uns") timer("eins", 60*30) end end end

[/QUOTE]

wartest du dann auch 15Min auf die Nachricht ? Der Timer beginnt ja erst nach 15Min.

02/25/2014 21:41 moldhenr#9761

Moin, ich br�uchte mal Hilfe.
Die Console gibt keinen Fehler aus. Allerdings geht der Counter nicht runter.

Spoiler

PHP Code:


			
-------------------------
--Developed by BierDoktor
-------------------------
quest suraerbe_1 begin
    state start begin
        when login or levelup with pc.level>29 begin
            if pc.job == 2 then
                set_state(sura_1)
            end
        end    
    end        
    state sura_1 begin        
        when letter begin
            send_letter("Erbe der Sura #1")
        end
        when button or info begin
            say("Hallo Sura ...")
            say("Du hast nun Level 30 erreicht.")
            say("Die Erzfeinde der Sura, die Ninjas")
            say("sind auf dem Vormarsch.")
            say("Toete 25 von Ihnen, um sie")
            say("aufzuhalten!")
            say("")
            pc.setqf("state", 25)
            q.set_counter("kills", 25)
            set_state(kill)
        end
    end
    state kill begin
        when letter begin
            send_letter("Toete Ninjas")
        end
        when button or info begin
            say_title("Ninjas")
            say_reward("Du musst noch".. pc.getqf("state") .."von 25 toeten")
            say("")
        end
        when kill begin
            if pc.job == 1 then
                local count=pc.getqf("state") - 1
                if count <= 25 then
                    pc.setqf("state", count)
                    q.set_counter("kills", -count)
                end
                if count == 0 then
                    say("Gut, Du hast es geschafft.")
                    say("Es gibt nun 25 Ninjas weniger,")
                    say("die unserem Erbe was anhaben koennten.")
                    say("Als Belohnung erhaelst Du ..")
                    say("5% Schadensreduzierung")
                    affect.add_collect(apply.RESIST_ASSASSIN, 5, 60*60*24*365*60)
                    affect.add_collect(apply.RESIST_SURA, 5, 60*60*24*365*60)
                    affect.add_collect(apply.RESIST_SHAMAN, 5, 60*60*24*365*60)
                    affect.add_collect(apply.RESIST_WARRIOR, 5, 60*60*24*365*60)
                    notice_all(""..pc.get_name().."Hat soeben die Quest Das Erbe der Sura #1 abgeschlossen")
                    notice_all("Er/Sie hat 25 Ninjas getoetet. Glueckwunsch!")
                end
                clear_letter()
                set_state(__COMPLETE__)
            end
        end
    end
    state __COMPLETE__ begin
    end
end

02/25/2014 22:35 AuRaBuG#9762

Abend Leute, kenne mich mit questen noch nich so aus, und will nen Porter der zu den angegebenen Koordis portet wenn man h�her als 75 is, und back geht wenn nich. Allerdings kommt error on compile. Wahrscheinlich hab ich so nen unn�tigen Anf�ngerfehler, aber naja bin halt noch Anf�nger xD

Spoiler

02/25/2014 22:48 moldhenr#9763

Quote:

Originally Posted by AuRaBuG

Abend Leute, kenne mich mit questen noch nich so aus, und will nen Porter der zu den angegebenen Koordis portet wenn man h�her als 75 is, und back geht wenn nich. Allerdings kommt error on compile. Wahrscheinlich hab ich so nen unn�tigen Anf�ngerfehler, aber naja bin halt noch Anf�nger xD

Spoiler

PHP Code:

quest farmmapwarp2 begin state start begin when 20095.chat."Farmmap" begin say_title("Seon-Hae") say("") say("Sei gegruesst!") say("Bei mir kannst du dich in die Farmmap teleportieren.") say("Das geht allerdings erst ab Level 75.") say("Moechtest du darauf?") local s = select("Ja", "Nein") if s == 2 then return end elseif s == 1 then say_title("Seon-Hae") say("M�chtest du wirklich geportet werden?") local c = select("Ja", "Nein") if c == 1 and pc.get_level() < 75 then say("Du kannst dort erst ab 75 hin.") return end else pc.warp(12800, 17450) end end end end

sollte so funktionieren

02/26/2014 09:04 xMasi95#9764

Bekomme denn fehler

must start with quest
regenbogen.qest:1:Error occured on compile regenbogen.quest

Spoiler

02/26/2014 16:54 AuRaBuG#9765

Funktioniert leider immernoch nicht, bekomme bei folgender Quest in VBox die Meldung: "syntax error: [string "start"]:11: <eof> expected near 'elseif'. farmmapwarp.quest:26: Error occured on compile farmmapwarp.quest :(:confused:

Spoiler

W�rde mich �ber Hilfe verdammt freuen^^

Page 651 of 845

651