[SERVICE] Die Questkontrolle

Page 125 of 845

125

04/05/2011 00:31 Brodan#1861

Hab mich an eine Pvp-Quest gewagt, leider bekomme ich keine Questrolle wenn ich mich mit einem Char �ber Lv90 einlogge.. :s

Hier die Quest:

Spoiler

PHP Code:


			
quest PvP-Quest begin

    state start begin

        when login with pc.level >= 90 begin

            set_state(PvP-Quest)

        end

    end



    state PvP-Quest begin

        when letter begin

            send_letter("PvP-Quest")

        end



        when button or info begin

            say_title("PvP-Quest")

            say("Es wird Zeit dass du zeigst")

            say("was in dir steckt!")

            say("Zeige es uns indem du 100")

            say("Spieler besiegst!")

            say_reward("Besiege 100 Spieler!")

            say("")

            pc.setqf("state", 100)

            q.set_counter("kills", 100)

            set_state (kill)

        end

    end

      

        state kill begin

        when letter begin

            send_letter("Besiege Spieler")

        end

        

        when button or info begin

            say_title("Besiege Spieler")

            say_reward( "Du musst noch ".." "..pc.getqf("state").."von 100 t�ten")

            say("")

        end



        when kill begin

            if npc.is_pc() and npc.empire != pc.empire then 

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

            if count <= 1 then

                pc.setqf("state", count)

                q.set_counter("kills", -count)

            end

            if count == 0 then

                say_title("Du hast es geschafft")

                say("100 Spieler zu besiegen!")

                say("Du erh�lst f�r deine M�hen:")

                say_reward("Eine Mysteri�se Truhe,")

                say_reward("5000 Rank")

                say_reward("Au�erdem:")

                say_reward("500000000 Yang")

                pc.change_money(500000000)

                pc.give_item2(50126, 1)

                pc.change_alignment(5000)

                notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")

                notice_all("er/sie hat 100 Spieler get�tet, Gl�ckwunsch!")

                clear_letter()

                set_state(__COMPLETE__)



            end

        end

    end

    end



    state __COMPLETE__ begin

    end

end

04/05/2011 18:29 .ReDDoX�#1862

@ [Only registered and activated users can see links. Click Here To Register...]:

Versuchs mal so:

Spoiler

@ [Only registered and activated users can see links. Click Here To Register...]:

Ich verstehe nicht ganz was du mit der Quest amchen willst... o.�

04/05/2011 19:58 Grevenbroicher#1863

Quote:

@ [Only registered and activated users can see links. Click Here To Register...]:

Ich verstehe nicht ganz was du mit der Quest amchen willst... o.�

Er m�chte Eine Willkommens / Starterset Quest gemischt machen wie die Quest aufgebaut ist kommt mir nur das in den Ged<nken!

04/05/2011 20:29 .ReDDoX�#1864

Quote:

Originally Posted by Grevenbroicher

Er m�chte Eine Willkommens / Starterset Quest [...] machen

Ja, das wei� ich auch...
Aber ich verstehe nicht was er mit dem "local item = 19" und so will...

04/05/2011 20:29 abdulk68#1865

Wei� ned Ob es hir rein geh�rt aber naja ich versuchs mal :D

Hir meine quest :

Spoiler

Ich will das mein WarpRing net mehr verschwindet nach dem benutzen was muss ich da eintragen o: ?

04/05/2011 20:31 .Delta#1866

Quote:

Originally Posted by abdulk68

Wei� ned Ob es hir rein geh�rt aber naja ich versuchs mal :D

Hir meine quest :

Spoiler

quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin

if pc.countitem("70007")>=1 then
pc.removeitem("70007", 1)
end

say_title("Ring:")
say("Dies ist eine faszinierende Gegend. Aber")
say("passiert hier denn auch mal etwas")
say("Au�ergew�hnliches? Eher wohl nicht. In anderen")
say("Teilen des Landes sieht es mitunter ganz anders.")
say("aus! Es gibt daher sicher einen intressanten")
say("Ort, an den ich dich teleportieren k�nnte. Da")
say("jedoch die Kr�fte des B�sen wieder st�rker")
say("geworden sind, wurden Raum und Zeit ins Chaos")
say("gest�rzt. Dadurch kann es passieren, dass deine")
say("R�ckkehr nicht immer augenblicklich funktioniert.")
say("M�chtest du dennoch teleportiert werden?")

local main_set = select("Ja","Nein")
if main_set == 2 then
return
end

if pc.get_level() <= 10 then
say_title("Ring:")
say("Hm� Mit deinem derzeitigen Level bist du noch")
say("zu schwach f�r die Reise durch Zeit und Raum.")
say("Komm wieder, wenn du h�her als Level 10 bist.")
return
end

local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()

say_title("Ring:")
say("Wohin m�chtest du teleportiert werden?")

-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then

local guild_map_names = {
"Gildenzone",
"Gildenzone",
"Gildenzone",
}

