[SERVICE] Die Questkontrolle

Page 481 of 845

481

11/28/2012 18:26 Philoy#7201

Quote:

Originally Posted by �by Noa

Ava merkt dir das man beim when block keine direkte Funktion hinschreibt und das man dann nach immer ein begin schreibt, zudem kann man alle anderen if (nach dem ersten) mit elseif ersetzen.

PHP Code:

Quest endlevel begin state start begin when login with pc.get_level() == 120 begin say_title("Fertig, like a Boss") say("Ja geil du hast das Endlevel erreicht") say("") say("") say("Nice du bist jetzt weit oben auf der Rangliste") say("Du bist jetzt eine...") say("...") say("Sorry ich muss grad im Duden schauen") say("...") say("...") say("Ah hier steht es du bist, warte gleich kommts") say("Lege ... warte, du bist legen") say("Du bist legend�r") wait() say("So du hast eine dicke Belohnung verdient") say("Du darfst es dir aussuchen") local s= select("Paket 1", "Packet 2", "Packet 3", "Zur�ck") if s== 1 then say("Du erh�lst:") say("") say_reward("Lalalallalal") say_reward("Lalallaalall") say_reward("lalallalalal") pc.give.item2(VNUM, ANZAHL) pc.give.item2(VNUM, ANZAHL) pc.give.item2(VNUM, ANZAHL) elseif s== 2 then say("Du erh�lst:") say("") say_reward("Lalalallalal") say_reward("Lalallaalall") say_reward("lalallalalal") pc.give.item2(VNUM, ANZAHL) pc.give.item2(VNUM, ANZAHL) pc.give.item2(VNUM, ANZAHL) elseif s== 3 then say("Du erh�lst:") say("") say_reward("Lalalallalal") say_reward("Lalallaalall") say_reward("lalallalalal") pc.give.item2(VNUM, ANZAHL) pc.give.item2(VNUM, ANZAHL) pc.give.item2(VNUM, ANZAHL) else return end end end end

Chill ich habe das alleine gemacht kann ich doch nicht wissen.

11/28/2012 18:31 �by Noa#7202

das war auch nur eine Rat & du machst schon Fortschritte solltest nur wissen was die Funktionen machen & wie man sie richtig schreibt.
Im Anhang sind die Funktionen.

11/29/2012 00:40 JeeX#7203

Ein Sehr gro�es Problem bei dieser Quest...

Und zwar, wenn ich denn NPC (20090) anklicke, kann ich die gesamte Quest durchklicken und bekomme dann am Schluss die Belohnung.. und ich kann die quest nochmal aufmachen... dh die Leute k�nnen sich durchklicken.. :S

Normal sollte sein, das man zuerst wenn mal lvl 75 wird eine Notiz bekommt mit ja gehe zum Betrunkenen B�rger..(20041)
Dann ist ein Pfeil bei dem, der gibt denn auftrag ich soll moobs killen, dann bekomm ich wenn die moobs alle tot sind eine nachricht ich soll zu Heuk-Young gehen, die gibt mir wiederrum wieder denn auftrag moobs zu killen, dann wenn ich das gemacht habe wieder nachricht das ich zu ihr gehen soll, dann bei ihr, der text das ich wieder mobs killen soll und dann wieder eine notiz und dann zum betrunkenen B�rger belohnung abholen..

Quest:

Spoiler

