[SERVICE] Die Questkontrolle

Page 108 of 845

108

03/06/2011 10:47 .Plazmaa#1606

Quote:

Originally Posted by Delta619

dann musst du das aber per .use machen nit mit .chat ^^
hier meine Version davon, untested aber d�rfte klappen:

PHP Code:

quest shop begin state start begin when 70025.use begin say("Welchen Shop m�chtest du �ffnen?") local chose = select("Waffenhandel", "R�stungshandel", "Gemischtwarenhandel", "Upp-Items 1", "Upp-Items 2", "Itemshop", "Keinen") if chose == 1 then npc.open_shop(1) say("Viel Spa� beim shoppen") elseif chose == 2 then npc.open_shop(4) say("Viel Spa� beim shoppen") elseif chose == 3 then npc.open_shop(3) say("Viel Spa� beim shoppen") elseif chose == 4 then npc.open_shop(5) say("Viel Spa� beim shoppen") elseif chose == 5 then npc.open_shop(17) say("Viel Spa� beim shoppen") elseif chose == 6 then npc.open_shop(12) say("Viel Spa� beim shoppen") elseif chose == 7 then return end end end end

Hab sie drin,funktioniert aber nur teilweise...
Es erscheint ein fenster,mit der Shop auswahl.
Wenn man dann eins ausw�hlt �ffnet sich nur manchmal der shop
(Nur in einer safezone) woran liegt das?

03/06/2011 12:22 LxR'EsoZiaL#1607

PHP Code:


			
quest shop begin

    state start begin

        when 70025.use begin

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

            local chose = select("Waffenhandel", "R�stungshandel", "Gemischtwarenhandel", "Upp-Items 1", "Upp-Items 2", "Itemshop", "Keinen")

            if chose == 1 then

                npc.open_shop(1)

                setskin(NOWINDOW)

            elseif chose == 2 then

                npc.open_shop(4)

                setskin(NOWINDOW)

            elseif chose == 3 then

                npc.open_shop(3)

                setskin(NOWINDOW)

            elseif chose == 4 then

                npc.open_shop(5)

                setskin(NOWINDOW)

            elseif chose == 5 then

                npc.open_shop(17)

                setskin(NOWINDOW)

            elseif chose == 6 then

                npc.open_shop(12)

                setskin(NOWINDOW)

            elseif chose == 7 then

                return

            end

        end

    end

end

[

Villt so?

03/06/2011 13:48 .Plazmaa#1608

Quote:

Originally Posted by ~АLeЖ~

PHP Code:

quest shop begin state start begin when 70025.use begin say("Welchen Shop m�chtest du �ffnen?") local chose = select("Waffenhandel", "R�stungshandel", "Gemischtwarenhandel", "Upp-Items 1", "Upp-Items 2", "Itemshop", "Keinen") if chose == 1 then npc.open_shop(1) setskin(NOWINDOW) elseif chose == 2 then npc.open_shop(4) setskin(NOWINDOW) elseif chose == 3 then npc.open_shop(3) setskin(NOWINDOW) elseif chose == 4 then npc.open_shop(5) setskin(NOWINDOW) elseif chose == 5 then npc.open_shop(17) setskin(NOWINDOW) elseif chose == 6 then npc.open_shop(12) setskin(NOWINDOW) elseif chose == 7 then return end end end end

[

Villt so?

Geht ebenfalls nicht,aus welchem Grund auch immer...

03/06/2011 13:58 0x4D617276#1609

ich wei� wieso xD
Sprich mal vorher ein NPC an bevor du einen Shop �ffnest ;)

#300 Posts :)

03/06/2011 14:02 .Plazmaa#1610

Quote:

Originally Posted by 0x4D617276

ich wei� wieso xD
Sprich mal vorher ein NPC an bevor du einen Shop �ffnest ;)

Ja dann geht es auch...

Aber wie kann ich machen das es immer geht?

03/06/2011 14:05 0x4D617276#1611

Das geht aus irgendeinen Grund nicht ;)
Mach einfach eine Quest die ein NPC spawnt, wo alle Shops drin sind, die habe ich gleich fertig kommen in meine SF (Mache ich im Laufe des Tages pub :))

