Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Metin2 > Metin2 Private Server
You last visited: Today at 15:16

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[SERVICE] Die Questkontrolle

Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.

Reply
 
Old 08/20/2010, 13:39   #151
 
.Hass's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 335
Received Thanks: 38
hiho

also hab hier ne quest die etwas buggy is

also manchmal zählt er die kills runter und manchmal nicht

hab jetzt schon 2 tage an der rumbgebastelt aber wird nicht besser

kann mir da vielleicht jemand weiter helfen? naja hier mal die quest
PHP Code:
quest bosse begin
    state start begin
        when login begin
            set_state
(information)
        
end
    end

    state information begin
        when letter begin
            send_letter
("Verteidigung der Dörfer!")
        
end

        when info 
or button begin
        say_title
("Verteidigung der Dörfer!")
        
say("Hallo!")
        
say("Die monster greifen die Dörfer")
        
say("an.Kannst du uns helfen?")
        
say("Wir nehmen jede hilfe die wir bekommen an.")
        
wait()
        
say("Ich werde dich auch gut belohnen wen du uns hilfst!")
        
say("Kannst du uns helfen?")
        
local s select("Ja","Nein..hab angst")
        if 
== 2 then
                    say
("Hmm schade")
                    
clear_letter()
                    
set_state (aufgeben)
        else
            
say("Okay los gehts!")
            
say_reward("Töte 100 x Wildhunde")
            
say_reward("Töte 50 x Wüstenfüchse")
            
say_reward("Töte 25 x Blauwolf")
            
say_reward("Töte 15 x Keiler")
            
say_reward("Töte 2 x Metin der Schlacht")
            
say_reward("Töte 2 x Metin der Gier")
            
say_reward("Töte 2 x Metin der Schwärze")
            
say_reward("Töte 2 x Metin der Dunkelheit")
            
say_reward("Töte 2 x Metin der Eifersucht")
            
pc.setqf("state1"0)
            
q.set_counter("Wildhunde"100)
            
pc.setqf("state2"0)
            
q.set_counter("Wüstenfüchse"50)
            
pc.setqf("state3"0)
            
q.set_counter("Blauwolf"25)
            
pc.setqf("state4"0)
            
q.set_counter("Keiler"15)
            
pc.setqf("state5"0)
            
q.set_counter("Metin der Schlacht"2)
            
pc.setqf("state6"0)
            
q.set_counter("Metin der Gier"2)
            
pc.setqf("state7"0)
            
q.set_counter("Metin der Schwärze"2)
            
pc.setqf("state8"0)
            
q.set_counter("Metin der Dunkelheit"2)
            
pc.setqf("state9"0)
            
q.set_counter("Metin der Eifersucht"2)
            
set_state(kill)
            
end
        end
    end
    
    state kill begin
        when letter begin
            send_letter
("Verteidigung der Dörfer")
        
end
    
        when info 
or button begin
            say_title
("Verteidigung der Dörfer")
            
say("Staus:")
            
say_reward("Du hast schon "..pc.getqf("state1").." von 100 x Wildhunde getötet")
            
say_reward("Du hast schon "..pc.getqf("state2").." von 50 x Wüstenfüchse getötet")
            
say_reward("Du hast schon "..pc.getqf("state3").." von 25 x Blauwolf getötet")
            
say_reward("Du hast schon "..pc.getqf("state4").." von 15 x Keiler getötet")
            
say_reward("Du hast schon "..pc.getqf("state5").." von 2 x Metin der Schlacht")
            
say_reward("Du hast schon "..pc.getqf("state6").." von 2 x Metin der Gier")
            
say_reward("Du hast schon "..pc.getqf("state7").." von 2 x Metin der Schwärze")
            
say_reward("Du hast schon "..pc.getqf("state8").." von 2 x Metin der Dunkelheit")
            
say_reward("Du hast schon "..pc.getqf("state9").." von 2 x Metin der Eifersucht")
        
end
        
        when 101.kill begin
            local count1 
pc.getqf("state1") + 1
            
if count1 <= 100 then
                pc
.setqf("state1"count1)
                
q.set_counter("Wildhunde"100 count1)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 2101.kill begin
            local count2 
pc.getqf("state2") + 1
            
if count2 <= 50 then
                pc
