[SERVICE] Die Questkontrolle

Page 482 of 845

482

11/30/2012 23:26 iSouli~#7216

Quote:

Originally Posted by xSwagx3

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

Quest

Spoiler

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 == 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") elseif s == 2 then end end end end

PHP Code:


			
quest panel begin 

    state start begin 

        when login or letter begin 

            send_letter("Energy Bonus")

        end



        when button or info begin 

            say_title("Energy Bonus") 

            say("") 

            if select("Informationen","Abbruch") == 2 then return end 

            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

12/01/2012 00:39 LikeCranK�#7217

Quote:

Originally Posted by LikeCranK�

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

Ben�tige immernoch Hilfe :o

12/01/2012 00:51 iSouli~#7218

Quote:

Originally Posted by LikeCranK™

Ben�tige immernoch Hilfe :o

PHP Code:


			
     when 20304.chat."Sura-Frisuren (m)" begin  
        if pc.get_name() == 'Name' then
            npc.open_shop(20)
        else
            npc.open_shop(21)
        end
        chat("Sura-Frisuren (m) ge�ffnet") 
        setskin(NOWINDOW) 
    end

Bitte.

12/01/2012 01:07 LikeCranK�#7219

Quote:

Originally Posted by iSouli~

PHP Code:

when 20304.chat."Sura-Frisuren (m)" begin if pc.get_name() == 'Name' then npc.open_shop(20) else npc.open_shop(21) end chat("Sura-Frisuren (m) ge�ffnet") setskin(NOWINDOW) end

Bitte.

FETTES Danke :D :handsdown:

Sry ich bins nochmal xD

Ja Souli das hat nice funktioniert nur ich hab sie bissl umgebastelt:

PHP Code:


			
    when 20023.chat."Bibliothek" begin 

        if pc.get_name() == 'XxxX' then

        local s = select ("Bibliothek" , "ViP-Shop 1" , "ViP-Shop 2" , "Abbrechen")

        else

        npc.open_shop(24)

        setskin(NOWINDOW)

        if s == 1 then 

            npc.open_shop(24)

            setskin(NOWINDOW)

        elseif s == 2 then

            npc.open_shop(11)

            setskin(NOWINDOW)

        elseif s == 3 then

            npc.open_shop(22)

            setskin(NOWINDOW)

        elseif s == 4 then

        end

    end

end

Aber jetz �ffnen sich die Shops nicht nach dem Anklicken..
Wei� jemand das Problem :D

Danke im Vorraus

12/01/2012 08:00 �by Noa#7220

das else muss weg und ein end am ende dran h�ngen

PHP Code:


			
    when 20023.chat."Bibliothek" begin  
        if pc.get_name() == 'XxxX' then 
        local s = select ("Bibliothek" , "ViP-Shop 1" , "ViP-Shop 2" , "Abbrechen")  
            if s == 1 then  
                npc.open_shop(24) 
                setskin(NOWINDOW) 
            elseif s == 2 then 
                npc.open_shop(11) 
                setskin(NOWINDOW) 
            elseif s == 3 then 
                npc.open_shop(22) 
                setskin(NOWINDOW) 
            elseif s == 4 then 
                return
            end
        end 
    end 
end

12/01/2012 09:16 plechito#7221

Hello, i need help with this quest, i have problem..
the seal of phoenix disappears after logout and login and 60 seconds still not elapsed...

petfenixremove() == pc.remove_item(54002, 1)

PHP Code:


			
quest petgivefenix begin
    state start begin
    when 54010.use with pc.getqf("zimnifenix1") == 1 begin
      chat("Již m�š zimn�ho f�nixe")  
    end

    when 54010.use with pc.getqf("zimnifenix1") == 0 begin
            pc.setqf("zimnifenix1",1)
      pc.remove_item(54010, 1)
      say_gold("Tady m�š zimn�h f�nixe")
      pc.give_item2(54002, 1)
      setpet(anz,boni_list[anz][2],get_time() + 60)
      cmdchat("petfenix"..(get_time() + 60))
      setpettime(get_time() + 60)
    end

    
    when login with pc.getqf("zimnifenix1") == 1 begin
      if get_time() > getpettime() then
      petfenixremove()
            pc.setqf("zimnifenix1",0)
            clear_letter()
            set_state(__COMPLETE__)
      end
    end 
  end
    state __COMPLETE__ begin
end
end

Thanks for help!

12/01/2012 11:23 �by Noa#7222

there are those functions?

PHP Code:


			
setpettime
getpettime
petfenixremove
setpet

12/01/2012 12:20 LikeCranK�#7223

Quote:

Originally Posted by �by Noa

das else muss weg und ein end am ende dran h�ngen

PHP Code:

when 20023.chat."Bibliothek" begin if pc.get_name() == 'XxxX' then local s = select ("Bibliothek" , "ViP-Shop 1" , "ViP-Shop 2" , "Abbrechen") if s == 1 then npc.open_shop(24) setskin(NOWINDOW) elseif s == 2 then npc.open_shop(11) setskin(NOWINDOW) elseif s == 3 then npc.open_shop(22) setskin(NOWINDOW) elseif s == 4 then return end end end end

