[SERVICE] Die Questerstellung

Page 98 of 248

05/21/2014 13:42 SkyWodka#1456

Wie die frage schon sagt, wer von euch kann gut bis sehr gut Questen?

LG SkyWodka

05/21/2014 15:25 Lord iRemix#1457

Quote:

Originally Posted by callmax

PHP Code:

quest item_give_king begin state start begin when xxx.use begin local callmax = select ("Kriegerking", "Suraking", "Ninjaking", "Schamiking") if callmax == 1 then pc.give_item2(19971) pc.remove_item(xxx,1) elif callmax == 2 then pc.give_item2(19973) pc.remove_item(xxx,1) elif callmax == 3 then pc.give_item2(19972) pc.remove_item(xxx,1) elif callmax == 4 then pc.give_item2(19974) pc.remove_item(xxx,1) end end end

sry f�r den scheiscode, sollte aber gehen, sa� die ganze nacht an meinem client und war jetzt einfach zu m�de das in ne tabelle zu packen.

w�re glaube ich sehr sehr serverlastig, jede chatnachricht durch ne quest checken zu lassen, lieber direkt im src machen

Ziemlich bad.
Sage ja, kannst nicht questen.
Zudem gibt es "elif" nicht in Lua.
Und ihr wollt den neuen DE Run nachgecodet haben? Ihr habt nichtmal if-Statements drauf, haha.

Code:

quest item_give_king begin
	state start begin
		when xxx.use begin
			local callmax_der_noob = select("Kriegerking","Ninjaking","Suraking","Schamiking")
			item.remove()
			pc.give_item2(19970+callmax_der_noob)
		end
	end
end

Und warum im Source checken?
Warum nicht gleich im Client?

05/21/2014 16:55 Idealist.#1458

Hallo,

ich suche 2 verschiedene Regenbogensteinquests...

Der eine Regenbogenstein soll alle Skills auf P setzen.

Und ein Regenbogenstein der Jeweils einen Skill von M1 auf P setzt.

Vnums kann ich selber eintragen.

Dank�� und Lg - Idealist

05/23/2014 10:24 .yorliK#1459

Quote:

Originally Posted by Idealist.

Hallo,

ich suche 2 verschiedene Regenbogensteinquests...

Der eine Regenbogenstein soll alle Skills auf P setzen.

Und ein Regenbogenstein der Jeweils einen Skill von M1 auf P setzt.

Vnums kann ich selber eintragen.

Dank�� und Lg - Idealist

Ich hab jetzt bei jeder die vnum 50512 eingetragen.

M1 -> P

Spoiler

PHP Code:


			
quest regenbogenstein begin
    state start begin
        function BuildPerfectMasterSkillList(job, group)
        GRAND_MASTER_SKILL_LEVEL = 20
        PERFECT_MASTER_SKILL_LEVEL = 40

        local skill_list = special.active_skill_list[job+1][group]
        local ret_vnum_list = {}
        local ret_name_list = {}

        -- test_chat(string.format("job=%d, group=%d", job, group))

        table.foreach(skill_list, 
        function(i, skill_vnum) 
        local skill_level = pc.get_skill_level(skill_vnum)

        -- test_chat(string.format("[%d]=%d", skill_vnum, skill_level))
        if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then

            table.insert(ret_vnum_list, skill_vnum)
            local name=locale.GM_SKILL_NAME_DICT[skill_vnum]
            if name == nil then name=skill_vnum end
            table.insert(ret_name_list, name)
        end
        end)
        return {ret_vnum_list, ret_name_list}


        --return {ret_vnum_list, ret_name_list}
        end
        when 50512.use begin
            local count = pc.count_item(50512)
            pc.setqf("regen_count", count)
            if pc.get_skill_group() == 0 then
                say("Du hast noch keine Fertigkeiten.")
                say("Versuche es sp�ter erneut.")
                return
            end
            local result = regenbogenstein.BuildPerfectMasterSkillList(pc.get_job(), pc.get_skill_group())
            local vnum_list = result[1]
            local name_list = result[2]
            if table.getn(vnum_list) == 0 then
                say("Du hast keine Gro�meister-Fertigkeiten.")
                return
            end
            local menu_list = {}
            table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)
            table.insert(menu_list, "Abbrechen") 
            local s=select_table(menu_list)
            if table.getn(menu_list) == s then
                return
            end
            local skill_name=name_list[s]
            local skill_vnum=vnum_list[s]
            say("M�chtest du "..skill_name.." wirklich auf P skillen?")
            if select("Ja", "Nein")==2 then return end
            if pc.count_item(50512) == pc.getqf("regen_count") then
                pc.set_skill_level(skill_vnum, 40)
                say(skill_name.." wurde auf Perfekten Meister gesetzt.")
            else
                say("Buguser bekommen keine P-Skills ! ")
            end
            pc.remove_item(50512, 1)
        end
    end