PHP Code:


			
quest suchundkill begin

        state start begin

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

                set_state(info)

            end

        end

        state info begin

            when letter begin

                send_letter("Geh zum Betrunkenen B�rger")

                local v = find_npc_by_vnum(20041)

                if v != 0 then

                    target.vid("__TARGET__", v, "Die Leichengeister!")

                end

            end

            when info or button begin

                say_title("Die D�monen")

                say("Der Betrunkener B�rger sprach von grausamen D�monen...")

                say("Du solltest zu ihm gehen!")

            end

            

            when __TARGET__.target.click or 20041.chat."Die Leichengeister" with pc.level >= 75 begin

                say_title("Betrunkener B�rger:")

                say("Hallo!")

                say("")

                say("Die D�monen im DevilsCatacomb der Hesperiden")

                say("haben mich meiner Frau beraubt ,")

                say("und sie beim lebendigen Leib gefressen")

                say("deshalb bin ich verdammt in Einsamkeit,")

                say("zu Leben!!!")

                say("")

                say("Ich bin zu Schwach ,")

                say("mich zu R�chen!!")

                wait()

                say_title("Betrunkener B�rger:")

                say("Kannst du die D�monen abschlachten")

                say("und f�r mich Vergeltung �ben?")

                say("")

                say_reward("M�chtest du dem Betrunkener B�rger helfen?")

                local s=select("Ja","Nein")

                    if s == 2 then

                        say("Oh... sehr Schade.")

                        say("Dann suche ich mir jemanden der kein Noob ist!")

                        clear_letter()

                        set_state(__GIVEUP__)

                    else

                        say_title("Betrunkener B�rger")



                        say("Vielen Vielen Dank!")

                        say("Ich denke wenn du 800 von ihnen t�test ist alles")

                        say("wieder in Ordnung.")

                        say_reward("T�te 800 Inf. Leichengeister!")

                        say("")

                        say_reward("800 Inf. Leichengeister")

                        pc.setqf("state", 800)

                        q.set_counter("Leichengeister", 800)

                        set_state(main)

                    end

            end

        end

        state main begin

            when letter begin

                send_letter("T�te die Inf. Leichengeister!")

            end

            when info or button begin

                say_title("T�te die Inf. Leichengeister!")

                say("Der Betrunkener B�rger hat dich gebeten 800")

                say("Inf. Leichengeist zu Beseitigen.")



            end

            when 2501.kill begin

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

                if count <= 800 then

                    pc.setqf("state", count)

                    q.set_counter("Leichengeister", count)

                end



                if count == 0 then

                    say("oh der letzte Leichengeist hat mir was von")

                    say("Heuk-Young ger�chelt!")

                    say("Du findest Heuk-Young in der Grotte!!")

                    set_state(goback)

                end

            end

        end

        state goback begin

            when letter begin

                send_letter("Gehe zu Heuk-Young!")

                local v = find_npc_by_vnum(20090)

                if v != 0 then

                target.vid("__TARGET__", v, "Die Leichengeister!")

            end

            end

            when info or button begin

                say_title("Gehe zu Heuk-Young")

                say("Da der Letzte Geist was ger�chelt hat.")

                say("Nun gehe zu Heuk-Young in die Grotte!")

            end

            when __TARGET__.target.click or 20090.chat."Die Leichengeister" with pc.level >= 75 begin

                say_title("Heuk-Young:")

                say("Hallo!")

                say("")

                say("Oh ein Leichengeist hat meinen Namen ger�chelt ")

                say("Hmmmmmmmm...")

                say("Dann geht es sicher im des armen Betrunkener B�rgers Frau, ")

                say("aber ich weis sie wurde an die Inf. Speerk�mpfer verkauft!!")

                say("um an ihr versuche ihrer Zauberkunst,")

                say("zu machen.")

                say("")

                say("Wilst du mehr wissen??.")

                wait()

                say_title("Heuk-Young:")

                say("Musst du Inf. Speerk�mpfer t�ten")

                say("um Informationen zu bekommen")

                say("")

                say_reward("M�chtest du Ihnen helfen?")

                local s=select("Ja","Nein")

                    if s == 2 then

                        say("Oh... sehr Schade.")

                        say("Dann suche ich mir jemanden der mutiger ist!")

                        clear_letter()

                        set_state(__GIVEUP__)

                    else

                        say_title("Heuk-Young")



                        say("Vielen Vielen Dank!")

                        say("Ich denke wenn du 700 von ihnen t�test,")

                        say("wirst du Informationen erhalten.")

                        say_reward("T�te Inf. Speerk�mpfer!")

                        say("")

                        say_reward("T�te Inf. Speerk�mpfer in der DevilsCatacomb")

                        pc.setqf("state", 700)

                        q.set_counter("Speerk�mpfer", 700)

                        set_state(main_1)

                    end

            end

        end

        state main_1 begin

            when letter begin

                send_letter("T�te Inf. Speerk�mpfer!")

            end

            when info or button begin

                say_title("T�te Inf. Speerk�mpfer!")

                say("Der Heuk-Young hat dich gebeten einige")

                say("der Inf. Speerk�mpfer in der DevilsCatacomb zu t�ten,")

                say("um an Infos zu kommen!!!")

                say("")

                say("700 der Speerk�mpfer sollten reichen.")

                say_reward("700 Inf. Speerk�mpfer in der DevilsCatacomb,")



            end

            when 2505.kill begin

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

                if count <= 700 then

                    pc.setqf("state", count)

                    q.set_counter("Speerk�mpfer", count)

                end



                if count == 0 then

                    say("Du hast alle 700 Erledigt erledigt.")

                    say("Aber keine Information erhalten!!!")

                    say("Nun gehe mal zu Heuk-Young!")

                    say("dem Sack !!!")

                    set_state(goback_1)

                end

            end

        end



        state goback_1 begin

            when letter begin

                send_letter("Gehe zu Heuk-Young!")

                local v = find_npc_by_vnum(20090)

                if v != 0 then

                target.vid("__TARGET__", v, "Die Speerk�mpfer!")

            end

            end

            when info or button begin

                say_title("Gehe zu Heuk-Young")

                say("Du hast alle 700 Inf. Speerk�mpfer erledigt,")

                say("und keine Infos bekommen!!!!")

                say("Nun gehe zu Heuk-Young!")

            end

            when __TARGET__.target.click or 20090.chat."Die Speerk�mpfer" with pc.level >= 75 begin

                say_title("Heuk-Young:")

                say("Ohaaa!")

                say("")

                say("Sie haben sie nicht an die Inf. Speerk�mpfer ")

                say("verkauft??..")

                say("Dann bin ich mir fast sicher das sie, ")

                say("an die Inf. Anf�hrer gegangen ist, und Bestialisch!!")

                say("hingerichtet wurde grrrrrrrrrrr!!!")

                say("Diese Bestien.")

                say("")

                say("Wilst du mehr wissen??.")

                wait()

                say_title("Heuk-Young:")

                say("Musst du Inf. Anf�hrer t�ten")

                say("um Informationen zu bekommen")

                say("")

                say_reward("M�chtest du Ihnen helfen?")

                local s=select("Ja","Nein")

                    if s == 2 then

                        say("Oh... sehr Schade.")

                        say("Dann suche ich mir jemanden der mutiger ist!")

                        clear_letter()

                        set_state(__GIVEUP__)

                    else

                        say_title("Heuk-Young")



                        say("Vielen Vielen Dank!")

                        say("Ich denke wenn du 250 von ihnen t�test,")

                        say("wirst du Informationen erhalten.")

                        say_reward("T�te Inf. Anf�hrer!")

                        say("")

                        say_reward("T�te Inf. Anf�hrer in der DevilsCatacomb")

                        pc.setqf("state", 250)

                        q.set_counter("Krieger", 250)

                        set_state(main_2)

                    end

            end

        end

        state main_2 begin

            when letter begin

                send_letter("T�te Inf. Anf�hrer!")

            end

            when info or button begin

                say_title("T�te Inf. Anf�hrer!")

                say("Der Heuk-Young hat dich gebeten einige")

                say("der Inf. Anf�hrer in der DevilsCatacomb zu t�ten,")

                say("um an Infos zu kommen!!!")

                say("")

                say("250 der Krieger sollten reichen.")

                say_reward("250 Inf. Speerk�mpfer in der DevilsCatacomb,")



            end

            when 2507.kill begin

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

                if count <= 250 then

                    pc.setqf("state", count)

                    q.set_counter("Krieger", count)

                end



                if count == 0 then

                    say("Du hast alle 250 Erledigt erledigt.")

                    say("Und der letzt r�chelte sie hat gut geschmeckt!!!")

                    say("Nun gehe mal zu Betrunkener B�rger!")

                    say("und erz�hle ihm was du rausgefunden hast !!!")

                    set_state(goback_2)

                end

            end

        end



        state goback_2 begin

            when letter begin

                send_letter("Gehe zum Betrunkener B�rger!")

                local v = find_npc_by_vnum(20041)

                if v != 0 then

                target.vid("__TARGET__", v, "Die Speerk�mpfer!")

            end

            end

            when info or button begin

                say_title("Gehe zum Betrunkener B�rger")

                say("und erz�hle ihm die Neuigkeit,")

                say("�ber seine Frau!!!!")

                say("Nun gehe zum Betrunkener B�rger!")

            end

            when __TARGET__.target.click or 20041.chat."Die Inf. Anf�hrer" with pc.level >= 75 begin

                    say_title("Betrunkener B�rger")

                    say("Ohhh du scheisse!")

                    say("Meine arme Frau heuuull")

                    say("Aber jetzt hab ich Gewissheit!")

                    say("Und werde den Freitot w�hlen!!")

                    say("Hier hast du alles was ich besitze!!")

                    say("")

                    say_reward("Du erh�lst:")

                    say_reward("50.000.000 Yang")

                    say_reward("100.000.000 Erfahrung")

                    say_reward("15 R�tselhafte Truhen")

                    say("")

                    pc.change_money(50000000)

                    pc.give_exp2(100000000)

                    pc.give_item2(50034, 15)

                    notice_all("".. pc.get_name() .." hat so eben die such und Kill,")

                    notice_all("Quest abgeschlossen ein/e wahre/r Held/in, Gl�ckwunsch!")

                    clear_letter()

                set_state(__COMPLETE__)

            end



        end

    state __COMPLETE__ begin

    end

    state __GIVEUP__ begin

    end