03/06/2011 16:17 LxR'EsoZiaL#1612

Spoiler

PHP Code:


			
        -- Verwandlungsevent (aktivert �ber /e Verwandlungsevent1 1)
 quest pep begin
state start begin
       when login with game.get_event_flag("Verwandlungsevent1")== 1 begin
        local r=number(1, 49)
        if 1>=r then
        pc.polymorph(101, 300) -- Verwandulungsdauer = 5Min.
        elseif 2>=r then
        pc.polymorph(102, 300)
        elseif 3>=r then
        pc.polymorph(103, 300)
        elseif 4>=r then
        pc.polymorph(104, 300)
        elseif 5>=r then
        pc.polymorph(105, 300)
        elseif 6>=r then
        pc.polymorph(106, 300)
        elseif 7>=r then
        pc.polymorph(107, 300)
        elseif 8>=r then
        pc.polymorph(108, 300)
        elseif 9>=r then
        pc.polymorph(109, 300)
        elseif 10>=r then
        pc.polymorph(110, 300)
        elseif 11>=r then
        pc.polymorph(111, 300)
        elseif 12>=r then
        pc.polymorph(112, 300)
        elseif 13>=r then
        pc.polymorph(113, 300)
        elseif 14>=r then
        pc.polymorph(114, 300)
        elseif 15>=r then
        pc.polymorph(115, 300)
        elseif 16>=r then
        pc.polymorph(406, 300)
        elseif 17>=r then
        pc.polymorph(401, 300)
        elseif 18>=r then
        pc.polymorph(402, 300)
        elseif 19>=r then
        pc.polymorph(403, 300)
        elseif 20>=r then
        pc.polymorph(404, 300)
        elseif 21>=r then
        pc.polymorph(405, 300)
        elseif 22>=r then
        pc.polymorph(491, 300)
        elseif 23>=r then
        pc.polymorph(492, 300)
        elseif 24>=r then
        pc.polymorph(492, 300)
        elseif 25>=r then
        pc.polymorph(493, 300)
        elseif 26>=r then
        pc.polymorph(494, 300)
        elseif 27>=r then
        pc.polymorph(501, 300)
        elseif 28>=r then
        pc.polymorph(502, 300)
        elseif 29>=r then
        pc.polymorph(591, 300)
        elseif 30>=r then
        pc.polymorph(504, 300)
        elseif 31>=r then
        pc.polymorph(5161, 300)
        elseif 32>=r then
        pc.polymorph(5162, 300)
        elseif 33>=r then
        pc.polymorph(5163, 300)
        elseif 34>=r then
        pc.polymorph(5164, 300)
        elseif 35>=r then
        pc.polymorph(1191, 300)
        elseif 36>=r then
        pc.polymorph(1192, 300)
        elseif 37>=r then
        pc.polymorph(2191, 300)
        elseif 38>=r then
        pc.polymorph(2192, 300)
        elseif 39>=r then
        pc.polymorph(2201, 300)
        elseif 40>=r then
        pc.polymorph(2202, 300)
        elseif 41>=r then
        pc.polymorph(2203, 300)
        elseif 42>=r then
        pc.polymorph(2204, 300)
        elseif 43>=r then
        pc.polymorph(2205, 300)
        elseif 44>=r then
        pc.polymorph(2206, 300)
        elseif 45>=r then
        pc.polymorph(2207, 300)
        elseif 46>=r then
        pc.polymorph(5002, 300)
        elseif 47>=r then
        pc.polymorph(5003, 300)
        elseif 48>=r then
        pc.polymorph(20109, 300)
        elseif 49>=r then
        pc.polymorph(20300, 300)
        chat("Zum Geburstag von [RANG]NAME,")
        chat("hat das Team das Verwandlungsevent begonnen.")
        chat("Das hei�t das du bei jeden Login in irgentetwas verwandelt wirst.")
        chat("MfG Future World3 Team")
        end
    end
end

Wird das Funksten oder wiedermal ein paar Fehler? ^^

03/06/2011 16:23 .Delta#1613

ich w�rde statt >= lieber == nehmen, wei� nicht ob du sonst mehrfach verwandelt wirst, weil dann ja eig alles was unter der zahl liegt auch zutrifft :D
Desweiteren mache vor den chat befehlen noch ein end hin, sonst kommt der Text nur bei nr 49

