[SERVICE] Die Questkontrolle

Page 527 of 845 « First 27427477517525526 527 528529537577627 Last »
04/13/2013 10:06 ©by Noa#7891
PHP Code:
quest welcome begin 
    state start begin 
        when login with pc.get_level() >= 0 begin 
            if pc.getqf("welcome") == 0 then 
                pc.setqf("welcome", 1)  
                notice_all("Wir begrüssen "..pc.get_name()..", als neuen "..({"Krieger","Ninaj","Sura","Schamane"})[pc.job+1].." auf SERVERNAME.") 
                notice_all("Er ist im "..({"Roten","Gelben","Blauen"})[pc.get_empire()].." Reich!") 
            end
        end
    end
end 
04/13/2013 10:08 G.I Duke#7892
Quote:
Originally Posted by R3laXFrEaK View Post
PHP Code:
quest GruenTiger begin   
     state start begin   
         when 20349.chat"Reittiere" begin
            say_title("Reittiere")
            say("Wilst du ein Reittier Reiten ?")
            local main_set = select("Ja","Nein")
            if main_set == 2 then
                return
            end
            local sub_set = select("Tieger","Löwe","Abbrechen","" )
            
            
            
            if sub_set == 1 then
            local sub_set = select("Weißer Tieger","Grünner Tieger","Schwarzer Tieger","Goldener Tieger","Roter Tieger","Blauer Tieger","Abbrechen","" )
            end
            if sub_set == 6 then
            affect.remove_collect()           
            pc.mount(20120,28800)
            pc.mount_bonus(apply.EXP_DOUBLE_BONUS,20,28800)
            pc.mount_bonus(apply.ATT_GRADE_BONUS,50,28800)
            end
            if sub_set == 5 then
            affect.remove_collect()           
            pc.mount(20121,28800)
            pc.mount_bonus(apply.EXP_DOUBLE_BONUS,20,28800)
            pc.mount_bonus(apply.ATT_GRADE_BONUS,50,28800)
            end
            if sub_set == 4 then
            affect.remove_collect()           
            pc.mount(20122,28800)
            pc.mount_bonus(apply.EXP_DOUBLE_BONUS,20,28800)
            pc.mount_bonus(apply.ATT_GRADE_BONUS,50,28800)
            end
            if sub_set == 3 then
            affect.remove_collect()           
            pc.mount(20124,28800)
            pc.mount_bonus(apply.EXP_DOUBLE_BONUS,20,28800)
            pc.mount_bonus(apply.ATT_GRADE_BONUS,50,28800)
            end
            if sub_set == 2 then
            affect.remove_collect()           
            pc.mount(20123,28800)
            pc.mount_bonus(apply.EXP_DOUBLE_BONUS,20,28800)
            pc.mount_bonus(apply.ATT_GRADE_BONUS,50,28800)
            end
            if sub_set == 1 then
            affect.remove_collect()           
            pc.mount(20125,28800)
            pc.mount_bonus(apply.EXP_DOUBLE_BONUS,20,28800)
            pc.mount_bonus(apply.ATT_GRADE_BONUS,50,28800)
    end  
end 
wie wäre es wenn du deine Quests mit einer Fehlerbeschreibung
postest und nicht immer nur die Quests..
die einzigsten Fehler die ich erstmal erkennen kann sind
deine krassen Rechtschreibfehler..
04/13/2013 11:21 .Despero™#7893
Quote:
Originally Posted by ©by Noa View Post
PHP Code:
quest welcome begin 
    state start begin 
        when login with pc.get_level() >= 0 begin 
            if pc.getqf("welcome") == 0 then 
                pc.setqf("welcome", 1)  
                notice_all("Wir begrüssen "..pc.get_name()..", als neuen "..({"Krieger","Ninaj","Sura","Schamane"})[pc.job+1].." auf SERVERNAME.") 
                notice_all("Er ist im "..({"Roten","Gelben","Blauen"})[pc.get_empire()].." Reich!") 
            end
        end
    end