end

Hier die Screens, Schritt f�r Schritt, wie die Quest InGame ausschauen.. wo man deutlich erkennen kann, das da etwas ned stimmt...

Spoiler

UND WENN ICH AUF NEIN! gehe, komm ich automatisch weiter.. dh. Ja und Nein ist iwie das selbe :(

Ich hoffe es kann jemand fixen, das is n�mlich eine m�rder geile Quest, find ich ...

11/29/2012 02:08 �by Noa#7204

problem 1. du hast die targets nicht gel�scht, dadurch kannst du immer auf dem selben npc klicken um die quest fortzusetzen

11/29/2012 17:26 hanistarker#7205

Und zwar wollte ich bei meiner Drachenraum-Quest einf�gen das man wenn man den Drachen gekillt , 3 Minuten sp�ter nach Map1 geportet wird !

Nur wei� ich nicht ob die Quest so funkt und wie ich den timer einbaue !

W�rde ich �ber Hilfe freuen

PHP Code:


			
        when 2493.kill with pc.get_map_index() >= 730000 and pc.get_map_index() < 740000 begin

            pc.warp(921600, 204800)

        end

            end

        end

        

    end

end

Das ist das ende meiner Drachenraum-Quest wo das nun eingebaut wurde

Mfg

11/29/2012 17:57 �by Noa#7206

ist das die Ganze quest f�r den Drachenraum?

11/29/2012 18:09 hanistarker#7207

Nein nur das ende

11/29/2012 19:37 �by Noa#7208

PHP Code:


			
        -- 
        --
        --
        when 2493.kill with pc.get_map_index() >= 730000 and pc.get_map_index() < 740000 begin 
            pc.getqf("timer",pc.get_time()+60*2)
            if pc.getqf("timer") <1 then
                pc.warp(921600, 204800) 
            end
        end 
            end 
        end 
         
    end 
end

versuch es mal so

11/29/2012 21:50 React�#7209

Ich bins mal wieder mit meiner quest :DDD

wollte ragen was der Fehler ist ?

Fehler Code:

Code:

must start with �quest�
gmhelpitem.quest:210:Error occured on compile gmhelpitem.quest

Quest:

PHP Code:


			
quest gmhelpitem begin   

    state start begin  

        when 50025.use begin 

        local mainmenu = select("Waffen", "R�stungen", "EQ", "Abbrechen") 

         

        if mainmenu == 4 then 

            return 

        end 

         

        if mainmenu == 1 then 

            say_title("GM Item auswahl:D")  

                say("Du willst ein item?")  

                say("Dann such dir ein sch�nes aus .")  

                say("Viel spa� damit bis dann.")  

                local s = select("Schwarzstahl Schwert","Schwarzstahl Klinge","Schwarzstahl Bogen","Schwarzstahl Dolch","Schwarzstahl Stab","Abbrechen")              

                if s == 6 then  

                    return  

                end  

                if s == 1 then  

                    pc.give_item2(9299, 1)   

                    syschat("Du hast Schwarzstahl Schwert+9 erhalten")  

                      

                elseif s == 2 then  

                    pc.give_item2(9199, 1)  

                    chat("Du hast Schwarzstahl Klinge+9 erhalten")  

                 

                elseif s == 3 then  

                    pc.give_item2(9399, 1) 

                    chat ("Du hast Schwarzstahl Bogen erhalten")  

                  

                elseif s == 4 then  

                    pc.give_item2(9499, 1)   

                    chat ("Du hast Schwarzstahl Dolch erhalten")   

                  

                elseif s == 5 then  

                    pc.give_item2(9599, 1) 

                    chat ("Du hast Schwarzstahl Stab erhalten")  

                end  

            

        elseif mainmenu == 2 then 

                say_title("GM Item auswahl:D")  

                say("Du willst ein item?")  

                say("Dann such dir ein sch�nes aus .")  

                say("Viel spa� damit bis dann.")  

                local r = select("Krieger", "Abbrechen") 

                if r == 2 then 

                    return 

                end 

                 

                if r == 1 then 

                 

                    local k = select("Levis R�stung", "Levis Panzer", "Baijin Panzer", "Huangjin Panzer", "Krieger G�tter", "Zombieumhang", "Smaragtstahl Panzer", "Weiter") 

                 

                    if k == 1 then 

                        pc.give_item2(41010, 1) 

                     

                 

                    elseif k == 2 then 

                        pc.give_item2(41011, 1) 

                     

                 

                    elseif k == 3 then 

                        pc.give_item2(41012, 1) 

                 

                 

                    elseif k == 4 then 

                        pc.give_item2(41013, 1) 

                    

                 

                    elseif k == 5 then 

                        pc.give_item2(41059, 1) 

                    

                 

                    elseif k == 6 then 

                        pc.give_item2(41900, 1) 

                

                 

                    elseif k == 7 then 

                        pc.give_item2(42009, 1) 

                

                 

                    elseif k == 8 then 

                 

                        local k2 = select("Saphirstahl Panzer", "Gift Panzer", "Rubinstahl Panzer", "Goldstahl Panzer", "Blaugelb Panzer", "Ph�nix Panzer", "Kingu Panzer", "Weiter") 

                 

             

                        if k2 == 1 then 

                            pc.give_item2(42019, 1) 

                        

                 

                        elseif k2 == 2 then 

                            pc.give_item2(42029, 1) 

                    

                 

                        elseif k2 == 3 then 

                            pc.give_item2(42039, 1) 

                    

                 

                        elseif k2 == 4 then 

                            pc.give_item2(42049, 1) 

                

                 

                        elseif k2 == 5 then 

                            pc.give_item2(42059, 1) 

                

                 

                        elseif k2 == 6 then 

                            pc.give_item2(42069, 1) 

                        

                 

                        elseif k2 == 7 then 

                            pc.give_item2(42079, 1) 

                 

                 

                        elseif k2 == 8 then 

                 

                            local k3 = select("Anfangs R�ssis", "Saigo Ten", "Akuma Panzer", "Akaoni Panzer", "Kriegsplatten Panzer", "Himmels Panzer", "Weiter") 

                 

                            if k3 == 1 then 

                                pc.give_item2(42109, 1) 

                                pc.give_item2(42119, 1) 

                                pc.give_item2(42129, 1) 

                                pc.give_item2(42139, 1) 

                                pc.give_item2(42149, 1) 

                                pc.give_item2(42159, 1) 

                                pc.give_item2(42169, 1) 

                                pc.give_item2(42179, 1) 

                                pc.give_item2(42189, 1) 

                                pc.give_item2(42199, 1) 

                 

                 

                            elseif k3 == 2 then 

                                pc.give_item2(42209, 1) 

                    

                 

                            elseif k3 == 3 then 

                                pc.give_item2(42219, 1) 

                

                 

                            elseif k3 == 4 then 

                                pc.give_item2(42229, 1) 

                

                 

                            elseif k3 == 5 then 

                                pc.give_item2(42239, 1) 

                

                 

                            elseif k3 == 6 then 

                                pc.give_item2(42249, 1) 

                    

                 

                            elseif k3 == 7 then 

                 

                                local k4 = select("Stachelplatten Panzer", "Panzer des Leids", "Engels Panzer", "Untergrunds Panzer", "Panzer der Schlacht", "Abbrechen") 

                 

                                if k4 == 1 then 

                                    pc.give_item2(42259, 1) 

                

                 

                                elseif k4 == 2 then 

                                    pc.give_item2(42269, 1) 

                    

                 

                                elseif k4 == 3 then 

                                    pc.give_item2(42279, 1) 

                    

                 

                                elseif k4 == 4 then 

                                    pc.give_item2(42289, 1) 

                    

                 

                                elseif k4 == 5 then 

                                    pc.give_item2(42299, 1) 

                

                 

                                elseif k4 == 6 then 

                                    return 

                                end

                                elseif mainmenu == 3 then  

                                local eq = select("Donner EQ", "Abbrechen")

                                    if eq == 2 then

                                        return 

                                    end

                                

                                    elseif eq == 1 then

                                        local donner = select("Donner Armband", "Donner Ohringe", "Donner Kette", "Donner Schuhe", "Abbrechen")

                                

                                    elseif donner == 5 then

                                        return

                                    end

                                

                                    elseif donner == 1 then

                                        pc.give_item2(20019, 1)

                                    

                                    elseif donner == 2 then

                                        pc.give_item2(20029, 1)

                                    

                                    elseif donner == 3 then

                                        pc.give_item2(20009, 1)

                                    

                                    elseif donner == 4 then

                                        pc.give_item2(20039, 1)

                                    end

                                end

                            end

                        end

                    end

                end

            end

        end

    end

end

:rtfm:

11/29/2012 23:06 iSouli~#7210

Quote:
Originally Posted by schnucki1999
Ich bins mal wieder mit meiner quest :DDD

wollte ragen was der Fehler ist ?

Fehler Code:
Code:
must start with �quest�
gmhelpitem.quest:210:Error occured on compile gmhelpitem.quest
Quest:

PHP Code:

quest gmhelpitem begin state start begin when 50025.use begin local mainmenu = select("Waffen", "R�stungen", "EQ", "Abbrechen") if mainmenu == 4 then return end if mainmenu == 1 then say_title("GM Item auswahl:D") say("Du willst ein item?") say("Dann such dir ein sch�nes aus .") say("Viel spa� damit bis dann.") local s = select("Schwarzstahl Schwert","Schwarzstahl Klinge","Schwarzstahl Bogen","Schwarzstahl Dolch","Schwarzstahl Stab","Abbrechen") if s == 6 then return end if s == 1 then pc.give_item2(9299, 1) syschat("Du hast Schwarzstahl Schwert+9 erhalten") elseif s == 2 then pc.give_item2(9199, 1) chat("Du hast Schwarzstahl Klinge+9 erhalten") elseif s == 3 then pc.give_item2(9399, 1) chat ("Du hast Schwarzstahl Bogen erhalten") elseif s == 4 then pc.give_item2(9499, 1) chat ("Du hast Schwarzstahl Dolch erhalten") elseif s == 5 then pc.give_item2(9599, 1) chat ("Du hast Schwarzstahl Stab erhalten") end elseif mainmenu == 2 then say_title("GM Item auswahl:D") say("Du willst ein item?") say("Dann such dir ein sch�nes aus .") say("Viel spa� damit bis dann.") local r = select("Krieger", "Abbrechen") if r == 2 then return end if r == 1 then local k = select("Levis R�stung", "Levis Panzer", "Baijin Panzer", "Huangjin Panzer", "Krieger G�tter", "Zombieumhang", "Smaragtstahl Panzer", "Weiter") if k == 1 then pc.give_item2(41010, 1) elseif k == 2 then pc.give_item2(41011, 1) elseif k == 3 then pc.give_item2(41012, 1) elseif k == 4 then pc.give_item2(41013, 1) elseif k == 5 then pc.give_item2(41059, 1) elseif k == 6 then pc.give_item2(41900, 1) elseif k == 7 then pc.give_item2(42009, 1) elseif k == 8 then local k2 = select("Saphirstahl Panzer", "Gift Panzer", "Rubinstahl Panzer", "Goldstahl Panzer", "Blaugelb Panzer", "Ph�nix Panzer", "Kingu Panzer", "Weiter") if k2 == 1 then pc.give_item2(42019, 1) elseif k2 == 2 then pc.give_item2(42029, 1) elseif k2 == 3 then pc.give_item2(42039, 1) elseif k2 == 4 then pc.give_item2(42049, 1) elseif k2 == 5 then pc.give_item2(42059, 1) elseif k2 == 6 then pc.give_item2(42069, 1) elseif k2 == 7 then pc.give_item2(42079, 1) elseif k2 == 8 then local k3 = select("Anfangs R�ssis", "Saigo Ten", "Akuma Panzer", "Akaoni Panzer", "Kriegsplatten Panzer", "Himmels Panzer", "Weiter") if k3 == 1 then pc.give_item2(42109, 1) pc.give_item2(42119, 1) pc.give_item2(42129, 1) pc.give_item2(42139, 1) pc.give_item2(42149, 1) pc.give_item2(42159, 1) pc.give_item2(42169, 1) pc.give_item2(42179, 1) pc.give_item2(42189, 1) pc.give_item2(42199, 1) elseif k3 == 2 then pc.give_item2(42209, 1) elseif k3 == 3 then pc.give_item2(42219, 1) elseif k3 == 4 then pc.give_item2(42229, 1) elseif k3 == 5 then pc.give_item2(42239, 1) elseif k3 == 6 then pc.give_item2(42249, 1) elseif k3 == 7 then local k4 = select("Stachelplatten Panzer", "Panzer des Leids", "Engels Panzer", "Untergrunds Panzer", "Panzer der Schlacht", "Abbrechen") if k4 == 1 then pc.give_item2(42259, 1) elseif k4 == 2 then pc.give_item2(42269, 1) elseif k4 == 3 then pc.give_item2(42279, 1) elseif k4 == 4 then pc.give_item2(42289, 1) elseif k4 == 5 then pc.give_item2(42299, 1) elseif k4 == 6 then return end elseif mainmenu == 3 then local eq = select("Donner EQ", "Abbrechen") if eq == 2 then return end elseif eq == 1 then local donner = select("Donner Armband", "Donner Ohringe", "Donner Kette", "Donner Schuhe", "Abbrechen") elseif donner == 5 then return end elseif donner == 1 then pc.give_item2(20019, 1) elseif donner == 2 then pc.give_item2(20029, 1) elseif donner == 3 then pc.give_item2(20009, 1) elseif donner == 4 then pc.give_item2(20039, 1) end end end end end end end end end end

:rtfm:

PHP Code:


			
quest gmhelp begin
    state start begin
        when 50025.use with pc.is_gm() begin 
            local tab = 
            {
                [1] = {19,19,19,19,19}, -- ids der Waffen
                [2] = {19,19,19,19,19}, -- ids der R�stungen
                [3] = {19,19,19,19,19}, -- ids des Eqs
            }
            local aa = select("Waffen","R�stungen", "EQ", "Abbrechen") 
            if aa == 4 then return end
            local bb = select(item_name(tab[aa][1]),item_name(tab[aa][2]),item_name(tab[aa][3]),item_name(tab[aa][4]),item_name(tab[aa][5]),'Abbrechen')
            if bb == 6 then return end
            pc.give_item2(tab[aa][bb], 1)
        end
    end
end

Quote:

Originally Posted by hanistarker

Und zwar wollte ich bei meiner Drachenraum-Quest einf�gen das man wenn man den Drachen gekillt , 3 Minuten sp�ter nach Map1 geportet wird !

Nur wei� ich nicht ob die Quest so funkt und wie ich den timer einbaue !

W�rde ich �ber Hilfe freuen

PHP Code:

when 2493.kill with pc.get_map_index() >= 730000 and pc.get_map_index() < 740000 begin pc.warp(921600, 204800) end end end end end

Das ist das ende meiner Drachenraum-Quest wo das nun eingebaut wurde

Mfg

PHP Code:


			
when 2493.kill with pc.get_map_index() >= 730000 and pc.get_map_index() < 740000 begin
    timer('warp_village', 60*3)
end

when warp_village.timer begin
    pc.warp(921600, 204800) 
end

11/29/2012 23:09 �by Noa#7211

par ends lagen falsch

PHP Code:


			
quest gmhelpitem begin    
    state start begin   
        when 50025.use begin  
            local menu = select("Waffen", "R�stungen", "EQ", "Abbrechen")  
            if menu == 4 then  
                return  
            end  
            if menu == 1 then  
                say_title("GM Item auswahl:D")   
                say("Du willst ein item?")   
                say("Dann such dir ein sch�nes aus .")   
                say("Viel spa� damit bis dann.")   
            local s = select("Schwarzstahl Schwert","Schwarzstahl Klinge","Schwarzstahl Bogen","Schwarzstahl Dolch","Schwarzstahl Stab","Abbrechen")               
                if s == 6 then   
                    return   
                end
            
                if s == 1 then   
                    pc.give_item2(9299, 1)    
                    chat("Du hast Schwarzstahl Schwert+9 erhalten")   
                elseif s == 2 then   
                    pc.give_item2(9199, 1)   
                    chat("Du hast Schwarzstahl Klinge+9 erhalten")   
                elseif s == 3 then   
                    pc.give_item2(9399, 1)  
                    chat ("Du hast Schwarzstahl Bogen erhalten")   
                elseif s == 4 then   
                    pc.give_item2(9499, 1)    
                    chat ("Du hast Schwarzstahl Dolch erhalten")    
                elseif s == 5 then   
                    pc.give_item2(9599, 1)  
                    chat ("Du hast Schwarzstahl Stab erhalten")   
                end   
             
            elseif menu == 2 then  
                say_title("GM Item auswahl:D")   
                say("Du willst ein item?")   
                say("Dann such dir ein sch�nes aus .")   
                say("Viel spa� damit bis dann.")   
                local r = select("Krieger", "Abbrechen")  
                if r == 2 then  
                    return  
                end  
                if r == 1 then  
                  local k = select("Levis R�stung", "Levis Panzer", "Baijin Panzer", "Huangjin Panzer", "Krieger G�tter", "Zombieumhang", "Smaragtstahl Panzer", "Weiter")  
                    if k == 1 then  
                        pc.give_item2(41010, 1)  
                    elseif k == 2 then  
                        pc.give_item2(41011, 1)  
                    elseif k == 3 then  
                        pc.give_item2(41012, 1)  
                    elseif k == 4 then  
                        pc.give_item2(41013, 1)  
                    elseif k == 5 then  
                        pc.give_item2(41059, 1)  
                    elseif k == 6 then  
                        pc.give_item2(41900, 1)  
                    elseif k == 7 then  
                        pc.give_item2(42009, 1)  
                    elseif k == 8 then  
                        local k2 = select("Saphirstahl Panzer", "Gift Panzer", "Rubinstahl Panzer", "Goldstahl Panzer", "Blaugelb Panzer", "Ph�nix Panzer", "Kingu Panzer", "Weiter")  
                        if k2 == 1 then  
                            pc.give_item2(42019, 1)  
                        elseif k2 == 2 then  
                            pc.give_item2(42029, 1)  
                        elseif k2 == 3 then  
                            pc.give_item2(42039, 1)  
                        elseif k2 == 4 then  
                            pc.give_item2(42049, 1)  
                        elseif k2 == 5 then  
                            pc.give_item2(42059, 1)  
                        elseif k2 == 6 then  
                            pc.give_item2(42069, 1)  
                        elseif k2 == 7 then  
                            pc.give_item2(42079, 1)  
                        elseif k2 == 8 then  
                            local k3 = select("Anfangs R�ssis", "Saigo Ten", "Akuma Panzer", "Akaoni Panzer", "Kriegsplatten Panzer", "Himmels Panzer", "Weiter")  
                            if k3 == 1 then  
                                pc.give_item2(42109, 1)  
                                pc.give_item2(42119, 1)  
                                pc.give_item2(42129, 1)  
                                pc.give_item2(42139, 1)  
                                pc.give_item2(42149, 1)  
                                pc.give_item2(42159, 1)  
                                pc.give_item2(42169, 1)  
                                pc.give_item2(42179, 1)  
                                pc.give_item2(42189, 1)  
                                pc.give_item2(42199, 1)  
                            elseif k3 == 2 then  
                                pc.give_item2(42209, 1)  
                            elseif k3 == 3 then  
                                pc.give_item2(42219, 1)  
                            elseif k3 == 4 then  
                                pc.give_item2(42229, 1)  
                            elseif k3 == 5 then  
                                pc.give_item2(42239, 1)  
                            elseif k3 == 6 then  
                                pc.give_item2(42249, 1)  
                            elseif k3 == 7 then  
                                local k4 = select("Stachelplatten Panzer", "Panzer des Leids", "Engels Panzer", "Untergrunds Panzer", "Panzer der Schlacht", "Abbrechen")  
                                if k4 == 1 then  
                                    pc.give_item2(42259, 1)  
                                elseif k4 == 2 then  
                                    pc.give_item2(42269, 1)  
                                elseif k4 == 3 then  
                                    pc.give_item2(42279, 1)  
                                elseif k4 == 4 then  
                                    pc.give_item2(42289, 1)  
                                elseif k4 == 5 then  
                                    pc.give_item2(42299, 1)  
                                elseif k4 == 6 then  
                                    return  
                                end 
                            end
                        end
                    end
            elseif menu == 3 then   
                local eq = select("Donner EQ", "Abbrechen") 
                if eq == 2 then 
                    return  
                end 
                if eq == 1 then 
                    local donner = select("Donner Armband", "Donner Ohringe", "Donner Kette", "Donner Schuhe", "Abbrechen") 
                    if donner == 5 then 
                        return 
                    end 
                    if donner == 1 then 
                        pc.give_item2(20019, 1) 
                    elseif donner == 2 then 
                        pc.give_item2(20029, 1) 
                    elseif donner == 3 then 
                        pc.give_item2(20009, 1) 
                    elseif donner == 4 then 
                        pc.give_item2(20039, 1) 
                    end 
                end 
            end 
        end 
    end 
end

11/30/2012 16:15 React�#7212

Ein end war bei dir Falsch...trotzdem thx

Quote:

PHP Code:

quest gmhelpitem begin state start begin when 50025.use begin local menu = select("Waffen", "R�stungen", "EQ", "Abbrechen") if menu == 4 then return end if menu == 1 then say_title("GM Item auswahl:D") say("Du willst ein item?") say("Dann such dir ein sch�nes aus .") say("Viel spa� damit bis dann.") local s = select("Schwarzstahl Schwert","Schwarzstahl Klinge","Schwarzstahl Bogen","Schwarzstahl Dolch","Schwarzstahl Stab","Abbrechen") if s == 6 then return end if s == 1 then pc.give_item2(9299, 1) chat("Du hast Schwarzstahl Schwert+9 erhalten") elseif s == 2 then pc.give_item2(9199, 1) chat("Du hast Schwarzstahl Klinge+9 erhalten") elseif s == 3 then pc.give_item2(9399, 1) chat ("Du hast Schwarzstahl Bogen erhalten") elseif s == 4 then pc.give_item2(9499, 1) chat ("Du hast Schwarzstahl Dolch erhalten") elseif s == 5 then pc.give_item2(9599, 1) chat ("Du hast Schwarzstahl Stab erhalten") end elseif menu == 2 then say_title("GM Item auswahl:D") say("Du willst ein item?") say("Dann such dir ein sch�nes aus .") say("Viel spa� damit bis dann.") local r = select("Krieger", "Abbrechen") if r == 2 then return end if r == 1 then local k = select("Levis R�stung", "Levis Panzer", "Baijin Panzer", "Huangjin Panzer", "Krieger G�tter", "Zombieumhang", "Smaragtstahl Panzer", "Weiter") if k == 1 then pc.give_item2(41010, 1) elseif k == 2 then pc.give_item2(41011, 1) elseif k == 3 then pc.give_item2(41012, 1) elseif k == 4 then pc.give_item2(41013, 1) elseif k == 5 then pc.give_item2(41059, 1) elseif k == 6 then pc.give_item2(41900, 1) elseif k == 7 then pc.give_item2(42009, 1) elseif k == 8 then local k2 = select("Saphirstahl Panzer", "Gift Panzer", "Rubinstahl Panzer", "Goldstahl Panzer", "Blaugelb Panzer", "Ph�nix Panzer", "Kingu Panzer", "Weiter") if k2 == 1 then pc.give_item2(42019, 1) elseif k2 == 2 then pc.give_item2(42029, 1) elseif k2 == 3 then pc.give_item2(42039, 1) elseif k2 == 4 then pc.give_item2(42049, 1) elseif k2 == 5 then pc.give_item2(42059, 1) elseif k2 == 6 then pc.give_item2(42069, 1) elseif k2 == 7 then pc.give_item2(42079, 1) elseif k2 == 8 then local k3 = select("Anfangs R�ssis", "Saigo Ten", "Akuma Panzer", "Akaoni Panzer", "Kriegsplatten Panzer", "Himmels Panzer", "Weiter") if k3 == 1 then pc.give_item2(42109, 1) pc.give_item2(42119, 1) pc.give_item2(42129, 1) pc.give_item2(42139, 1) pc.give_item2(42149, 1) pc.give_item2(42159, 1) pc.give_item2(42169, 1) pc.give_item2(42179, 1) pc.give_item2(42189, 1) pc.give_item2(42199, 1) elseif k3 == 2 then pc.give_item2(42209, 1) elseif k3 == 3 then pc.give_item2(42219, 1) elseif k3 == 4 then pc.give_item2(42229, 1) elseif k3 == 5 then pc.give_item2(42239, 1) elseif k3 == 6 then pc.give_item2(42249, 1) elseif k3 == 7 then local k4 = select("Stachelplatten Panzer", "Panzer des Leids", "Engels Panzer", "Untergrunds Panzer", "Panzer der Schlacht", "Abbrechen") if k4 == 1 then pc.give_item2(42259, 1) elseif k4 == 2 then pc.give_item2(42269, 1) elseif k4 == 3 then pc.give_item2(42279, 1) elseif k4 == 4 then pc.give_item2(42289, 1) elseif k4 == 5 then pc.give_item2(42299, 1) elseif k4 == 6 then return end end end end elseif menu == 3 then local eq = select("Donner EQ", "Abbrechen") if eq == 2 then return end if eq == 1 then local donner = select("Donner Armband", "Donner Ohringe", "Donner Kette", "Donner Schuhe", "Abbrechen") if donner == 5 then return end if donner == 1 then pc.give_item2(20019, 1) elseif donner == 2 then pc.give_item2(20029, 1) elseif donner == 3 then pc.give_item2(20009, 1) elseif donner == 4 then pc.give_item2(20039, 1) end end end end end end

wenn ich in game auf r�stungen oder waffen gehe geht es aber wenn ich auf Eq dr�cke closed sihc das fenster finde einfach den fehler nicht k�nnt ihr mir helfen?

11/30/2012 16:34 LikeCranK�#7213

Sers Leute ich hab eine Frage..,

Wie oder was baue ich in meiner NPC-Shop Quest ein
damit ich bei einem Shop mit einem Bestimmten Charakternamen
statts der eine z.B. npc.open_shop(12) ein anderer Shop sich
�ffnet aber dennoch der der normale shop f�r Charakter die
nicht so hei�en sich �ffnet?

Hier die Quest:

Spoiler

PHP Code:


			
quest npc_shop begin 
    state start begin 

    when 20023.chat."Bibliothek" begin 
        npc.open_shop(24) 
        chat("Bibliothek ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20349.chat."Reiterladen" begin 
        npc.open_shop(11) 
        chat("Reiterladen ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20306.chat."Schamanen-Frisuren (m)" begin 
        npc.open_shop(22) 
        chat("Schamanen-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20326.chat."Schamanen-Frisuren (m)" begin 
        npc.open_shop(22) 
        chat("Schamanen-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20346.chat."Schamanen-Frisuren (m)" begin 
        npc.open_shop(22) 
        chat("Schamanen-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20307.chat."Schamanen-Frisuren (w)" begin 
        npc.open_shop(23) 
        chat("Schamanen-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20327.chat."Schamanen-Frisuren (w)" begin 
        npc.open_shop(23) 
        chat("Schamanen-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20347.chat."Schamanen-Frisuren (w)" begin 
        npc.open_shop(23) 
        chat("Schamanen-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20304.chat."Sura-Frisuren (m)" begin 
        npc.open_shop(20) 
        chat("Sura-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20324.chat."Sura-Frisuren (m)" begin 
        npc.open_shop(20) 
        chat("Sura-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20344.chat."Sura-Frisuren (m)" begin 
        npc.open_shop(20) 
        chat("Sura-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20305.chat."Sura-Frisuren (w)" begin 
        npc.open_shop(21) 
        chat("Sura-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW)
    end
    when 20325.chat."Sura-Frisuren (w)" begin 
        npc.open_shop(21) 
        chat("Sura-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20345.chat."Sura-Frisuren (w)" begin 
        npc.open_shop(21) 
        chat("Sura-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20300.chat."Krieger-Frisuren (m)" begin 
        npc.open_shop(16) 
        chat("Krieger-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20320.chat."Krieger-Frisuren (m)" begin 
        npc.open_shop(16) 
        chat("Krieger-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)  
    end
    when 20340.chat."Krieger-Frisuren (m)" begin
        npc.open_shop(16)
        chat("Krieger-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)  
    end
    when 20302.chat."Ninja-Frisuren (m)" begin 
        npc.open_shop(18) 
        chat("Ninja-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20322.chat."Ninja-Frisuren (m)" begin 
        npc.open_shop(18) 
        chat("Ninja-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW)  
    end
    when 20342.chat."Ninja-Frisuren (m)" begin 
        npc.open_shop(18) 
        chat("Ninja-Frisuren (m) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20303.chat."Ninja-Frisuren (w)" begin 
        npc.open_shop(19) 
        chat("Ninja-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20323.chat."Ninja-Frisuren (w)" begin 
        npc.open_shop(19) 
        chat("Ninja-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20343.chat."Ninja-Frisuren (w)" begin 
        npc.open_shop(19) 
        chat("Ninja-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20301.chat."Krieger-Frisuren (w)" begin 
        npc.open_shop(17) 
        chat("Krieger-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20321.chat."Krieger-Frisuren (w)" begin 
        npc.open_shop(17) 
        chat("Krieger-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW)  
    end
    when 20341.chat."Krieger-Frisuren (w)" begin 
        npc.open_shop(17) 
        chat("Krieger-Frisuren (w) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20041.chat."Sammelbeutel (1)" begin 
        npc.open_shop(14) 
        chat("Sammelbeutel (1) ge�ffnet")
        setskin(NOWINDOW) 
    end

    when 20041.chat."Sammelbeutel (2)" begin 
        npc.open_shop(15) 
        chat("Sammelbeutel (2) ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 20042.chat."Hochzeits-Shop" begin 
        npc.open_shop(9) 
        chat("Hochzeits-Shop ge�ffnet")
        setskin(NOWINDOW) 
    end
    when 9003.chat."Gemischtwarenh�ndlerin" begin  
        npc.open_shop(3) 
        chat("Gemischtwarenladen ge�ffnet")
        setskin(NOWINDOW)  
    end 
    when 20094.chat."Itemshoph�ndlerin (1)" begin 
        npc.open_shop(12) 
        chat("Itemshop (1) ge�ffnet")
        setskin(NOWINDOW) 
    end 
    when 20094.chat."Itemshoph�ndlerin (2)" begin 
        npc.open_shop(13) 
        chat("Itemshop (2) ge�ffnet")
        setskin(NOWINDOW) 
    end 
    end 
             
    end

Danke im Vorraus

11/30/2012 21:38 xSwagx3#7214

Hi ich habe ein kleines Problem
[Only registered and activated users can see links. Click Here To Register...]

Quest

Spoiler

11/30/2012 22:34 .Seriously#7215

PHP Code:


			
quest panel begin
    state start begin
        when login begin
            set_state(information)
        end
    end
    state information begin
        when letter begin
            send_letter("Energy Bonus")
        end
        
        when button or info begin
            say_title("Energy Bonus")
            say("")
            local s=select("Informationen","Abbruch")
            if s == 2 then
                return
            elseif s == 1 then
                say("Mit dem Energy System kann dir durch das Herstellen eines")
                say("Energiekristalls besondere Kr�fte verliehen werden.")
                say("")
                say("[DE Items")
                say("")
                say("Lv.35 bis Lv. 75 Waffen")
                say("Lv.42 bis Lv. 70 R�stungen")
                say("")
                say("Diese Gegenst�nde musst du einfach auf den Alchemist ziehen.")
                say("Je nach Level und +0 bis +9 wirst du mit Energiesplitter ausgezahlt.")
                say("")
                say("Enjoy Perfect World II")
            end
        end
    end
end

Page 481 of 845

481