MfG

Delta619

03/06/2011 16:33 LxR'EsoZiaL#1614

Spoiler

PHP Code:


			
        -- Verwandlungsevent (aktivert �ber /e Verwandlungsevent1 1)
 quest pep begin
state start begin
       when login with game.get_event_flag("Verwandlungsevent1")== 1 begin
        local r=number(1, 49)
        chat("Zum Geburstag von [RANG]NAME,")
        chat("hat das Team das Verwandlungsevent begonnen.")
        chat("Das hei�t das du bei jeden Login in irgentetwas verwandelt wirst.")
        chat("MfG Future World3 Team")
        if 1==r then
        pc.polymorph(101, 300) -- Verwandulungsdauer = 5Min.
        elseif 2==r then
        pc.polymorph(102, 300)
        elseif 3==r then
        pc.polymorph(103, 300)
        elseif 4==r then
        pc.polymorph(104, 300)
        elseif 5==r then
        pc.polymorph(105, 300)
        elseif 6==r then
        pc.polymorph(106, 300)
        elseif 7==r then
        pc.polymorph(107, 300)
        elseif 8==r then
        pc.polymorph(108, 300)
        elseif 9==r then
        pc.polymorph(109, 300)
        elseif 10==r then
        pc.polymorph(110, 300)
        elseif 11==r then
        pc.polymorph(111, 300)
        elseif 12==r then
        pc.polymorph(112, 300)
        elseif 13==r then
        pc.polymorph(113, 300)
        elseif 14==r then
        pc.polymorph(114, 300)
        elseif 15==r then
        pc.polymorph(115, 300)
        elseif 16==r then
        pc.polymorph(406, 300)
        elseif 17==r then
        pc.polymorph(401, 300)
        elseif 18==r then
        pc.polymorph(402, 300)
        elseif 19==r then
        pc.polymorph(403, 300)
        elseif 20==r then
        pc.polymorph(404, 300)
        elseif 21==r then
        pc.polymorph(405, 300)
        elseif 22==r then
        pc.polymorph(491, 300)
        elseif 23==r then
        pc.polymorph(492, 300)
        elseif 24==r then
        pc.polymorph(492, 300)
        elseif 25==r then
        pc.polymorph(493, 300)
        elseif 26==r then
        pc.polymorph(494, 300)
        elseif 27==r then
        pc.polymorph(501, 300)
        elseif 28==r then
        pc.polymorph(502, 300)
        elseif 29==r then
        pc.polymorph(591, 300)
        elseif 30==r then
        pc.polymorph(504, 300)
        elseif 31==r then
        pc.polymorph(5161, 300)
        elseif 32==r then
        pc.polymorph(5162, 300)
        elseif 33==r then
        pc.polymorph(5163, 300)
        elseif 34==r then
        pc.polymorph(5164, 300)
        elseif 35==r then
        pc.polymorph(1191, 300)
        elseif 36==r then
        pc.polymorph(1192, 300)
        elseif 37==r then
        pc.polymorph(2191, 300)
        elseif 38==r then
        pc.polymorph(2192, 300)
        elseif 39==r then
        pc.polymorph(2201, 300)
        elseif 40==r then
        pc.polymorph(2202, 300)
        elseif 41==r then
        pc.polymorph(2203, 300)
        elseif 42==r then
        pc.polymorph(2204, 300)
        elseif 43==r then
        pc.polymorph(2205, 300)
        elseif 44==r then
        pc.polymorph(2206, 300)
        elseif 45==r then
        pc.polymorph(2207, 300)
        elseif 46==r then
        pc.polymorph(5002, 300)
        elseif 47==r then
        pc.polymorph(5003, 300)
        elseif 48==r then
        pc.polymorph(20109, 300)
        elseif 49==r then
        pc.polymorph(20300, 300)
        end
    end
end

So inetwar?

03/06/2011 16:40 .Delta#1615

PHP Code:


			
        -- Verwandlungsevent (aktivert �ber /e Verwandlungsevent1 1)
 quest pep begin