end

und alles P

Spoiler

_________________________________

Quote:

Originally Posted by Lightbox

1. Brauche eine Quest die das Pfred steigert aber nur bis Level 11.
Und man soll pro Level Up des Pferdes also von Level 0 bis 11 pro Level 2kk Bezahlen.

2. Brauche eine Quest die dir eine Verwandlungs Kugel gibt von einem Mob (VNUM muss man eintragen)
Und die Quest sollte ca 10 Seiten lang sein und Pro Seite 5 Mobs.
Und die Quest sollte immer wieder kommen nach einem kick/einloggen/porten etc...

Spoiler

2. Ist nicht so m�glich ( mir ist nichts bekannt )

Quote:

Originally Posted by nico_w

VWKs haben ne feste vnum (item ID) allerdings werden die Mobs, in die man sich durch diese verwandelt, in der DB (player -> item) bei socket oder attrvalue festgelegt...
L�sst man diese leer, hat man ne leere VWK, die so ziemlich nutzlos ist
Erstellen kann man VWKs �ber /polyitem oder halt indem man sie droppt, das ganze ist fest in den SF eingebaut... Also nich als Quest.

Wenn es sich inzwischen ge�ndert hat, w�rde ich mich auch freuen aufgekl�rt zu werden.

05/24/2014 13:50 Silba24#1460

So mal ne kleine Idee die mir ne Weile im Kopf rumschwirrt:

Bioquest:
-ab lvl 30
- Text: Ich untersuche Orkz�hne, verpr�gel Schwarze Orks
-Suche 10 Orkz�hne (dropp: Schwarzer Ork OT)
-Man kann alle 2h einen abgeben
-30% failen
-Nach 10 Orkz�hne Seelenstein vom Obrerork holen

Belohnung:
Infotext:
DU hast die M�glichkeiten aus 3 Kategorien zu w�hlen
PVM: du wirst im PVM gest�rkt, aber im PVP geschw�cht
PVP: du wirst im PVP gest�rkt, aber im PVM geschw�cht
Item: EIn n�tzliches Item werde ich dir mit auf den Weg geben
W�hle Schlau

W�hlen aus 3 Kategorien
1. PVM Bonis:
Man bekommt random eins zugewiesen
- +10% Monster, -5% Halbmenschen
- +5% Teufel, -5% Magiewiederstand
- 20% Orks, -10% Einhanddeff

2. PVP Bonis:
Man bekommt random eins zugewiesen
- +10% Halbmenschen, - 20% Monster
- +10% Zweihanddef, - 30% Teufel
- + 5% Magiewiederstand, -2000 TP

3. Random Item:
Man bekommt random eins zugewiesen
- 10 Seelensteine
- 1 Regenbogenstein
- Giftschwert+9
- 10 Zen-Bohnen

05/24/2014 17:17 PlayaStylee#1461

Hallo Brauche ne quest f�r Gilden Die Leute die Gilden haben mids 5 Leute K�nnen dann in denn Gilden map rein porten die index von denn map ist 687 und npc 25045

05/24/2014 22:44 thawny#1462

Hi , can you help me with a killgui db quest?
i try quest

Spoiler

but isn't work.

05/25/2014 00:14 thespeedyy#1463