.setqf("state2"count2)
                
q.set_counter("Wüstenfuchs"50 count2)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 104.kill begin
            local count3 
pc.getqf("state3") + 1
            
if count3 <= 25 then
                pc
.setqf("state3"count3)
                
q.set_counter("Blauwolf"25 count3)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 108.kill begin
            local count4 
pc.getqf("state4") + 1
            
if count4 <= 15 then
                pc
.setqf("state4"count4)
                
q.set_counter("Keiler"15 count4)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end

        when 8003.kill begin
            local count5 
pc.getqf("state5") + 1
            
if count5 <= 2 then
                pc
.setqf("state5"count5)
                
q.set_counter("Metin der Schlacht"count5)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 8004.kill begin
            local count6 
pc.getqf("state6") + 1
            
if count6 <= 2 then
                pc
.setqf("state6"count6)
                
q.set_counter("Metin der Gier"count6)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 8005.kill begin
            local count7 
pc.getqf("state7") + 1
            
if count7 <= 2 then
                pc
.setqf("state7"count7)
                
q.set_counter("Metin der Schwärze"count7)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 8006.kill begin
            local count8 
pc.getqf("state8") + 1
            
if count8 <= 2 then
                pc
.setqf("state8"count8)
                
q.set_counter("Metin der Dunkelheit"count8)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
                    set_state
(fertig)
            
end
        end
        
        when 8007.kill begin
            local count9 
pc.getqf("state9") + 1
            
if count9 <= 2 then
                pc
.setqf("state9"count9)
                
q.set_counter("Metin der Eifersucht"count9)
            
end
            
if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= and pc.getqf("state6") >= and pc.getqf("state7") >= and pc.getqf("state8") >= and pc.getqf("state9") >= 2 then
            set_state
(fertig)
            
end
        end
    end
            
    state fertig begin
        when letter begin
            send_letter
("Aufgabe abgeschlossen!")
        
end
        
        when info 
or button begin
            say_title
("Aufgabe abgeschlossen!")
            
say("Du hast es geschaft")
            
say("Ich dachte schon du schafst es nicht")
            
say("Du hast die Reiche Beschützt.")
            
wait()
            
say("Natürlich willst du deine Belohnung oder?")
            
local s=select("Aufjedenfall","Nein behalt sie")
            if 
s== 2 then
                clear_letter
()
                
set_state(aufgeben)
            else
                
say_reward("10.000.000 Yang")
                
say_reward("1 x Fünfeckschild+9")
                
say_reward("1 x Silerarmband+9")
                
say_reward("Stein gegen Krieger +3")
                
say_reward("Stein gegen Ninja +3")
                
say_reward("Stein gegen Sura +3")
                
say_reward("Stein gegen Schamanen +3")
                
pc.change_money(10000000)
                
pc.give_item2(130291)
                
pc.give_item2(140491)
                
pc.give_item2(283331)
                
pc.give_item2(283341)
                
pc.give_item2(283351)
                
pc.give_item2(283361)
                
clear_letter()
                
set_state(ende)
            
end
        end
    end

    state aufgeben begin
    end
    
    state ende begin
    end
end 
schaut einfachmal ob ihr dann nen fehler findet =)
.Hass is offline  
Old 08/20/2010, 21:06   #152
 
elite*gold: 0
Join Date: Aug 2010
Posts: 165
Received Thanks: 38
quest horse_guard begin
state start begin
when 20349.chat."Pferd steigern" begin
say_title("Stallbursche:")
say("")
say("Hallo!")
say("Bei mir kannst du dein Pferd steigern.")
say("Das Pferd zu steigern kostet dich 1kk pro Level.")
say("")
say_reward("Möchtest du dein Pferd steigern?")
say("")

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