end 
Geht es auch damit dort in Rot für Er ist im (in Rot) Roten Reich ? Steht
04/13/2013 11:54 Fliegex3#7894
Hallo, ich habe ein Problem mit einer Frucht des Lebens Quest.
Ich möchte das man mit 20.000 Rang (Ritterlich) keine Frucht mehr nehmen kann und dann im Chat steht du hast schon den maximalen Rang.
PHP Code:
quest frucht begin
    state start begin
        when 71107.use begin
            if get_time() > pc.getqf("frucht") then
            pc.change_alignment(2000)
            pc.setqf("frucht", get_time()+ 3600)
            notice("Sie haben 2000 Rang erhalten.")
            pc.remove_item("71107", 1)
            else
            notice("Sie müssen zwischen jeder Frucht 1 Stunden warten.")
            end
            
        end
    end
end 
04/13/2013 13:27 LikeCranK™#7895
Quote:
Originally Posted by .Weezy™ View Post
Geht es auch damit dort in Rot für Er ist im (in Rot) Roten Reich ? Steht
Nee soweit ich weiß kannst du im Notice oben keine Farben einbauen..
04/13/2013 13:32 G.I Duke#7896
Hey Leuts hab auch mal ein Problem mit dieser Quest:

Mein Problem ist dass in diesem Ausschnitt
PHP Code:
                        pc.setqf("pvp_exp", c)
                        q.set_counter("PvP-Kills", c)
                        for i=1, table.getn(pvp), 1 do
                                if count == pvp[i][1] then
                                        notice_all(pc_name.." hat "..count.." Morde begangen!")
                                        bonus_exp = pvp[i][2]
                                        break
                                end
                        end 
Er nennt mir immer einen Kill mehr wie in der Tabelle angegeben..
z.B
pc_name.." hat 11 Morde begangen!
oder
pc_name.." hat 26 Morde begangen!

wobei die Tabelle ja das beinhaltet
PHP Code:
                        local pvp = {
                                {10, 10000},
                                {25, 25000},
                                {50, 50000},
                                {75, 75000},
                                {100, 100000},
                                {125, 125000},
                                {150, 150000},
                                {175, 175000},
                                {200, 200000},
                        } 
In der Info werden die richtigen Kills angezeigt.. woran liegt das wo
ist der Fehler? Kann mir wer da helfen oder sieht in Jemand direkt?
04/13/2013 15:29 'venToX#7897
Hallo Epvp,
ich habe ein Problem bei meiner Quest & da ich ein Neu in der Metin2 Section bin,
hab ich auch keinerlei Ahnung wo der Fehler liegt.
Der Fehler [Only registered and activated users can see links. Click Here To Register...]
Die Quest:
PHP Code:
quest lvl begin
    state start begin
        when 80008.use begin
            say_title("Level150")
            say_reward("Durch dieses Item erreichst du das End Level.")
        local main_set = select("Ja","Nein")
            if main_set == 2 then
            return
            end
            chat("Du wirst auf Level gestufft 150.")
            while pc.get_level()<150 do
            pc.give_exp(1)
            end
        end
    end
end 
Die Quest soll bewirken , dass man über das Item auf Level 150 gesetzt wird.
€: Auf das Item kann ich drücken, bloß wenn ich auf JA drücke Hängt das Metin2 Fenster & in V Box kommt der oben genante Fehler.

PS: Wäre echt Nett, wenn ihr mir eine Fehler freie Quest per privat Nachricht Schicken würdet oder sie im Thread postet.
04/13/2013 17:06 ©by Noa#7898
PHP Code:
quest lvl begin
    state start begin
        when 80008.use begin
            say_title("Level150")
            say_reward("Durch dieses Item erreichst du das End Level.")
            if select("Ja","Nein")==2 then return end
            chat("Du wirst auf Level gestufft 150.")
            while pc.get_level()<150 do
                pc.give_exp2(pc.get_next_exp())
            end
        end
    end
end 
04/13/2013 19:33 G.I Duke#7899
Quote:
Originally Posted by .мαяfυ™ View Post
Hey Leuts hab auch mal ein Problem mit dieser Quest:

Mein Problem ist dass in diesem Ausschnitt
PHP Code:
                        pc.setqf("pvp_exp", c)
                        q.set_counter("PvP-Kills", c)
                        for i=1, table.getn(pvp), 1 do
                                if count == pvp[i][1] then
                                        notice_all(pc_name.." hat "..count.." Morde begangen!")
                                        bonus_exp = pvp[i][2]
                                        break
                                end
                        end 
Er nennt mir immer einen Kill mehr wie in der Tabelle angegeben..
z.B
pc_name.." hat 11 Morde begangen!
oder
pc_name.." hat 26 Morde begangen!

wobei die Tabelle ja das beinhaltet
PHP Code:
                        local pvp = {
                                {10, 10000},
                                {25, 25000},
                                {50, 50000},
                                {75, 75000},
                                {100, 100000},
                                {125, 125000},
                                {150, 150000},
                                {175, 175000},
                                {200, 200000},
                        } 
In der Info werden die richtigen Kills angezeigt.. woran liegt das wo
ist der Fehler? Kann mir wer da helfen oder sieht in Jemand direkt?
Problem besteht weiterhin
04/13/2013 20:13 ArgazmDonor#7900
Hello ^_^
bug with the quest
[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]

what to write in quest_function?

04/13/2013 21:31 Fliegex3#7901
Brauche hilfe bei 2 Quests.