PHP Code:


			
quest gm_list begin 

    state start begin 

        function DoSomething()

            if gms==nil then

                gms = gms or {}

                local sel=mysql_query('select mName from common.gmlist')

                for _,value in next,sel do

                    table.insert(gm,value[1])

                    cmdchat('SetTeamOffline '..value[1])

                end

            else

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

                    local name = gms[i]

                    if game.get_event_flag(name)==0 then

                        cmdchat('SetTeamOffline '..name) 

                    else

                        cmdchat('SetTeamOnline '..name)

                    end

                end 

            end

        end

        when login begin 

            gm_list.DoSomething()

            loop_timer("check_gm", 10) 

        end 

        when check_gm.timer begin 

            gm_list.DoSomething()

        end 

        when login with pc.is_gm() begin 

            local name = pc.get_name() 

            game.set_event_flag(name, 1) 

        end 

        when logout with pc.is_gm() begin 

            local name = pc.get_name() 

            game.set_event_flag(name, 0) 

        end 

    end 

end

mein problem ist er lie�t trotzdem die namen nicht.. :/

05/25/2014 07:19 .J3lυє#1464

Quote:

Originally Posted by Kilroy.

Ich hab jetzt bei jeder die vnum 50512 eingetragen.

M1 -> P

Spoiler

PHP Code:

quest regenbogenstein begin     state start begin         function BuildPerfectMasterSkillList(job, group)         GRAND_MASTER_SKILL_LEVEL = 20         PERFECT_MASTER_SKILL_LEVEL = 40         local skill_list = special.active_skill_list[job+1][group]         local ret_vnum_list = {}         local ret_name_list = {}         -- test_chat(string.format("job=%d, group=%d", job, group))         table.foreach(skill_list,         function(i, skill_vnum)         local skill_level = pc.get_skill_level(skill_vnum)         -- test_chat(string.format("[%d]=%d", skill_vnum, skill_level))         if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then             table.insert(ret_vnum_list, skill_vnum)             local name=locale.GM_SKILL_NAME_DICT[skill_vnum]             if name == nil then name=skill_vnum end             table.insert(ret_name_list, name)         end         end)         return {ret_vnum_list, ret_name_list}         --return {ret_vnum_list, ret_name_list}         end         when 50512.use begin             local count = pc.count_item(50512)             pc.setqf("regen_count", count)             if pc.get_skill_group() == 0 then                 say("Du hast noch keine Fertigkeiten.")                 say("Versuche es sp�ter erneut.")                 return             end             local result = regenbogenstein.BuildPerfectMasterSkillList(pc.get_job(), pc.get_skill_group())             local vnum_list = result[1]             local name_list = result[2]             if table.getn(vnum_list) == 0 then                 say("Du hast keine Gro�meister-Fertigkeiten.")                 return             end             local menu_list = {}             table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)             table.insert(menu_list, "Abbrechen")             local s=select_table(menu_list)             if table.getn(menu_list) == s then                 return             end             local skill_name=name_list[s]             local skill_vnum=vnum_list[s]             say("M�chtest du "..skill_name.." wirklich auf P skillen?")             if select("Ja", "Nein")==2 then return end             if pc.count_item(50512) == pc.getqf("regen_count") then                 pc.set_skill_level(skill_vnum, 40)                 say(skill_name.." wurde auf Perfekten Meister gesetzt.")             else                 say("Buguser bekommen keine P-Skills ! ")             end             pc.remove_item(50512, 1)         end     end end

und alles P

Spoiler

PHP Code:

quest regenbogenstein_all begin     state start begin         when 50512.use begin             say_title("Perfekter Meister")             say("")             say("Alle deine fertigen auf Perfekten")             say("Meister setzen?")             if select("Ja","Nein")==2 then return end             tables =                     {                         {                             { 1, 2, 3 , 4 , 5 },                             { 16, 17, 18, 19, 20 }                         },                         {                             { 31, 32, 33, 34, 35 },                             { 46, 47, 48, 49, 50 }                         },                         {                             { 76, 77, 78, 79, 80, 81 },                             { 61, 62, 63, 64, 65, 66 }                         },                         {                             { 106, 107, 108, 109, 110, 110 },                             { 91, 92, 93, 94, 95, 96 }                         }                     }             job = pc.get_job()+1             skill = pc.get_skill_group()             for i=1, table.getn(tables[job][skill]), 1 do                 pc.set_skill_level(tables[job][skill][i], 59)             end             pc.remove_item(50512, 1)         end     end end