Noa du hast mich glaub nicht ganz verstanden..
und fehler bei deiner "L�sung"

Spoiler

Das else ist daf�r da damit leute die nicht so hei�en trotzdem noch
Bibliothek �ffnen k�nnen..

PHP Code:


			
    when 20023.chat."Bibliothek" begin  
        if pc.get_name() == 'XxxX' then 
        local s = select ("Bibliothek" , "ViP-Shop 1" , "ViP-Shop 2" , "Abbrechen") 
        else 
        npc.open_shop(24) 
        setskin(NOWINDOW) 
        if s == 1 then  
            npc.open_shop(24) 
            setskin(NOWINDOW) 
        elseif s == 2 then 
            npc.open_shop(11) 
            setskin(NOWINDOW) 
        elseif s == 3 then 
            npc.open_shop(22) 
            setskin(NOWINDOW) 
        elseif s == 4 then 
        end 
    end 
end

Immernoch �ffnen sich keine Shops..

12/01/2012 12:38 plechito#7224

Quote:

Originally Posted by �by Noa

setpettime
getpettime
petfenixremove
setpet

It's my function, it's work, but seal of phoenix just disappear when i logout and login.. and not after 60 seconds..

12/01/2012 18:28 .DarthNeno#7225

Hei die Quest soll bewirken das man die aufgez�hlten Items droppt, alerdings droppt man keines davon..

PHP Code:


			
quest metin_drop begin

    state start begin

        when 8035.kill with pc.get_level() <= 90 begin

            items =    {

                        {11297, 1, 12},

                        {11497, 1, 12},

                        {11697, 1, 12},

                        {11897, 1, 12},

                        {187, 1, 12},

                        {3167, 1, 12},

                        {1137, 1, 12},

                        {5127, 1, 12},

                        {2177, 1, 12},

                        {147, 1, 12},

                        {157, 1, 12},

                        {167, 1, 12},

                        {1117, 1, 12},

                        {1107, 1, 12},

                        {2137, 1, 12},

                        {2147, 1, 12},

                        {3137, 1, 12},

                        {3147, 1, 12},

                        {5097, 1, 12},

                        {5107, 1, 12},

                        {7137, 1, 12},

                        {7147, 1, 12},

                        {13067, 1, 12},

                        {13087, 1, 12},

                        {13107, 1, 12},

                        {13127, 1, 12},

                        {50125, 5, 1200},

                        {50513, 5, 1200},

                        {27987, 5, 1000}

                    }

            for i = 1, table.getn(items), 1 do

                local chance = number(1, math.floor(100 / items[i][3] * 4))

                if chance == 1 then

                    game.drop_item_with_ownership(items[i][1],items[i][2])

                end

            end

        end

        

        when 8036.kill with pc.get_level() <= 95 begin

            items =    {

                        {11298, 1, 12},

                        {11498, 1, 12},

                        {11698, 1, 12},

                        {11898, 1, 12},

                        {188, 1, 12},

                        {3168, 1, 12},

                        {1138, 1, 12},

                        {5128, 1, 12},

                        {2178, 1, 12},

                        {148, 1, 12},

                        {158, 1, 12},

                        {168, 1, 12},

                        {1118, 1, 12},

                        {1108, 1, 12},

                        {2138, 1, 12},

                        {2148, 1, 12},

                        {3138, 1, 12},

                        {3148, 1, 12},

                        {5098, 1, 12},

                        {5108, 1, 12},

                        {7138, 1, 12},

                        {7148, 1, 12},

                        {13068, 1, 12},

                        {13088, 1, 12},

                        {13108, 1, 12},

                        {13128, 1, 12},

                        {50125, 5, 1200},

                        {50513, 5, 1200},

                        {27987, 5, 1000}

                    }

            for i = 1, table.getn(items), 1 do

                local chance = number(1, math.floor(100 / items[i][3] * 4))

                if chance == 1 then

                    game.drop_item_with_ownership(items[i][1],items[i][2])

                end

            end

        end

        

        when 8038.kill with pc.get_level() <= 100 begin

            items =    {

                        {11298, 1, 12},

                        {11498, 1, 12},

                        {11698, 1, 12},

                        {11898, 1, 12},

                        {188, 1, 12},

                        {3168, 1, 12},

                        {1138, 1, 12},

                        {5128, 1, 12},

                        {2178, 1, 12},

                        {148, 1, 12},

                        {158, 1, 12},

                        {168, 1, 12},

                        {1118, 1, 12},

                        {1108, 1, 12},

                        {2138, 1, 12},

                        {2148, 1, 12},

                        {3138, 1, 12},

                        {3148, 1, 12},

                        {5098, 1, 12},

                        {5108, 1, 12},

                        {7138, 1, 12},

                        {7148, 1, 12},

                        {13068, 1, 12},

                        {13088, 1, 12},

                        {13108, 1, 12},

                        {13128, 1, 12},

                        {50125, 5, 1200},

                        {50513, 5, 1200},

                        {27987, 5, 1000}

                    }

            for i = 1, table.getn(items), 1 do

                local chance = number(1, math.floor(100 / items[i][3] * 4))

                if chance == 1 then

                    game.drop_item_with_ownership(items[i][1],items[i][2])

                end

            end

        end

    end