guild_map_name = guild_map_names[empire]
local empire_castle={
"Burgschlacht",
"Burgschlacht",
"Burgschlacht",
}
empire_castle =empire_castle[empire]
local sub_set = 0
if level < 60 then -- 60?? : ?????, ???, ????, ???
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-W�ste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
return
end

else -- 61?? : ????, ???, ????, ????
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-W�ste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin m�chtest du teleportiert werden?")
sub_set = select("Doyyumhwaji", "D�monenturm", "Zur�ck", "Abbrechen") + 5
if sub_set == 9 then -- ??
return
end
if sub_set == 8 then -- ??
say_title("Teleporter:")
say("Wohin m�chtest du teleportiert werden?")
--- l
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-W�ste", "Berg Sohan", empire_castle,"Andere Gebiete")
if sub_set == 6 then -- ??
say_title("Teleporter:")
say("Wohin m�chtest du teleportiert werden?")
sub_set = select("Doyyumhwaji", "D�monenturm", "Abbrechen") + 5
if sub_set == 8 then -- ??
return
end
end
end
end
end

local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
--empire_castle
{
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title("Ring:")
say("Achtung, ich teleportiere dich jetzt. Du wirst")
say("an einem gef�hrlichen Ort landen, also pass auf")
say("dich auf. Viel Gl�ck!")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])

else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3

--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
if empire==1 then
sub_set2 = select("Yongan","Jayang" , locale.cancel)
elseif empire ==2 then
sub_set2 = select("Joan","Bokjung" , locale.cancel)
elseif empire ==3 then
sub_set2 = select("Pyungmoo","Bakra" , locale.cancel)
end
if sub_set2 != 3 then
if sub_set2 == 1 then
say_title("Ring:")
say("Ich teleportiere dich dorthin.")
wait()

if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
elseif sub_set2 == 2 then
say_title("Ring:")
say("Ich teleportiere dich dorthin.")

wait()
if empire == 1 then
pc.warp(353100,882900)
elseif empire == 2 then
pc.warp(145500,240000)
elseif empire == 3 then
pc.warp(863900,246000)
end
end -- end sub set check2 if
end -- end sub set check1 if
end -- end map check if
end -- end when use item
end -- end state start
end -- end quest warpring

Ich will das mein WarpRing net mehr verschwindet nach dem benutzen was muss ich da eintragen o: ?

look in deinen Thread, hab dir grade geantworet :)

04/05/2011 20:54 xMichiix#1867

PHP Code:


			
quest reittiere begin

    state start begin

        when 20110.kill begin

            local drop = number(1, 5)

                if drop <= 80 then

                pc.give_item2(71114, 1)

                chat("Du hast ein Siegel erhalten!")

                end

            end

        when 20111.kill begin

            local drop = number(1, 5)

                if drop <= 80 then

                pc.give_item2(71116, 1)

                chat("Du hast ein Siegel erhalten!")

                end

            end

        when 20112.kill begin

            local drop = number(1, 5)

                if drop <= 80 then

                pc.give_item2(71118, 1)

                chat("Du hast ein Siegel erhalten!")

                end

            end

        when 20113.kill begin

            local drop = number(1, 5)

                if drop <= 80 then

                pc.give_item2(71120, 1)

                chat("Du hast ein Siegel erhalten!")

                end

            end

                when 8028.kill begin

                chat("Man droppt erst mit lvl 100 was!")

            local drop = number(1, 5)

                if drop <= 100 then

                game.drop_item(71113, 1)

                game.drop_item(71115, 1)

                game.drop_item(71117, 1)

                game.drop_item(71119, 1)

                game.drop_item(11299, 1)

                game.drop_item(11499, 1)

                game.drop_item(11699, 1)

                game.drop_item(11899, 1)

                game.drop_item(28900, 1)

                game.drop_item(28901, 1)

                game.drop_item(28902, 1)

                game.drop_item(28903, 1)

                game.drop_item(28904, 1)

                game.drop_item(28905, 1)

                game.drop_item(28906, 1)

                game.drop_item(28907, 1)

                game.drop_item(28908, 1)

                game.drop_item(28909, 1)

                game.drop_item(28910, 1)

                game.drop_item(28911, 1)

                game.drop_item(28912, 1)

                game.drop_item(28913, 1)

                game.drop_item(279, 1)

                game.drop_item(4049, 1)

                game.drop_item(5149, 1)

                game.drop_item(7199, 1)

                game.drop_item(2199, 1)

                game.drop_item(3179, 1)

            local x = pc.get_local_x()

            local y = pc.get_local_y()

            chat("Du hast den Wei�en L�wen gefunden!")

            mob.spawn(20114, x, y, 1)

            end

        end

    end

end

naja poste nochmal die quest da ja keiner sie beantwortet hat ;)

wen ich den metin klopp und er down geht spwant kein wei�er l�we... und die Reittier siegel droppt man bei jeden gekillten mob wollte aber das es zuf�hlig gedroppt wird also chance 1%

04/05/2011 20:58 Lowwer#1868