if s == 1 then
say_title("Stallbursche:")
say("")
if pc.money>=1000000 then
pc.changemoney("-1000000")
horse.unride()
horse.advance()
horse.ride()
say("Dein Pferd hat nun Level "..(horse.get_level()).." erreicht.")
say("")
elseif horse.get_level()>=30 then
say("Dein Pferd hat Level 30 erreicht.")
say("Du kannst es nicht mehr steigern.")
say("")
elseif pc.money<1000000 then
say("Du hast nicht genug Yang um dein Pferd zu steigern.")
say("")
end
elseif s == 2 then
return
end
end
when 20349.chat."Reitshop" begin
npc.open_shop( 12 )
say("Hier findest du alle Items für ein Pferd.")
end
when 20349.chat."Information" begin
local s=number(1, 7)
if 1>=s then -- 14.29% (1/7)
say("Füttere dein Pferd")
say("regelmässig sonst")
say("stirbt es.")
elseif 2>=s then -- 14.29% (1/7)
say("Das Anfängerpferd")
say("ist sehr schnell erschöpft.")
say("Bleibe nicht auf seinem Rücken stehen.")
elseif 3>=s then -- 14.29% (1/7)
say("Um dein Pferd zu verbessern")
say("benötigst du 1kk Yang.")
say("Bringe das Yang zu mir")
say("und ich werde dein Pferd steigern.")
elseif 4>=s then -- 14.29% (1/7)
say("Wenn dein Pferd gestorben")
say("ist gibt es mehrere")
say("Kräuter von den")
say("Affenkönigen um")
say("sie Wiederzubeleben.")
elseif 5>=s then -- 14.29% (1/7)
say("Es gibt 9 verschiedene")
say("Pferde Aussehen.")
say("Ohne Gilde, mit Gilde und als Leader.")
elseif 6>=s then -- 14.29% (1/7)
say("Das Anfängerpferd")
say("isst gerne Heu.")
say("Das Kampfpferd")
say("isst gerne Karotten.")
say("Das Militärpferd")
say("isst gerne Roten Ginseng.")
elseif 7>=s then -- 14.29% (1/7)
say("Lese Handbuch Pferde Zähmen")
say("um dein Pferd schneller zu rufen.")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end


Ps: is leider bissle verschoben sry
hab des eingefügt als quest datei hochgeladne aber geht irgendwie nich
PainFire24 is offline  
Thanks
1 User
Old 08/20/2010, 23:06   #153
 
havmonster's Avatar
 