92 +94er Bio quest:
-Fehler man kann den Seelenstein vom Beran nicht droppen (Bio 94er)
PHP Code:
quest Bio2 begin  

    ----------------------------------  
    -- LvL 92 / Juwelbio 
    ----------------------------------  
    state start begin 
        when login or levelup with pc.level>91 begin 
            set_state(information) 
        end     
    end 

    state information begin 
        when letter begin 
            local v = find_npc_by_vnum(20091) 
            if v != 0 then 
                target.vid("__TARGET__", v, "Quest") 
            end 
            send_letter("Seon-Pyeongs Forschung") 
        end 

        when button or info begin 
            say_title("Seon-Pyeongs Forschung") 
            say("") 
            say("Seon-Pyeongs sucht dich.") 
            say("Er wird in manchen Kreisen auch ") 
            say("OT-Sura genannt") 
        end 

        when __TARGET__.target.click or 
            20091.chat."Quest" begin 
            target.delete("__TARGET__") 
            say("Seon-Pyeong:") 
            say("Hallo "..pc.get_name()..",") 
            say("Ich brauche deine Hilfe") 
            say("um meine Forschung fortzuführen.") 
            say("Du musst mir 10") 
            say("Juwel der Missgunst bringen.") 
            say("") 
            say("")     
            set_state(go_to_disciple) 
        end 
    end 

    state go_to_disciple begin 
        when letter begin 
            send_letter("Auftrag von Seon-Pyeong") 

        end 
        when button or info begin 
            say_title("Quest") 
            say("") 
            say("Seon-Pyeong gab euch den Auftrag") 
            say("10 Juwel der Missgunst zu sammeln!") 
            say("Das Item bekommt ihr von Unterwelt-Eisgolem und Unterwelt-Eismann.") 
            say("Viel Glück!") 
            say("") 
            say_item_vnum(30251) 
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!") 
            say("") 
        end 
        when 1137.kill or 1135.kill begin 
            if pc.count_item(30251)<10-pc.getqf("collect_count") then 
                pc.give_item2(30251, 1) 
            end 
        end 
        when 20091.chat."Forschung(1)" with pc.count_item(30251) >0   begin 
            say("Einen Moment!") 
            say("Ich werde das Item") 
            say("schnell mal überprüfen.") 
            say("Hoffentlich klappt alles!") 
            say("") 
            pc.remove_item(30251, 1) 
            wait() 
            if pc.getqf("collect_count")< 9 then 
                local index = pc.getqf("collect_count")+1  
                pc.setqf("collect_count",index) 
                say("Seon-Pyeong:") 
                say("Perfekt! Das Item ist in Ordnung") 
                say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!") 
                say("Bring mir die restlichen!") 
                say("") 
                return 
                end 
            say("Seon-Pyeong:") 
            say("Yuhu! Du hast mir") 
            say("alles gebracht!") 
            say("Dafür werde ich dich wie versprochen belohnen!") 
            wait() 
            say("Welche Belohnung möchtest du?") 
            local s = select ("1100 TP", "140 Verteidigung", "60 Angriffswert") 
            if s == 1 then 
                say_reward("Du erhälst 1100 TP.") 
                affect.add_collect(apply.TP_GRADE_Bonus,1100,60*60*24*365*60) 
                set_state(collect_quest_lv94)
            elseif s == 2 then 
                say_reward("Du erhälst 140 Verteidigung.") 
                affect.add_collect(apply.DEF_GRADE_BONUS,140,60*60*24*365*60) 
                set_state(collect_quest_lv94)
            elseif s == 3 then 
                say_reward("Du erhälst 60 Angriffswert.") 
                affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
                set_state(collect_quest_lv94)
            end 
        end 
    end
    ----------------------------------  
    -- LvL 94 / Juwelbio2  
    ----------------------------------  
    state collect_quest_lv94 begin  
        when login or levelup with pc.level>93 begin 
            set_state(information2) 
        end     
    end 

    state information2 begin 
        when letter begin 
            local v = find_npc_by_vnum(20091) 
            if v != 0 then 
                target.vid("__TARGET__", v, "Quest") 
            end 
            send_letter("Seon-Pyeongs Forschung 2") 
        end 
        when button or info begin 
            say_title("Seon-Pyeongs Forschung 2") 
            say("") 
            say("Seon-Pyeongs sucht dich.") 
            say("Er wird in manchen Kreisen auch ") 
            say("OT-Sura genannt") 
        end 
        when __TARGET__.target.click or 
            20091.chat."Forschung 2" begin 
            target.delete("__TARGET__") 
            say("Seon-Pyeong:") 
            say("Hallo "..pc.get_name()..",") 
            say("Ich brauche deine Hilfe") 
            say("um meine Forschung fortzuführen.") 
            say("Du musst mir 20") 
            say("Juwel der Weisheit bringen") 
            say("") 
            say("")     
            set_state(go_to_disciple2) 
        end 
    end 

    state go_to_disciple2 begin 
        when letter begin 
            send_letter("Auftrag von Seon-Pyeong") 
        end 
        when button or info begin 
            say_title("Quest") 
            say("") 
            say("Seon-Pyeong gab euch den Auftrag") 
            say("20 Juwel der Weisheit zu sammeln!") 
            say("Das Item bekommt ihr von Setaou-Jäger und Setaou-Kämpfer.") 
            say("Viel Glück!") 
            say("") 
            say_item_vnum(30252) 
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!") 
            say("") 
        end 
        when 2401.kill or 2402.kill begin 
            if pc.count_item(30252)<20-pc.getqf("collect_count") then 
                pc.give_item2(30252, 1) 
            end 
        end 
        when 20091.chat."Forschung(2)" with pc.count_item(30252) >0   begin 
            pc.remove_item(30252, 1) 
            if pc.getqf("collect_count")< 19 then 
                local index = pc.getqf("collect_count")+1  
                pc.setqf("collect_count",index) 
                say("Seon-Pyeong:") 
                say("Perfekt! Das Item ist in Ordnung") 
                say("Du hast bis jetzt ".." "..20-pc.getqf("collect_count").. " abgegeben!") 
                say("Bring mir die restlichen!") 
                say("") 
                return 
            end 
            say("Seon-Pyeong:") 
            say("Yuhu! Du hast mir") 
            say("alle gebracht!") 
            say("Jetzt musst du mir nur noch einen Seelenstein des Drachen bringen!") 
            say("Du kriegst ihn vom Beran-Setaou!") 
            set_state(drachenstein) 
        end 
    end 
    
    state drachenstein begin 
        when letter begin 
            send_letter("Auftrag von Seon-Pyeong") 
        end 
        when button or info begin 
            say_title("Quest") 
            say("") 
            say("Seon-Pyeong gab euch den Auftrag") 
            say("Einen Seelenstein des Drachen zu holen!") 
            say("Das Item bekommt ihr von Beran-Setaou.") 
            say("Viel Glück!") 
            say("") 
            say_item_vnum(30228) 
            say("") 
        end 
        when 2493.kill or 2494.kill begin 
            if pc.count_item(30228)<1-pc.getqf("collect_count") then 
                pc.give_item2(30228, 1) 
            end 
        end 
        when 20091.chat."Forschung(2)" with pc.count_item(30228) >0   begin 
            pc.remove_item(30228, 1) 
            say("Seon-Pyeong:") 
            say("Yuhu! Du hast mir") 
            say("alles gebracht!") 
            say("Jetzt musst du mir nur noch einen Seelenstein des Drachen bringen!") 
            say("Du kriegst ihn vom Beran-Setaou!") 
            say("Welche Belohnung möchtest du?") 
            local s = select ("1100 TP", "140 Verteidigung", "60 Angriffswert") 
            if s == 1 then 
                say_reward("Du erhälst 1100 TP.") 
                affect.add_collect(apply.TP_GRADE_Bonus,1100,60*60*24*365*60) 
                setstate(ende)
            elseif s == 2 then 
                say_reward("Du erhälst 140 Verteidigung.") 
                affect.add_collect(apply.DEF_GRADE_BONUS,140,60*60*24*365*60) 
                setstate(ende)
            elseif s == 3 then 
                say_reward("Du erhälst 60 Angriffswert.") 
                affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
                setstate(ende)
            end 
        end     
    end 
    
    state ende begin
    end