state start begin
       when login with game.get_event_flag("Verwandlungsevent1")== 1 begin
        chat("Zum Geburstag von [RANG]NAME,")
        chat("hat das Team das Verwandlungsevent begonnen.")
        chat("Das hei�t das du bei jeden Login in irgentetwas verwandelt wirst.")
        chat("MfG Future World3 Team")
        local r=number(1, 49)
        if 1==r then
        pc.polymorph(101, 300) -- Verwandulungsdauer = 5Min.
        elseif 2==r then
        pc.polymorph(102, 300)
        elseif 3==r then
        pc.polymorph(103, 300)
        elseif 4==r then
        pc.polymorph(104, 300)
        elseif 5==r then
        pc.polymorph(105, 300)
        elseif 6==r then
        pc.polymorph(106, 300)
        elseif 7==r then
        pc.polymorph(107, 300)
        elseif 8==r then
        pc.polymorph(108, 300)
        elseif 9==r then
        pc.polymorph(109, 300)
        elseif 10==r then
        pc.polymorph(110, 300)
        elseif 11==r then
        pc.polymorph(111, 300)
        elseif 12==r then
        pc.polymorph(112, 300)
        elseif 13==r then
        pc.polymorph(113, 300)
        elseif 14==r then
        pc.polymorph(114, 300)
        elseif 15==r then
        pc.polymorph(115, 300)
        elseif 16==r then
        pc.polymorph(406, 300)
        elseif 17==r then
        pc.polymorph(401, 300)
        elseif 18==r then
        pc.polymorph(402, 300)
        elseif 19==r then
        pc.polymorph(403, 300)
        elseif 20==r then
        pc.polymorph(404, 300)
        elseif 21==r then
        pc.polymorph(405, 300)
        elseif 22==r then
        pc.polymorph(491, 300)
        elseif 23==r then
        pc.polymorph(492, 300)
        elseif 24==r then
        pc.polymorph(492, 300)
        elseif 25==r then
        pc.polymorph(493, 300)
        elseif 26==r then
        pc.polymorph(494, 300)
        elseif 27==r then
        pc.polymorph(501, 300)
        elseif 28==r then
        pc.polymorph(502, 300)
        elseif 29==r then
        pc.polymorph(591, 300)
        elseif 30==r then
        pc.polymorph(504, 300)
        elseif 31==r then
        pc.polymorph(5161, 300)
        elseif 32==r then
        pc.polymorph(5162, 300)
        elseif 33==r then
        pc.polymorph(5163, 300)
        elseif 34==r then
        pc.polymorph(5164, 300)
        elseif 35==r then
        pc.polymorph(1191, 300)
        elseif 36==r then
        pc.polymorph(1192, 300)
        elseif 37==r then
        pc.polymorph(2191, 300)
        elseif 38==r then
        pc.polymorph(2192, 300)
        elseif 39==r then
        pc.polymorph(2201, 300)
        elseif 40==r then
        pc.polymorph(2202, 300)
        elseif 41==r then
        pc.polymorph(2203, 300)
        elseif 42==r then
        pc.polymorph(2204, 300)
        elseif 43==r then
        pc.polymorph(2205, 300)
        elseif 44==r then
        pc.polymorph(2206, 300)
        elseif 45==r then
        pc.polymorph(2207, 300)
        elseif 46==r then
        pc.polymorph(5002, 300)
        elseif 47==r then
        pc.polymorph(5003, 300)
        elseif 48==r then
        pc.polymorph(20109, 300)
        elseif 49==r then
        pc.polymorph(20300, 300)
        end
    end
    end
end

mach so.
ein end hat noch gefehlt ;)

03/06/2011 16:41 LxR'EsoZiaL#1616

ja wegen solchen Sachen wie end und == bin ich mir nie sicher ^^.

€Nochwas ^.^

Spoiler