elite*gold: 0
Join Date: Dec 2009
Posts: 105
Received Thanks: 30
hier der shop öffnet sich nicht ;(
PHP Code:
quest potshop begin
state start begin
when 30201.
use begin 
say
("Mit diesem Item kannst du dir Tränke")
say("kaufen ohne das du zur Gemi laufen musst")
say("")
say("Hier kannst du blaue und Rote Tränke kaufen")
say("")
say_reward("Was willst du tun?")
local main_set select("PotsKaufen","Abbrechen")
if 
main_set == 2 then
return
end
if main_set == 1 then
npc
.open_shop(87
end
end
end
end 
havmonster is offline  
Thanks
1 User
Old 08/21/2010, 00:01   #154
 
elite*gold: 1058
Join Date: Apr 2010
Posts: 860
Received Thanks: 164
bitte löschen
Androx« is offline  
Old 08/21/2010, 11:35   #155
 
havmonster's Avatar
 
elite*gold: 0
Join Date: Dec 2009
Posts: 105
Received Thanks: 30
Quote:
Originally Posted by Androx« View Post
bitte löschen
?
havmonster is offline  
Thanks
1 User
Old 08/21/2010, 13:21   #156
 
Ep!cFail's Avatar
 
elite*gold: 630
Join Date: Feb 2010
Posts: 72
Received Thanks: 86
Quote:
Originally Posted by havmonster View Post
hier der shop öffnet sich nicht ;(
PHP Code:
quest potshop begin
state start begin
when 30201.
use begin 
say
("Mit diesem Item kannst du dir Tränke")
say("kaufen ohne das du zur Gemi laufen musst")
say("")
say("Hier kannst du blaue und Rote Tränke kaufen")
say("")
say_reward("Was willst du tun?")
local main_set select("PotsKaufen","Abbrechen")
if 
main_set == 2 then
return
end
if main_set == 1 then
npc
.open_shop(87
end
end
end
end 

Probier mal die hier:


Greetins
Ep!cFail is offline  
Old 08/21/2010, 14:00   #157
 
havmonster's Avatar
 
elite*gold: 0
Join Date: Dec 2009
Posts: 105
Received Thanks: 30
Quote:
Originally Posted by Ep!cFail View Post
Probier mal die hier:


Greetins
geht net es kommt sogar Core dumped -.-^^
havmonster is offline  
Thanks
1 User
Old 08/21/2010, 14:06   #158
 
elite*gold: 0
Join Date: May 2010
Posts: 6
Received Thanks: 0
Okay, ich habe mich auch mal am Quest schreiben versucht, mein erster Versuch wäre folgender, es werden bei make.sh auch keine Fehler angezeigt, aber es passiert nichts(weder unter lvl 50 noch über lvl 50):

PHP Code:
quest item_Horn_des_dunklen_Fürsten begin
    state start begin
    when 70044.
use begin
        
if pc.getlevel() < 50
        say_title
("Horn des dunklen F\195\188rsten")
        
say("Du hast nich das benötigte Level")
        
say("Du musst Level 50 sein!")
        
say("")
        return;
        else
        
pc.warp(38300,64000)
        
end
    end
    end
end 
Hilfe wäre nett

lg
1337SBird is offline  
Old 08/21/2010, 14:13   #159
 
havmonster's Avatar
 
elite*gold: 0
Join Date: Dec 2009
Posts: 105
Received Thanks: 30
Quote:
Originally Posted by 1337SBird View Post
Okay, ich habe mich auch mal am Quest schreiben versucht, mein erster Versuch wäre folgender, es werden bei make.sh auch keine Fehler angezeigt, aber es passiert nichts(weder unter lvl 50 noch über lvl 50):

PHP Code:
quest item_Horn_des_dunklen_Fürsten begin
    state start begin
    when 70044.
use begin
        
if pc.getlevel() < 50
        say_title
("Horn des dunklen F\195\188rsten")
        
say("Du hast nich das benötigte Level")
        
say("Du musst Level 50 sein!")
        
say("")
        return;
        else
        
pc.warp(38300,64000)
        
end
    end
    end
end 
Hilfe wäre nett

lg
Du musst in der DB den Typ auf 18 machen
havmonster is offline  
Thanks
2 Users
Old 08/21/2010, 14:27   #160
 
elite*gold: 0
Join Date: May 2010
Posts: 6
Received Thanks: 0
Quote:
Originally Posted by havmonster View Post
Du musst in der DB den Typ auf 18 machen
Mhm thx schonmal aber welche Table wäre das? In Item_Proto habe ich die vnum nicht gefunden...

lg
1337SBird is offline  
Old 08/21/2010, 15:30   #161
 
elite*gold: 0
Join Date: Jul 2010
Posts: 1,001
Received Thanks: 579
hey, dieses mal hab ich ein problem
Code:
quest gm_status begin
    state start begin
        when 20092.chat."GM Online Status" begin
            say_title("GM Status")
            say("Name                                     Status")
            say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
            if game.get_event_flag("[SGA]Metal")== 1 then
                say_reward("[SGA]Metal                               online")
            else
                say("SA 6                            offline")
            end
            if game.get_event_flag("[SGA]Shadow")== 1 then
                say_reward("[SGA]Shadow                                online")
            else
                say("[SGA]Shadow                       offline")
            end
            if game.get_event_flag("[SGA]Dark")== 1 then
                say_reward("[SGA]Dark                                online")
            else
                say("[SGA]Dark                                offline")
            end
            if game.get_event_flag("[SGA]Sexshop")== 1 then
                say_reward("[SGA]Sexshop                                online")
            else
                say("[SGA]Sexshop                               offline")
            end
            if game.get_event_flag("[GA]Nadjax3")== 1 then
                say_reward("[GA]Nadjax3                            online")
            else
                say("[GA]Nadjax3                           offline")
            end
            if game.get_event_flag("[GA]PosYdoZ")== 1 then
                say_reward("[GA]PosYdoZ                    online")
            else
                say("[GA]PosYdoZ                     offline")
            end
			if game.get_event_flag("[GA]CaLyPsE")== 1 then
                say_reward("[GA]CaLyPsE                    online")
            else
                say("[GA]CaLyPsE                    offline")
            end
			if game.get_event_flag("[TGM]Touch")== 1 then
                say_reward("[TGM]Touch                    online")
            else
                say("[TGM]Touch                    offline")
            end
			if game.get_event_flag("[GM]Slayer")== 1 then
                say_reward("[GM]Slayer                    online")
            else
                say("[GM]Slayer                    offline")
            end
        end
    end
end
wy geht das ned?
folgendes wird dann angezeigt:

(ich war mit [SGA]Shadow eingeloggt!)
PangerLenis is offline  
Thanks
1 User
Old 08/21/2010, 23:45   #162
 
Ep!cFail's Avatar
 
elite*gold: 630
Join Date: Feb 2010
Posts: 72
Received Thanks: 86
Quote:
Originally Posted by havmonster View Post
geht net es kommt sogar Core dumped -.-^^
Das war mein Fehler bin seit 40 Stunden dauert wach... Kaffe hilft langsam auch nicht mehr hier die richtige hab ausversehen nen "if" drangehängt...




Quote:
Originally Posted by PangerLenis View Post
hey, dieses mal hab ich ein problem
wy geht das ned?
folgendes wird dann angezeigt:

(ich war mit [SGA]Shadow eingeloggt!)

Wenn man schon eine Quest übernimmt sollte man den kompletten Post des User's lesen..

Quote:
Originally Posted by sennah View Post
Special note:
You have to include the following quest data with an item or npc to change the gm status.
change into online:
PHP Code:
                local name pc.get_name()
                
game.set_event_flag(name1)
                
setskin(NOWINDOW
change into offline:
PHP Code:
                local name pc.get_name()
                
game.set_event_flag(name0)
                
setskin(NOWINDOW
Greetings
Ep!cFail is offline  
Thanks
1 User
Old 08/22/2010, 02:40   #163
 
xIvan4ikx's Avatar
 
elite*gold: 70
Join Date: Jan 2009
Posts: 1,985
Received Thanks: 2,239
PHP Code:
quest shops_open begin
    state start begin
        when 30204.
use begin
            say
("Welchen Shop öffnen?")
            
local s=select("Gemi""Waffenhändler""Rüstungshändler""Abbrechen")
            if 
s==1 then
                npc
.open_shop(3)
            elseif 
s==2 then
                npc
.open_shop(4)
            elseif 
s==3 then
                npc
.open_shop(1)
            elseif 
s==4 then
                
--
            
end
        end
    end
end 
Bei der Quest lassen sich die Shops nicht öffnen..
xIvan4ikx is offline  
Old 08/22/2010, 03:15   #164

 
.Hazel's Avatar
 
elite*gold: 15
Join Date: Feb 2010
Posts: 4,410
Received Thanks: 3,105
Kenne mich nicht so gut aus, aber muss es nicht so heißen?

PHP Code:
quest shops_open begin
    state start begin
        when 30204.
use begin
            say
("Welchen Shop öffnen?")
            
local s=select("Gemi""Waffenhändler""Rüstungshändler""Abbrechen")
            if 
s==1 then
                npc
.open_shop(9003)
            elseif 
s==2 then
                npc
.open_shop(9001)
            elseif 
s==3 then
                npc
.open_shop(9002)
            elseif 
s==4 then
                
--
            
end
        end
    end
end 
So dürfte es gehen, wenn ich mich nicht vertue.

Best regards,

.Hazel
.Hazel is offline  
Old 08/22/2010, 11:00   #165
 
xIvan4ikx's Avatar
 
elite*gold: 70
Join Date: Jan 2009
Posts: 1,985
Received Thanks: 2,239
Quote:
Originally Posted by .Hazel View Post
Kenne mich nicht so gut aus, aber muss es nicht so heißen?

PHP Code:
quest shops_open begin
    state start begin
        when 30204.
use begin
            say
("Welchen Shop öffnen?")
            
local s=select("Gemi""Waffenhändler""Rüstungshändler""Abbrechen")
            if 
s==1 then
                npc
.open_shop(9003)<---
            elseif 
s==2 then
                npc
.open_shop(9001)<---
            elseif 
s==3 then
                npc
.open_shop(9002)<---
            elseif 
s==4 then
                
--
            
end
        end
    end
end 
So dürfte es gehen, wenn ich mich nicht vertue.

Best regards,

.Hazel
Da kommen die Npc Shop IDs hin nicht die Values von den Npcs..
xIvan4ikx is offline  
Reply




All times are GMT +1. The time now is 15:19.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.