end 
Frucht des Lebens Quest:
- Ich möchte das man ab den Gegenstand nichtmehr mit 20k Rang benutzen kann und ein text kommt "Du bist schon Ritterlich"
PHP Code:
quest frucht begin
    state start begin
        when 71107.use begin
            if get_time() > pc.getqf("frucht") then
            pc.change_alignment(2000)
            pc.setqf("frucht", get_time()+ 3600)
            notice("Sie haben 2000 Rang erhalten.")
            pc.remove_item("71107", 1)
            else
            notice("Sie müssen zwischen jeder Frucht 1 Stunden warten.")
            end
            
        end
    end
end 
04/13/2013 23:22 G.I Duke#7902
Quote:
Originally Posted by ArgazmDonor View Post
Hello ^_^
bug with the quest
[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]

what to write in quest_function?
PHP Code:
local coins = mysql_query("SELECT * FROM account.account WHERE id='"..accountid.account_id[1].."'","root","franzi","account","192.168.13.100") 


this is a undeclared function.. you have
to wrote " mysql_query " in your quest_function

Quote:
Originally Posted by Fliegex3 View Post
Brauche hilfe bei 2 Quests.

Frucht des Lebens Quest:
- Ich möchte das man ab den Gegenstand nichtmehr mit 20k Rang benutzen kann und ein text kommt "Du bist schon Ritterlich"
PHP Code:
quest frucht begin
    state start begin
        when 71107.use begin
            if get_time() > pc.getqf("frucht") then
            pc.change_alignment(2000)
            pc.setqf("frucht", get_time()+ 3600)
            notice("Sie haben 2000 Rang erhalten.")
            pc.remove_item("71107", 1)
            else
            notice("Sie müssen zwischen jeder Frucht 1 Stunden warten.")
            end
            
        end
    end
end 
PHP Code:
quest frucht begin
    state start begin
        when 71107.use begin
            if get_time() > pc.getqf("frucht") then
            pc.change_alignment(2000)
            pc.setqf("frucht", get_time()+ 3600)
            notice("Sie haben 2000 Rang erhalten.")
            pc.remove_item("71107", 1)
          end

          elseif (pc.get_alignment() + 2000) > 20000 then
          chat("Du bist bereits Ritterlich. ")
          end

            else
            chat("Sie müssen zwischen jeder Frucht 1 Stunden warten.")
            end
            
        end
    end