_________________________________

1.

Spoiler

PHP Code:

quest horse_leveln_lightbox begin     state start begin         when 20349.chat."Pferd steigern (2kk)" begin             say_title(mob_name(20349))             say("")             say("Hallo "..pc.get_name()..",")             say("")             say("Ich kann dein Pferd bis Lv11 steigern.")             say("Jedes Pferde-Level kostest dich 2kk Gold.")             say("")             say_reward("Soll ich dein Pferd steigern?")             if select("Ja, bitte","Nein, sp�ter")==2 return end             if horse.get_level()>=11 then syschat("Dein Pferd ist Lv"..horse.get_level()..", es kann also nicht mehr gesteigert werden.") return end             if pc.get_money()< 2000000 then syschat("Du hast nicht genug Gold, um dein Pferd steigern zulassen.") return end             horse.advance()             pc.change_money(-2000000)             syschat("Das Steigern deines Pferdes wurde erfolgreich durchgef�hrt. Pferdelevel: "..horse.get_level())         end     end end

2. Ist nicht so m�glich ( mir ist nichts bekannt )

Wenn es sich inzwischen ge�ndert hat, w�rde ich mich auch freuen aufgekl�rt zu werden.

zum 2. es ist M�glich Holy-Network hatte sowas sowie eDg und noch ein server der mir nicht einf�llt. jedoch war es Via Item oder NPC. M�glich ist es ^^ wie kp vlt nen befehl der jmd in was verwandelt ^^ sollte es ja geben.

P.s. Holynetwork, eDg & Shizuka3 hatten sowas ^^

05/25/2014 21:50 Chritation#1465

Hey, ich hab hier ne Drop-Item-Quest bei der man einstellen kann, welche Items man von welchem Monster bekommt. Leider kann man nur 1 Item gleichzeitig droppen. Kann das irgendjemand um�ndern ? w�re mega geil :) Hier die Quest :

Spoiler

05/26/2014 12:30 R4G3N#1466

Quote:

Originally Posted by Chritation

Hey, ich hab hier ne Drop-Item-Quest bei der man einstellen kann, welche Items man von welchem Monster bekommt. Leider kann man nur 1 Item gleichzeitig droppen. Kann das irgendjemand um�ndern ? w�re mega geil :) Hier die Quest :

PHP Code:


			
quest dropps begin

    state start begin

        function drop_item_quest(drop)

            local droppanzahl = table.getn(drop)

            for i = 1, droppanzahl, 1 do

                if pc.get_level() >= drop[i][4] and pc.get_level() <= drop[i][5] then

                    local wurf = math.random()

                    if wurf <= (drop[i][1]/100) then

                        game.drop_item_with_ownership(drop[i][2],drop[i][3])

                    end

                end

            end

        end

--[[ Beispiel:

        

        when 101.kill begin

            drop = 

            {

            {1,189,10,0,130},

            {4,189,10,0,130},

            }

            dropps.drop_item_quest(drop)

        end

        

        Erkl�rung:

        

        when 101.kill begin

        

        when [Monster Vnum].kill begin

        

        {Wahrscheinlichkeit in % , Item Vnum , Anzahl , Min. Lvl , Max. Lvl}

        {1                       , 189       , 10     , 0        , 130     }

]]--

05/26/2014 22:47 .J3lυє#1467

1.) Das wenn ich mein Haustierrufe statt Raptor's Pferd dort steht Raptor's Panda (ich w�rde es ja �ndern aber leider steht sowas nicht in der pet quest)

2.) ne Quest wo man den Haustieren Bonis zuweisen kann

W�re nett wenn das jemand machen k�nnte :)
MfG

05/27/2014 12:37 Chritation#1468

Code:

quest dropps begin
    state start begin
        function drop_item_quest(drop)
            local droppanzahl = table.getn(drop)
            for i = 1, droppanzahl, 1 do
                if pc.get_level() >= drop[i][4] and pc.get_level() <= drop[i][5] then
                    local wurf = math.random()
                    if wurf <= (drop[i][1]/100) then
                        game.drop_item_with_ownership(drop[i][2],drop[i][3])
                    end
                end
            end
        end
--[[ Beispiel:
        
        when 101.kill begin
            drop = 
            {
            {1,189,10,0,130},
            {4,189,10,0,130},
            }
            dropps.drop_item_quest(drop)
        end
        
        Erkl�rung:
        
        when 101.kill begin
        
        when [Monster Vnum].kill begin
        
        {Wahrscheinlichkeit in % , Item Vnum , Anzahl , Min. Lvl , Max. Lvl}
        {1                       , 189       , 10     , 0        , 130     }
]]--

Sry kenn mich leider nicht so gut aus :/ wo muss ich nun deinen Beispiel-Code einf�gen ?
Kann mir jemand so 2 Beispielsmobs schon direkt in den Code einf�gen ? :)

05/27/2014 17:32 Noa_#1469

Quote:

Originally Posted by Chritation

Code:

quest dropps begin
    state start begin
        function drop_item_quest(drop)
            local droppanzahl = table.getn(drop)
            for i = 1, droppanzahl, 1 do
                if pc.get_level() >= drop[i][4] and pc.get_level() <= drop[i][5] then
                    local wurf = math.random()
                    if wurf <= (drop[i][1]/100) then
                        game.drop_item_with_ownership(drop[i][2],drop[i][3])
                    end
                end
            end
        end
--[[ Beispiel:
        
        when 101.kill begin
            drop = 
            {
            {1,189,10,0,130},
            {4,189,10,0,130},
            }
            dropps.drop_item_quest(drop)
        end
        
        Erkl�rung:
        
        when 101.kill begin
        
        when [Monster Vnum].kill begin
        
        {Wahrscheinlichkeit in % , Item Vnum , Anzahl , Min. Lvl , Max. Lvl}
        {1                       , 189       , 10     , 0        , 130     }
]]--

Sry kenn mich leider nicht so gut aus :/ wo muss ich nun deinen Beispiel-Code einf�gen ?
Kann mir jemand so 2 Beispielsmobs schon direkt in den Code einf�gen ? :)

PHP Code:


			
quest dropps begin

    state start begin

        when kill with not npc.is_pc() begin

            local Einstellung = {

                {-- erstes monster 

                    ["Monster"] = 101,

                    ["Droppchance"] = 1,

                    ["Item"] = 189,

                    ["Anzahl"] = 1,

                    ["MinLevel"] = 0,

                    ["MaxLevel"] = 130,

                },

                {-- Zweites monster, nach dem ersten schema(das komma nach jedem wert nicht vergessen)

                    ["Monster"] = 

                    ["Droppchance"] = 

                    ["Item"] = 

                    ["Anzahl"] =

                    ["MinLevel"] =

                    ["MaxLevel"] =

                },

                {--Drittes monster, nach dem 1 & 2ten schema

                    ["Monster"] = ...

                },

                

            }

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

                local tabelle = Einstellung[i]

                if npc.get_race() == tabelle["Monster"] then

                    if pc.get_level() >= tabelle["MinLevel"] and pc.get_level() <= tabelle["MaxLevel"] then

                        if math.random()<= tabelle["Droppchance"] then

                            game.drop_item_with_ownership(tabelle["Item"],tabelle["Anzahl"])

                        end

                    end

                end

            end

        end

    end

end

05/27/2014 19:43 .J3lυє#1470

Quote:

Originally Posted by .Rαρтor

1.) Das wenn ich mein Haustierrufe statt Raptor's Pferd dort steht Raptor's Panda (ich w�rde es ja �ndern aber leider steht sowas nicht in der pet quest)

2.) ne Quest wo man den Haustieren Bonis zuweisen kann

W�re nett wenn das jemand machen k�nnte :)
MfG

^
l
l

Page 98 of 248