Ahja. Hab einfach nur die 2 Quests zusammengemischt. Gro�artig habe ich da nichts gescriptet. Naja aufjedenfall denke ich mal. Das mit "local item = 19" bedeutet, dass Krieger u. Sura Schwert bekommen. ^_^ Kann man nat�rlich wie bei Schami u. Ninja machen. :)

04/05/2011 21:00 .Delta#1869

Quote:

Originally Posted by .ReDDoX�

Ja, das wei� ich auch...
Aber ich verstehe nicht was er mit dem "local item = 19" und so will...

Er legt einfach eine Variable fest^^
unten schreibt er dann ja auch pc.give_item2(item)
Wobei das bei einer so kurzen quest eigentlich so gut wie keine Schreibarbeit erpart :D

@ Michi:
du z�hlst mit number(1, 5) nur zwischen 1 bis 5. Wenn du nun die Bedingung festlegst if drop <= 80 then, dann ist die zhl immer darunter, also if immer erf�llt.
Versuchs mal mit if drop == 1 then, und teste obs geht.
Wegen dem Metin: leg die drops doch lieber in der mob_drop_item fest. ist viel geschickter als in ner Quest.

04/05/2011 21:15 xMichiix#1870

ehm aber wen ich sie in der mob_drop_item fest lege gehts nicht .... dann droppt der metin nicht und noch was der metin spawnt nicht ...xD

04/06/2011 15:48 BL00DSTYL3#1871

Hab den Quest mehrmals probiert (bearbeitet) aber der funkt bei immer nicht
JA ICH HABE MAKE.sh ausgef�hrt :D

PHP Code:


			
quest Drachen_Land begin
 state start begin
        when 20086.chat."Drachen-Map" begin
            if pc.get_level() <= 74 then
                say("Dein Level ist zu niedrig")
                say("um in die Drachen-Map")
                say("zu gelangen.Du musst Lvl 75 erreicht haben!")
                say("")
                return
            end
            if pc.get_level() >= 75 then
                say_title("New-Map-Frau")
                say("Du hast LvL 75 ereicht")
                say("und bist stark gennug!")
                say("Soll ich dich in")
                say("die Drachen-Map teleportieren?")
                say("")
                local b = select("Ja", "Nein")
                if b == 1 then
                    pc.warp(83200, 0)
                elseif b == 2 then
                    say_title("New-Map-Frau")
                    say("")
                    say("oke..wie du meinst.")
                    return
                end
            end
        end
    end
end

LG Blood

04/06/2011 16:20 .ReDDoX�#1872

@ [Only registered and activated users can see links. Click Here To Register...]:

Hier:

Spoiler

04/06/2011 16:47 Lowwer#1873

Kann man denn eigtl eine "Begr��ungsquest" und eine "Itemquest" zusammenmischen ? ^_^

04/06/2011 16:53 .ReDDoX�#1874

Quote:

Originally Posted by Lowwer

Kann man denn eigtl eine "Begr��ungsquest" und eine "Itemquest" zusammenmischen ? ^_^

Wie meinst du...?
Gib mal ein Beispiel was du dir vorstellst ^^

04/06/2011 17:33 Lowwer#1875

Ja ehm also. Ich will eben, dass wenn ein Spieler sich zum ersten Mal auf mein Server einlogt, als Sura und Krieger Schwert +9 bekommt. Ninjas bekommen Dolche und Schamane bekommen F�cher. Dazu bekommt jeder diese Items und ein Pferdelevel.

PHP Code:


			
                    pc.give_item2(item)
                    pc.give_item2(27002,200 )
                    pc.give_item2(72702,1 )
                    pc.give_item2(80009,1 )
                    pc.give_item2(71004,1 )
                    pc.give_item2(71017,1 )
                    pc.give_item2(70038,20 )
                    pc.give_item2(2500,1 )
                    pc.give_item2(50054,10 )
                    horse.set_level("1")

Nun wollte ich aber noch dazu, diesen Text hier haben.

PHP Code:


			
                    say_title("Willkommensgru�")
                    say("")
                    say("Hallo Neuling!")
                    say("Viele spannende Abenteuer und starke")
                    say("Monster werden dich hier in der Welt")
                    say("von ---- erwarten. Hier wirst du")
                    say("in einer angenehmen Atmosph�re spielen")
                    say("k�nnen und Spa� haben. Am Besten")
                    say("beginnst du deine Reise sofort und suchst")
                    say("Herausforderungen. Zum Start haben wir dir")
                    say("ein kleines Starterpaket gegeben, darunter")
                    say("auch ein Pferd.")
                    wait()
                    say("Es werden dich viele neue Sachen")
                    say("hier erwarten. Neue Items, neue Monster,")
                    say("neues Equipment und vieles mehr.")
                    say("")
                    say("Es gibt neue Event-Maps, sowie ein")
                    say("Handelsgebiet und eine Erholungswiese.")
                    say("Aber wir wollen dich nicht gro� von")
                    say("deinem gro�em Abenteuer ablenken.")
                    say("Beginne deine Reise!")
                    wait()
                    say("~")
                    say_item_vnum(2)
                    say("~")

Page 125 of 845

125