end 
Bin mir nicht sicher ob es funktioniert probiers mal

Quote:
Originally Posted by .мαяfυ™ View Post
Hey Leuts hab auch mal ein Problem mit dieser Quest:

Mein Problem ist dass in diesem Ausschnitt
PHP Code:
                        pc.setqf("pvp_exp", c)
                        q.set_counter("PvP-Kills", c)
                        for i=1, table.getn(pvp), 1 do
                                if count == pvp[i][1] then
                                        notice_all(pc_name.." hat "..count.." Morde begangen!")
                                        bonus_exp = pvp[i][2]
                                        break
                                end
                        end 
Er nennt mir immer einen Kill mehr wie in der Tabelle angegeben..
z.B
pc_name.." hat 11 Morde begangen!
oder
pc_name.." hat 26 Morde begangen!

wobei die Tabelle ja das beinhaltet
PHP Code:
                        local pvp = {
                                {10, 10000},
                                {25, 25000},
                                {50, 50000},
                                {75, 75000},
                                {100, 100000},
                                {125, 125000},
                                {150, 150000},
                                {175, 175000},
                                {200, 200000},
                        } 
In der Info werden die richtigen Kills angezeigt.. woran liegt das wo
ist der Fehler? Kann mir wer da helfen oder sieht in Jemand direkt?
immer noch das Problem
04/14/2013 10:25 Fliegex3#7903
Die Quest funktioniert doch nicht :/

PHP Code:
quest frucht begin 
    state start begin 
        when 71107.use begin 
            if get_time() > pc.getqf("frucht") then 
            pc.change_alignment(2000) 
            pc.setqf("frucht", get_time()+ 3600) 
            notice("Sie haben 2000 Rang erhalten.") 
            pc.remove_item("71107", 1) 
          end 

          elseif (pc.get_alignment() + 2000) > 20000 then 
          chat("Du bist bereits Ritterlich, somit kannst du diese Frucht nicht mehr benutzen. ") 
          end 

            else 
            chat("Sie müssen zwischen jeder Frucht 1 Stunden warten.") 
            end 
             
        end 
    end 
end 
Vbox: expted near elseif


92 +94er Bio quest:
-Fehler man kann den Seelenstein vom Beran nicht droppen (Bio 94er)
- Und man hat aus i-einem Grund bei der 2ten Bio (94er) schon 9 abgegeben, obwohl die Quest erst begonnen wurde.