end

danke im voraus

12/01/2012 20:39 LikeCranK�#7226

@.DarthNeno

Warum machst du das �ber eine quest ?
mach es doch �ber die mob_drop_item.txt
und setz ein level_limit drop ..

12/01/2012 22:01 React�#7227

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?

12/01/2012 22:21 LordMampf2#7228

Quote:

Originally Posted by LikeCranK�

Noa du hast mich glaub nicht ganz verstanden..
und fehler bei deiner "L�sung"

Spoiler

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

Das else ist daf�r da damit leute die nicht so hei�en trotzdem noch
Bibliothek �ffnen k�nnen..

PHP Code:

when 20023.chat."Bibliothek" begin if pc.get_name() == 'XxxX' then local s = select ("Bibliothek" , "ViP-Shop 1" , "ViP-Shop 2" , "Abbrechen") else npc.open_shop(24) setskin(NOWINDOW) if s == 1 then npc.open_shop(24) setskin(NOWINDOW) elseif s == 2 then npc.open_shop(11) setskin(NOWINDOW) elseif s == 3 then npc.open_shop(22) setskin(NOWINDOW) elseif s == 4 then end end end

Immernoch �ffnen sich keine Shops..

PHP Code:


			
when 20023.chat."Bibliothek" begin 

        local s = 1

        if pc.get_name() == 'XxxX' then 

             s = select ("Bibliothek" , "ViP-Shop 1" , "ViP-Shop 2" , "Abbrechen") 

        else

            if s == 1 then  

                npc.open_shop(24) 

                setskin(NOWINDOW) 

            elseif s == 2 then 

                npc.open_shop(11) 

                setskin(NOWINDOW) 

            elseif s == 3 then 

                npc.open_shop(22) 

                setskin(NOWINDOW) 

            end 

        end

end

12/02/2012 01:44 JeeX#7229

Quest1:
Der Zweck dieser Quest is, das ich zu Uriel von nem anderen NPC geschickt werde und dann �ffnet sich diese When Funktion...
Hierbei soll er als erstes denn Auftrag �ffnen (Blabla.. du sollst mir dies und das besorgen...)
Dann wenn ich Ihn nochmal anklicke, soll stehen... Du hast noch die alle Items usw...
und wenn ich alle die verlangt wurden gesammelt habe.. und ihn nochmal anspreche,.. dann soll er mir 1 Item geben!

Spoiler

Quest2:

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 ...

12/02/2012 07:20 xSwagx3#7230

Huhu brauche Hilfe danke im Voraus :)

PHP Code:


			
-----------------------------------------------------------------------------------

--        Verlassenes Reich || Warpto gm_guild_build map || map_index 200 || Azrael --

-----------------------------------------------------------------------------------



quest Azrael begin

    state start begin

        when 20092.chat."Reich der Toten" begin

            if pc.level()<=104 then 

            say ("Du hast noch nicht genuegend Erfahrung gesammelt. Komme wieder, wenn du Level 105 bist!") 

            else 

        say_title("Azrael")

        say("")

        say("Erfahrene Krieger haben weit im Inneren")

        say("des Kontinentes einen l�ngst vergessenen Ort")

        say("entdeckt. Es hei�t, dass es einst ein Friedhof,")

        say("der Kaiserlichen Armee war. �ber die Jahre jedoch ")

        say("haben sich dort wilde Monster angesammelt und")

        say("die Kraft des B�sen, insbesondere der")

        say("Herrscher Azrael scheint dort zu sein.")

        else

            say("")

        end

        wait()

        if pc.count_item(70020) >= 1 then

        say_title("Azrael")

        say("")

            if get_time() > pc.getqf("next_warp_vr_time") then

                say("Wie ich sehe, hast du das Blut des B�sen")

                say("infiziere dich blo� nicht !!")

                say("Ich denke du wirst dich im Reich der Toten")

                say("damit zurechtfinden.")

                say("")

                say_reward("Soll ich dich ins Reich der Toten teleportieren?")

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

                        if s == 1 then

                            pc.warp(3542,12825)

                            pc.remove_item(70020)

                        else

                            return

                        end

            else

                say("Bitte komm sp�ter wieder")

            end

        else

        say_title("Azrael")

        say("")

        say("Ich kann dich dort hin teleportieren, wenn du")

        say("mir 1x das Blut des B�sen")

        say("aus dem Itemshop besorgst")

        say("der Preis liegt bei 50 Coins !")

        say_item_vnum(70020)

            chat("Besuche die Homepage und kaufe dir f�r 50 Coins das Item.")

            end

        end

            end

        end

Page 482 of 845

482