PHP Code:


			
        -- Userpannel Item
         when 2.use begin
            say_title("Willkommen im Kontrollzentrum")
            say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
            local a = select("Pferde-Tool","Abbrechen") -- ,"Teleport-Tool","Verwandlungs-Tool","Event-Tool","Verwarnen","Frei"
            if a == 2 then
                say("Nagut, vielleicht beim n�chsten mal")
                return
            end
            if a == 1 then
            say_title("Hallo "..pc.get_name()..",")
            say("Welche Art von Reittieren willst du genau reiten?")
            local bad = select ("Pferde","neue Reittiere","Shadow Reittiere","besondere Reittiere","Abbrechen")
                if bad == 1 then
                say_title("Pferde Reitten")
                say("Welches darf es genau sein?")
                local pferde = select ("Ponys","Kampfpferde","Milit�rpferde","Abbrechen")
                        if pferde == 1 then
                        say_title("Pony Reitten")
                        say("Welche Farbe darfs den sein?")
                        local pony = select ("Braun","Schwarz",Wei�","Abbrechen")
                        if pony == 1 then
                        pc.mount(BRAUNES_PONY_VALUE)
                        chat("Du Reittest jezt auf ein  Braunen Pony!")
                    end
                        if pony == 2 then
                        pc.mount(Schwarzes_PONY_VALUE)
                        chat("Du Reittest jezt auf ein  Schwarzen Pony!")
                    end
                        if pony == 3 then
                        pc.mount(Wei�es_PONY_VALUE)
                        chat("Du Reittest jezt auf ein  Wei�en Pony!")
                    end
                        if pony == 4 then
                        say("Nagut, vielleicht beim n�chsten mal")
                        return
                    end
                end -- der Pony Reihe
                
                        if pferde == 2 then
                        say_title("Kampfpferd Reitten")
                        say("Welche Farbe darfs den sein?")
                        local Kampfpferd = select ("Braun","Schwarz",Wei�","Abbrechen")
                        if Kampfpferd == 1 then
                        pc.mount(BRAUNES_Kampfpferd_VALUE)
                        chat("Du Reittest jezt auf ein  Braunen Kampfpferd!")
                    end
                        if Kampfpferd == 2 then
                        pc.mount(Schwarzes_Kampfpferd_VALUE)
                        chat("Du Reittest jezt auf ein  Schwarzen Kampfpferd!")
                    end
                        if Kampfpferd == 3 then
                        pc.mount(Wei�es_Kampfpferd_VALUE)
                        chat("Du Reittest jezt auf ein  Wei�en Kampfpferd!")
                    end
                        if Kampfpferd == 4 then
                        say("Nagut, vielleicht beim n�chsten mal")
                        return
                    end
                end -- der Kampfpferd Reihe
                
                        if pferde == 3 then
                        say_title("Milit�rpferd Reitten")
                        say("Welche Farbe darfs den sein?")
                        local mili = select ("Braun","Schwarz",Wei�","Abbrechen")
                        if mili == 1 then
                        pc.mount(BRAUNES_Milit�rpferd_VALUE)
                        chat("Du Reittest jezt auf ein  Braunen Milit�rpferd!")
                    end
                        if mili == 2 then
                        pc.mount(Schwarzes_Milit�rpferd_VALUE)
                        chat("Du Reittest jezt auf ein  Schwarzen Milit�rpferd!")
                    end
                        if mili == 3 then
                        pc.mount(Wei�es_Milit�rpferd_VALUE)
                        chat("Du Reittest jezt auf ein  Wei�en Milit�rpferd!")
                    end
                        if mili == 4 then
                        say("Nagut, vielleicht beim n�chsten mal")
                        return
                    end
                end -- der Milit�rpferd Reihe
            
                if pferde == 4 then
                say("Nagut, vielleicht beim n�chsten mal")
                return
            end
        end -- der Pferde Reihe
        
            if bad == 2 then
            say_title("Hey ".. pc.get_name() ..".")
            say("Welches Reittier willst du Benutzen")
            local reittiere = select("Schlachtenl�we","Kriegskeiler","Sturmtiger","Streitwolf","Abbrechen")
        if reittiere == 1 then
            say_reward("Du hast Dein Schlachtenl�we gerufen")
            pc.mount(20113)
            end
        if reittiere == 2 then
            say_reward("Du hast Dein Kriegskeiler gerufen")
            pc.mount(20110)
            end
        if reittiere == 3 then
            say_reward("Du hast Dein Sturmtiger gerufen")
            pc.mount(20112)
            end
        if reittiere == 4 then
            say_reward("Du hast Dein Streitwolf gerufen")
            pc.mount(20111)
            end
        if reittiere == 5 then
            say("Nagut, vielleicht beim n�chsten mal")
            return
            end
        end -- der Reittier Reihe
            
            if bad == 3    then
            say_title("Hey ".. pc.get_name() ..".")
            say("Welches Reittier willst du Benutzen")
            local shadow = select("Runnenl�we","Runnenkeiler","Runnentieger","Runnenwolf","Abbrechen")
        if shadow == 1 then
            say_reward("Du hast Dein Runnenl�we gerufen")
            pc.mount(20115)
            end
        if shadow == 2 then
            say_reward("Du hast Dein Runnenkeiler gerufen")
            pc.mount(20116)
            end
        if shadow == 3 then
            say_reward("Du hast Dein Runnentieger gerufen")
            pc.mount(20117)

            end
        if shadow == 4 then
            say_reward("Du hast Dein Runnenwolf gerufen")
            pc.mount(20118)
            end
        if shadow == 5 then
            say("Nagut, vielleicht beim n�chsten mal")
            return
            end
        end -- der Runnenreittiere Reihe

        if bad == 4    then
            say_title("Hey ".. pc.get_name() ..".")
            say("Welches Reittier willst du Benutzen")
            local besondere = select("Schneel�wen","Lykros","H�llenhund","Elite Gaul","Einhorn","Rackete","Abbrechen")
        if besondere == 1 then
            say_reward("Du hast Dein Schneel�wen gerufen")
            pc.mount(20114)
            end
        if besondere == 2 then
            say_reward("Du hast Dein Lykros gerufen")
            pc.mount(20119)
            end
        if besondere == 3 then
            say_reward("Du hast Dein H�llenhund gerufen")
            pc.mount(20120)

            end
        if besondere == 4 then
            say_reward("Du hast Dein Elite Gaul gerufen")
            pc.mount(20121)
            end
        if besondere == 5 then
            say_reward("Du hast Dein Elite Gaul gerufen")
            pc.mount(20122)
            end
        if besondere == 6 then
            say_reward("Du hast Dein Elite Gaul gerufen")
            pc.mount(20123)
            end
        if besondere == 7 then
            say("Nagut, vielleicht beim n�chsten mal")
            return
            end
        end -- der besondere Reittiere Reihe
    end
end
end

Bei der Quest habe ich gemerkt das ich SEHR gro�e Probleme mit "ends" hab ^^.

03/06/2011 18:36 LiiKeZZ#1617

So habe mal ne RIE�EN QUEST f�r euch ^^

Make.sh bringt folgende meldung:

Quote:

qc in malloc(): error: allocation failed
Abort trap (core dumped)

es geht um folgende quest (ca 44kb gro� ^^)

EDIT: problem gel�st ^^

03/06/2011 19:07 LxR'EsoZiaL#1618

was haste genau da rumgebastelt?

Ich sehe bis jz nur Moddete Maps.

03/06/2011 20:21 LiiKeZZ#1619

habe 3 verschiedene gm quests in ein item verfrachtet :D

rein von der syntax her passt alles ...

03/07/2011 15:10 .ZiPPO#1620

Hey Leute
Ich hab ne frage...
Und zwar mit dieser Quest:

PHP Code:


			
quest Reittier begin
    state start begin
        when 30125.use begin 
        say_title("Zahn des Wei�en L�wen")
        say("")
        local s = select("Wei�en L�wen rufen", "Wei�en L�wen wegschicken")
            if s == 1 then
            affect.remove_collect() 
            horse.ride()
            chat("Du hast dein Wei�en L�wen Erfolgreich gerufen!")
            pc.mount(20114,90000) 
            affect.add_collect(apply.ATT_GRADE_BONUS,250,900)
            affect.add_collect(apply.DEF_GRADE_BONUS,100,900)
        end
        if s == 2 then
            chat("Du hast dein Wei�en L�wen Erfolgreich weg geschickt")
            pc.unmount()
            horse.unsummon()
            affect.remove_collect()
        end
        end
    end
end

Bekommt man ja mehr deff und mehr angriff aber wie kann ich es machen das wen ich wieder absteige die werte weg gehen?
wer es mir richtig beantwortet 20 e*gold...

Page 108 of 845

108