PHP Code:
quest Bio2 begin  

    ----------------------------------  
    -- LvL 92 / Juwelbio 
    ----------------------------------  
    state start begin 
        when login or levelup with pc.level>91 begin 
            set_state(information) 
        end     
    end 

    state information begin 
        when letter begin 
            local v = find_npc_by_vnum(20091) 
            if v != 0 then 
                target.vid("__TARGET__", v, "Quest") 
            end 
            send_letter("Seon-Pyeongs Forschung") 
        end 

        when button or info begin 
            say_title("Seon-Pyeongs Forschung") 
            say("") 
            say("Seon-Pyeongs sucht dich.") 
            say("Er wird in manchen Kreisen auch ") 
            say("OT-Sura genannt") 
        end 

        when __TARGET__.target.click or 
            20091.chat."Quest" begin 
            target.delete("__TARGET__") 
            say("Seon-Pyeong:") 
            say("Hallo "..pc.get_name()..",") 
            say("Ich brauche deine Hilfe") 
            say("um meine Forschung fortzuführen.") 
            say("Du musst mir 10") 
            say("Juwel der Missgunst bringen.") 
            say("") 
            say("")     
            set_state(go_to_disciple) 
        end 
    end 

    state go_to_disciple begin 
        when letter begin 
            send_letter("Auftrag von Seon-Pyeong") 

        end 
        when button or info begin 
            say_title("Quest") 
            say("") 
            say("Seon-Pyeong gab euch den Auftrag") 
            say("10 Juwel der Missgunst zu sammeln!") 
            say("Das Item bekommt ihr von Unterwelt-Eisgolem und Unterwelt-Eismann.") 
            say("Viel Glück!") 
            say("") 
            say_item_vnum(30251) 
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!") 
            say("") 
        end 
        when 1137.kill or 1135.kill begin 
            if pc.count_item(30251)<10-pc.getqf("collect_count") then 
                pc.give_item2(30251, 1) 
            end 
        end 
        when 20091.chat."Forschung(1)" with pc.count_item(30251) >0   begin 
            say("Einen Moment!") 
            say("Ich werde das Item") 
            say("schnell mal überprüfen.") 
            say("Hoffentlich klappt alles!") 
            say("") 
            pc.remove_item(30251, 1) 
            wait() 
            if pc.getqf("collect_count")< 9 then 
                local index = pc.getqf("collect_count")+1  
                pc.setqf("collect_count",index) 
                say("Seon-Pyeong:") 
                say("Perfekt! Das Item ist in Ordnung") 
                say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!") 
                say("Bring mir die restlichen!") 
                say("") 
                return 
                end 
            say("Seon-Pyeong:") 
            say("Yuhu! Du hast mir") 
            say("alles gebracht!") 
            say("Dafür werde ich dich wie versprochen belohnen!") 
            wait() 
            say("Welche Belohnung möchtest du?") 
            local s = select ("1100 TP", "140 Verteidigung", "60 Angriffswert") 
            if s == 1 then 
                say_reward("Du erhälst 1100 TP.") 
                affect.add_collect(apply.TP_GRADE_Bonus,1100,60*60*24*365*60) 
                set_state(collect_quest_lv94)
            elseif s == 2 then 
                say_reward("Du erhälst 140 Verteidigung.") 
                affect.add_collect(apply.DEF_GRADE_BONUS,140,60*60*24*365*60) 
                set_state(collect_quest_lv94)
            elseif s == 3 then 
                say_reward("Du erhälst 60 Angriffswert.") 
                affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
                set_state(collect_quest_lv94)
            end 
        end 
    end
    ----------------------------------  
    -- LvL 94 / Juwelbio2  
    ----------------------------------  
    state collect_quest_lv94 begin  
        when login or levelup with pc.level>93 begin 
            set_state(information2) 
        end     
    end 

    state information2 begin 
        when letter begin 
            local v = find_npc_by_vnum(20091) 
            if v != 0 then 
                target.vid("__TARGET__", v, "Quest") 
            end 
            send_letter("Seon-Pyeongs Forschung 2") 
        end 
        when button or info begin 
            say_title("Seon-Pyeongs Forschung 2") 
            say("") 
            say("Seon-Pyeongs sucht dich.") 
            say("Er wird in manchen Kreisen auch ") 
            say("OT-Sura genannt") 
        end 
        when __TARGET__.target.click or 
            20091.chat."Forschung 2" begin 
            target.delete("__TARGET__") 
            say("Seon-Pyeong:") 
            say("Hallo "..pc.get_name()..",") 
            say("Ich brauche deine Hilfe") 
            say("um meine Forschung fortzuführen.") 
            say("Du musst mir 20") 
            say("Juwel der Weisheit bringen") 
            say("") 
            say("")     
            set_state(go_to_disciple2) 
        end 
    end 

    state go_to_disciple2 begin 
        when letter begin 
            send_letter("Auftrag von Seon-Pyeong") 
        end 
        when button or info begin 
            say_title("Quest") 
            say("") 
            say("Seon-Pyeong gab euch den Auftrag") 
            say("20 Juwel der Weisheit zu sammeln!") 
            say("Das Item bekommt ihr von Setaou-Jäger und Setaou-Kämpfer.") 
            say("Viel Glück!") 
            say("") 
            say_item_vnum(30252) 
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!") 
            say("") 
        end 
        when 2401.kill or 2402.kill begin 
            if pc.count_item(30252)<20-pc.getqf("collect_count") then 
                pc.give_item2(30252, 1) 
            end 
        end 
        when 20091.chat."Forschung(2)" with pc.count_item(30252) >0   begin 
            pc.remove_item(30252, 1) 
            if pc.getqf("collect_count")< 19 then 
                local index = pc.getqf("collect_count")+1  
                pc.setqf("collect_count",index) 
                say("Seon-Pyeong:") 
                say("Perfekt! Das Item ist in Ordnung") 
                say("Du hast bis jetzt ".." "..20-pc.getqf("collect_count").. " abgegeben!") 
                say("Bring mir die restlichen!") 
                say("") 
                return 
            end 
            say("Seon-Pyeong:") 
            say("Yuhu! Du hast mir") 
            say("alle gebracht!") 
            say("Jetzt musst du mir nur noch einen Seelenstein des Drachen bringen!") 
            say("Du kriegst ihn vom Beran-Setaou!") 
            set_state(drachenstein) 
        end 
    end 
    
    state drachenstein begin 
        when letter begin 
            send_letter("Auftrag von Seon-Pyeong") 
        end 
        when button or info begin 
            say_title("Quest") 
            say("") 
            say("Seon-Pyeong gab euch den Auftrag") 
            say("Einen Seelenstein des Drachen zu holen!") 
            say("Das Item bekommt ihr von Beran-Setaou.") 
            say("Viel Glück!") 
            say("") 
            say_item_vnum(30228) 
            say("") 
        end 
        when 2493.kill or 2494.kill begin 
            if pc.count_item(30228)<1-pc.getqf("collect_count") then 
                pc.give_item2(30228, 1) 
            end 
        end 
        when 20091.chat."Forschung(2)" with pc.count_item(30228) >0   begin 
            pc.remove_item(30228, 1) 
            say("Seon-Pyeong:") 
            say("Yuhu! Du hast mir") 
            say("alles gebracht!") 
            say("Jetzt musst du mir nur noch einen Seelenstein des Drachen bringen!") 
            say("Du kriegst ihn vom Beran-Setaou!") 
            say("Welche Belohnung möchtest du?") 
            local s = select ("1100 TP", "140 Verteidigung", "60 Angriffswert") 
            if s == 1 then 
                say_reward("Du erhälst 1100 TP.") 
                affect.add_collect(apply.TP_GRADE_Bonus,1100,60*60*24*365*60) 
                setstate(ende)
            elseif s == 2 then 
                say_reward("Du erhälst 140 Verteidigung.") 
                affect.add_collect(apply.DEF_GRADE_BONUS,140,60*60*24*365*60) 
                setstate(ende)
            elseif s == 3 then 
                say_reward("Du erhälst 60 Angriffswert.") 
                affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
                setstate(ende)
            end 
        end     
    end 
    
    state ende begin
    end
end 
04/14/2013 19:04 xXKimariXx#7904
@Fliegex3

Die erste Quest sollte so funktionieren :

PHP Code:
quest frucht begin 
    state start begin 
        when 71107.use begin 
            if get_time() > pc.getqf("frucht") then 
                if (pc.get_alignment() + 2000) > 20000 then 
                    chat("Du bist bereits Ritterlich, somit kannst du diese Frucht nicht mehr benutzen. ") 
                else
                    pc.change_alignment(2000) 
                    pc.setqf("frucht", get_time()+ 3600) 
                    notice("Sie haben 2000 Rang erhalten.") 
                    pc.remove_item("71107", 1) 
                end
            else
                chat("Sie müssen zwischen jeder Frucht 1 Stunden warten.") 
            end
        end
    end
end 
Die zweite mache ich eventuell naher
04/14/2013 19:51 °Ace°#7905
Wer kann mir das so einstellen, dass man am Anfang an auf Level 50 kommt statt 75 ?
Das gehört in einer give_basic_weapon.quest.
Quote:
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+06 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 9e+07 )
pc . give_exp2 ( 3.52276e+07 )
Page 527 of 845 « First 27427477517525526 527 528529537577627 Last »