[SERVICE] Die Questkontrolle

04/26/2013 16:28 .iPaCHeL#7996
Hallo,

Habe hier eine Quest die nicht Funktionieren möchte.

PHP Code:
quest info_tante begin 
    state start begin 
        when 20087.chat
."Info Bruder" begin 
            say_title
("Info Bruder"
            
say(""
            
say("Hallo:"
            
say("Sakarya gibt es schon seit vielen vielen Jahren"
            
say("in der Zeit hat sich auch viel verändert"
            
say("aber man kann nie auf dem"
            
say("neusten Stand sein und nicht immer wissen"
            
say("wo man diese neuen Sachen findet."
            
say("Dies soll sich schnell ändern.."
            
say("Ich vergebe so manche Informationen, die"
            
say("du bestimmt noch nicht weißt"
            
say(""
            
say_reward("Möchtest du dich über diesen Server Informieren?"
            
local s select("Ja, gerne""Nein, schon ok"
             
            if 
== 2 then 
            say_title
("Info Bruder"
            
say("Ok, denn nicht"
            
end 
             
            
if == 1 then 
            say_title
("Info Bruder"
            
say(""
            
say_reward("Wähle eine Frage:"
            
say(""
            
local s select("Wie kann ich leveln?""Woher bekomm ich die Uppitems?""Bei welchem Level liegt die Levelgrenze?""Wasserstein und Steinstück""Woher bekomm ich P-Skills?""Weiter"
             
            if 
== 1 then 
            say_title
("Wie kann ich leveln?"
            
say(""
            
say("Geh bitte zu Heidi dort sollte alles stehen")  
            
end 
             
            
if == 2 then 
            say_title
("Woher bekomm ich die Uppitems?"
            
say(""
            
say("Die Uppitems erfarmst du bei der Farmmap unter"
            
say("dem Namen Farmbad."
            
say("Wie du hin kommst ist ganz einfach"
            
say("Geh bitte zum NPC Heidi-Porter"
            
end 
             
            
if == 3 then 
            say_title
("Bei welchem Level liegt die Levelgrenze?"
            
say(""
            
say("Die Levelgranze auf diesem Server liegt bei Level 150"
            
say("Warum bis Level 150?"
            
say("Weil der Spielspaß denn noch mehr"
            
say("gesteigert wird und damit man auch die neuen"
            
say("Waffen tragen kann usw."
            
end 
             
            
if == 4 then 
            say_title
("Wasserstein und Steinstück"
            
say(""
            
say("Für was braucht man die Items?:"
            
say("Diese 2 Items brauchst du um dein Equipment zu uppen"
            
say("und die bekommst du nur vom Drachen und Azrael"
            
end 
            
            
if == 5 then 
            say_title
("Woher bekomm ich P-Skills?"
            
say(""
            
say("Auf der Paradiese Map")  
            
say("Dort musst du dir deine Seelensteine und"
            
say("Exorzismus-Schriftrollen selbst farmen"
            
say("um deine Skills auf P setzten zu können"
            
say("oder du gewinnst bei einem Event einen"
            
say)"Regenbogenstein!")
            
end 
             
            
if == 6 then 
            say_title
("Info Bruder"
            
say(""
            
say_reward("Wähle eine Frage:"
            
say(""
            
local s select("Woher bekomm ich Pets?""Lohnt es sich zu Voten?""Wann gibt es Events?""Wichtig!""Abbrechen"
            
            if 
== 1 then 
            say_title
("Woher bekomm ich Pets?"
            
say(""
            
say("Die Pets bekommst du nur von Bosse"
            
end 
            
            
if == 2 then 
            say_title
("Lohnt es sich zu Voten?"
            
say(""
            
say("Es wird sich 100% lohnen das"
            
say("Verspreche ich dir weil wir im"
            
say("Itemshop PvP-Ringe & Equipment haben."
            
end 
             
            
if == 3 then 
            say_title
("Wann gibt es Events?"
            
say(""
            
say("Ja es wird jeden Tag immer"
            
say("1 Event geben z.b Ox und PvP-Events"
            
say("die PvP-Events wird es 1-2 im Monat geben dafür"
            
say("wirst du tolle Preise bekommen."
            
end 
             
            
if == 4 then 
            say_title
("Wichtig!"
            
say(""
            
say("Voten nicht vergessen!!"
            
end 
             
            
if == 5 then 
            end
        end     
    end 
end 
04/26/2013 16:58 Marsia#7997


So sollte es klappen.

04/26/2013 17:32 G.I Duke#7998
Quote:
Originally Posted by Marsia View Post

So sollte es klappen.

Zuviele end's

PHP Code:
 quest info_tante begin  
    state start begin  
        when 20087.chat
."Info Bruder" begin  
            say_title
("Info Bruder")  
            
say("")  
            
say("Hallo:")  
            
say("Sakarya gibt es schon seit vielen vielen Jahren")  
            
say("in der Zeit hat sich auch viel verändert")  
            
say("aber man kann nie auf dem")  
            
say("neusten Stand sein und nicht immer wissen")  
            
say("wo man diese neuen Sachen findet.")  
            
say("Dies soll sich schnell ändern..")  
            
say("Ich vergebe so manche Informationen, die")  
            
say("du bestimmt noch nicht weißt")  
            
say("")  
            
say_reward("Möchtest du dich über diesen Server Informieren?")  
            
local s select("Ja, gerne""Nein, schon ok")   
                if 
== 2 then  
                    say_title
("Info Bruder")  
                    
say("Ok, denn nicht")  
                
end 
                
if == 1 then  
                    say_title
("Info Bruder")  
                    
say("")  
                    
say_reward("Wähle eine Frage:")  
                    
say("")  
                    
local a select("Wie kann ich leveln?""Woher bekomm ich die Uppitems?""Bei welchem Level liegt die Levelgrenze?""Wasserstein und Steinstück""Woher bekomm ich P-Skills?""Weiter")            
                        if 
== 1 then  
                            say_title
("Wie kann ich leveln?")  
                            
say("")  
                            
say("Geh bitte zu Heidi dort sollte alles stehen"
                        elseif 
== 2 then  
                            say_title
("Woher bekomm ich die Uppitems?")  
                            
say("")  
                            
say("Die Uppitems erfarmst du bei der Farmmap unter")  
                            
say("dem Namen Farmbad.")  
                            
say("Wie du hin kommst ist ganz einfach")  
                            
say("Geh bitte zum NPC Heidi-Porter")           
                        elseif 
== 3 then  
                            say_title
("Bei welchem Level liegt die Levelgrenze?")  
                            
say("")  
                            
say("Die Levelgranze auf diesem Server liegt bei Level 150")  
                            
say("Warum bis Level 150?")  
                            
say("Weil der Spielspaß denn noch mehr")  
                            
say("gesteigert wird und damit man auch die neuen")  
                            
say("Waffen tragen kann usw.")       
                        elseif 
== 4 then  
                            say_title
("Wasserstein und Steinstück")  
                            
say("")  
                            
say("Für was braucht man die Items?:")  
                            
say("Diese 2 Items brauchst du um dein Equipment zu uppen")  
                            
say("und die bekommst du nur vom Drachen und Azrael")              
                        elseif 
== 5 then  
                            say_title
("Woher bekomm ich P-Skills?")  
                            
say("")  
                            
say("Auf der Paradiese Map")   
                            
say("Dort musst du dir deine Seelensteine und")  
                            
say("Exorzismus-Schriftrollen selbst farmen")  
                            
say("um deine Skills auf P setzten zu können")  
                            
say("oder du gewinnst bei einem Event einen")  
                            
say)"Regenbogenstein!"
                        elseif 
== 6 then  
                            say_title
("Info Bruder")  
                            
say("")  
                            
say_reward("Wähle eine Frage:")  
                            
say("")  
                            
local b select("Woher bekomm ich Pets?""Lohnt es sich zu Voten?""Wann gibt es Events?""Wichtig!""Abbrechen")              
                                if 
== 1 then  
                                    say_title
("Woher bekomm ich Pets?")  
                                    
say("")  
                                    
say("Die Pets bekommst du nur von Bosse")  
                                elseif 
== 2 then  
                                    say_title
("Lohnt es sich zu Voten?")  
                                    
say("")  
                                    
say("Es wird sich 100% lohnen das")  
                                    
say("Verspreche ich dir weil wir im")  
                                    
say("Itemshop PvP-Ringe & Equipment haben.")  
                                elseif 
== 3 then  
                                    say_title
("Wann gibt es Events?")  
                                    
say("")  
                                    
say("Ja es wird jeden Tag immer")  
                                    
say("1 Event geben z.b Ox und PvP-Events")  
                                    
say("die PvP-Events wird es 1-2 im Monat geben dafür")  
                                    
say("wirst du tolle Preise bekommen.")  
                                elseif 
== 4 then  
                                    say_title
("Wichtig!")  
                                    
say("")  
                                    
say("Voten nicht vergessen!!")  
                                elseif 
== 5 then 
                                    
return 
                                
end 
                            end 
                        end 
                    end 
                end 
            end 
04/26/2013 18:59 Marsia#7999
Quote:
Originally Posted by .мαяfυ™ View Post
Zuviele end's

PHP Code:
 quest info_tante begin  
    state start begin  
        when 20087.chat
."Info Bruder" begin  
            say_title
("Info Bruder")  
            
say("")  
            
say("Hallo:")  
            
say("Sakarya gibt es schon seit vielen vielen Jahren")  
            
say("in der Zeit hat sich auch viel verändert")  
            
say("aber man kann nie auf dem")  
            
say("neusten Stand sein und nicht immer wissen")  
            
say("wo man diese neuen Sachen findet.")  
            
say("Dies soll sich schnell ändern..")  
            
say("Ich vergebe so manche Informationen, die")  
            
say("du bestimmt noch nicht weißt")  
            
say("")  
            
say_reward("Möchtest du dich über diesen Server Informieren?")  
            
local s select("Ja, gerne""Nein, schon ok")   
                if 
== 2 then  
                    say_title
("Info Bruder")  
                    
say("Ok, denn nicht")  
                
end 
                
if == 1 then  
                    say_title
("Info Bruder")  
                    
say("")  
                    
say_reward("Wähle eine Frage:")  
                    
say("")  
                    
local a select("Wie kann ich leveln?""Woher bekomm ich die Uppitems?""Bei welchem Level liegt die Levelgrenze?""Wasserstein und Steinstück""Woher bekomm ich P-Skills?""Weiter")            
                        if 
== 1 then  
                            say_title
("Wie kann ich leveln?")  
                            
say("")  
                            
say("Geh bitte zu Heidi dort sollte alles stehen"
                        elseif 
== 2 then  
                            say_title
("Woher bekomm ich die Uppitems?")  
                            
say("")  
                            
say("Die Uppitems erfarmst du bei der Farmmap unter")  
                            
say("dem Namen Farmbad.")  
                            
say("Wie du hin kommst ist ganz einfach")  
                            
say("Geh bitte zum NPC Heidi-Porter")           
                        elseif 
== 3 then  
                            say_title
("Bei welchem Level liegt die Levelgrenze?")  
                            
say("")  
                            
say("Die Levelgranze auf diesem Server liegt bei Level 150")  
                            
say("Warum bis Level 150?")  
                            
say("Weil der Spielspaß denn noch mehr")  
                            
say("gesteigert wird und damit man auch die neuen")  
                            
say("Waffen tragen kann usw.")       
                        elseif 
== 4 then  
                            say_title
("Wasserstein und Steinstück")  
                            
say("")  
                            
say("Für was braucht man die Items?:")  
                            
say("Diese 2 Items brauchst du um dein Equipment zu uppen")  
                            
say("und die bekommst du nur vom Drachen und Azrael")              
                        elseif 
== 5 then  
                            say_title
("Woher bekomm ich P-Skills?")  
                            
say("")  
                            
say("Auf der Paradiese Map")   
                            
say("Dort musst du dir deine Seelensteine und")  
                            
say("Exorzismus-Schriftrollen selbst farmen")  
                            
say("um deine Skills auf P setzten zu können")  
                            
say("oder du gewinnst bei einem Event einen")  
                            
say)"Regenbogenstein!"
                        elseif 
== 6 then  
                            say_title
("Info Bruder")  
                            
say("")  
                            
say_reward("Wähle eine Frage:")  
                            
say("")  
                            
local b select("Woher bekomm ich Pets?""Lohnt es sich zu Voten?""Wann gibt es Events?""Wichtig!""Abbrechen")              
                                if 
== 1 then  
                                    say_title
("Woher bekomm ich Pets?")  
                                    
say("")  
                                    
say("Die Pets bekommst du nur von Bosse")  
                                elseif 
== 2 then  
                                    say_title
("Lohnt es sich zu Voten?")  
                                    
say("")  
                                    
say("Es wird sich 100% lohnen das")  
                                    
say("Verspreche ich dir weil wir im")  
                                    
say("Itemshop PvP-Ringe & Equipment haben.")  
                                elseif 
== 3 then  
                                    say_title
("Wann gibt es Events?")  
                                    
say("")  
                                    
say("Ja es wird jeden Tag immer")  
                                    
say("1 Event geben z.b Ox und PvP-Events")  
                                    
say("die PvP-Events wird es 1-2 im Monat geben dafür")  
                                    
say("wirst du tolle Preise bekommen.")  
                                elseif 
== 4 then  
                                    say_title
("Wichtig!")  
                                    
say("")  
                                    
say("Voten nicht vergessen!!")  
                                elseif 
== 5 then 
                                    
return 
                                
end 
                            end 
                        end 
                    end 
                end 
            end 
Bei dir werden quest,state und when nicht beendet.
04/26/2013 19:25 LikeCranK™#8000
doch sieht man doch ;) bei ihm
04/26/2013 21:27 .Despero™#8001
PHP Code:
quest baldbann begin
    state start begin
        when letter with pc
.is_gm() begin 
            send_letter
("Verwarnen")
        
end 
        when info 
or button begin
        say_title
("Verwarnpanel")
        
say_gold("Hier kannst du Spielern eine Verwarnung erteilen.")
        
say_gold("Die Verwarnungen sind nur für ***")
        
say_gold("einsichtbar und auch nur für uns beiden zurück")
        
say_gold("zu nehmen.")
        
say_gold("Willst du einen Player verwarnen?")
        
local verwarnen select ("Ja""Nein")
        if 
verwarnen == 2 then
        
return end
        
if verwarnen == 1 then
        
        say
("Gib den Namen des zu Verwarnenden Spielers ein")
        
        
local verwarnter input("")
        
        
mysql_query("UPDATE player.player SET Verwarnungen = Verwarnungen + 1 WHERE name='"..verwarnter.."';")
        
        
mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL 1 DAY WHERE id = (SELECT account_id FROM player.player WHERE Verwarnungen='3');")
        
    
end
    end
end
end 
Könnte jemand den Quest so erweitern das man sehen kann wie viel Verwarnungen welcher Char / Acc hat ? (NUR FÜR GM´s)

Und

PHP Code:
quest statistic begin
    state start begin
         when kill with npc
.get_empire() ~= pc.get_empire() begin
            
if npc.is_pc() then
                pc
.setqf(npc.get_empire().."_count"pc.getqf(npc.get_empire().."_kill")+1)
            else
                
pc.setqf("pvm_count"pc.getqf("pvm_count")+1)
            
end
        end

        when letter begin 
            send_letter
("Statistiken"
        
end 
         
        when button 
or info begin  
            say_title
("Statistiken:")
            
say("Hallo,")
            
say("Hier zeige ich dir deine Statistiken:")
            
say("")
            
say_green("Logins: ".." ".. pc.getqf("login_count") .."")
            
say("Logouts: ".." ".. pc.getqf("logout_count") .."")
            
say("Getöte Spieler: ".." ".. pc.getqf("killpc_count") .."")
            
say_red("- Rotes Reich : "..pc.getqf("1_count"))
            
say_yellow("- Gelbes Reich : "..pc.getqf("2_count"))
            
say_blue("- Blaues Reich : "..pc.getqf("3_count"))
            
say_blue2("Getötete Monster: ".." ".. pc.getqf("kill_count") .."")
        
end
        
        when login begin
            local login_count 
pc.getqf("login_count") + 1
            pc
.setqf("login_count"login_count)
            
q.set_counter("login_count"login_count)
        
end
        
        when logout begin
            local logout_count 
pc.getqf("logout_count") + 1
            pc
.setqf("logout_count"logout_count)
            
q.set_counter("logout_count"logout_count)
        
end
        when kill begin
            
if npc.is_pc() then
                local killpc_count 
pc.getqf("killpc_count") +1
                pc
.setqf("killpc_count"killpc_count)
                
q.set_counter("killpc_count"killpc_count)
            else
                
local kill_count pc.getqf("kill_count") +1
                pc
.setqf("kill_count"kill_count)
                
q.set_counter("kill_count"kill_count)
            
end
        end
    end
end 
Alles Klappt aber er zählt die say("Getöte Spieler: ".." ".. 0 + pc.getqf("killpc_count") .."") nicht :( da steht immer ein 0 egal ob ich ein spieler töte oder nicht.
04/27/2013 20:06 .Sεℜio×™#8002
Der Fehler: Der Npc, lässt sich nicht anklicken, bzw. führt die Quest nicht aus. In der Db ist bei on_click auf 2, die Quest hat 777 Rechte, mehrmals Rebootet und Quest neu geladen. -Nichts
04/27/2013 21:30 .Despero™#8003
Quote:
Originally Posted by Alores View Post
Der Fehler: Der Npc, lässt sich nicht anklicken, bzw. führt die Quest nicht aus. In der Db ist bei on_click auf 2, die Quest hat 777 Rechte, mehrmals Rebootet und Quest neu geladen. -Nichts
Du musst es auf on_click auf 1 nehmen
Bei mir klappt es immer mit on_click 1
04/28/2013 11:20 Scarified#8004
Bitte helfen!!!

Code:
quest berufauswahl begin 
    state beruf begin 
        when 20001.use begin 
            say_title("Wähle deinen Beruf:") 
			say("Folgende Möglichkeiten haben folgende Bonis:")
			say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
			say("")
			say("Krieger:	5.000 HP; 20 Str")
			say("Ninja:	5.000 HP; 20 Dex")
			say("Sura/Schamane:	5.000 HP; 20 Int")
			say("")
            local s=select("Krieger","Ninja","Sura/Schamane") 
            if s==1 then 
                affect.add_collect(apply.MAX_HP, 5000, 60*60*24*365*60) 
                affect.add_collect(apply.STR, 20, 60*60*24*365*60) 
                chat("Du bist jetzt ein richtiger Krieger. Du bekommst 5000 HP und 20 Stärkepunkte.") 
				pc.removeitem(20001, 1)
                set_state(__COMPLETE__) 
            elseif s==2 then 
                affect.add_collect(apply.MAX_HP, 5000, 60*60*24*365*60) 
                affect.add_collect(apply.DEX, 20, 60*60*24*365*60) 
                chat("Du bist jetzt ein richtiger Ninja. Du bekommst 5000 HP und 20 DEX Punkte.") 
				pc.removeitem(20001, 1)
                set_state(__COMPLETE__) 
            elseif s==3 then 
                affect.add_collect(apply.MAX_HP, 5000, 60*60*24*365*60) 
                affect.add_collect(apply.INT, 15, 60*60*24*365*60) 
                chat("Du bist jetzt ein richtiger Sura/Schamane. Du bekommst 5000 HP und 20 INT Punkte.") 
				pc.removeitem(20001, 1)
                set_state(__COMPLETE__) 
			end 
        end 
    end 
    state __COMPLETE__ begin 
    end 
end
04/28/2013 12:27 .ReDDoX™#8005
Hey :)

Ich suche jemanden der mir ein bisschen bei MySQL-Quests helfen kann.
Wenn sich jemand von euch damit gut auskennt & ein bisschen Zeit kann er mich ja in Skype adden: reddox.95
Wäre demjenigen echt dankbar! :)
04/28/2013 13:43 .Survivor#8006
Kann mir wer sagen wo der Unterschied bei einer Attribute Quest zwischen
Verteidigung und Schadensreduzierung ist?
Da meine Biologenquest einmal eine Belohnung gibt über 80 Verteidigung (PVM) und später dann
Schadensreduzierung von 5% eigl. gedacht für PVP&PVM. (Soll nicht DEF/Verteidigung geben sondern 5% Schadensreduzierung gegen alles)
Trotzdem haben beide Attribute die gleiche Quest:
PHP Code:
(apply.DEF_GRADE_BONUS 

Grüße
04/28/2013 16:01 .Despero™#8007
Quote:
Originally Posted by .Weezy™ View Post
PHP Code:
quest baldbann begin
    state start begin
        when letter with pc
.is_gm() begin 
            send_letter
("Verwarnen")
        
end 
        when info 
or button begin
        say_title
("Verwarnpanel")
        
say_gold("Hier kannst du Spielern eine Verwarnung erteilen.")
        
say_gold("Die Verwarnungen sind nur für ***")
        
say_gold("einsichtbar und auch nur für uns beiden zurück")
        
say_gold("zu nehmen.")
        
say_gold("Willst du einen Player verwarnen?")
        
local verwarnen select ("Ja""Nein")
        if 
verwarnen == 2 then
        
return end
        
if verwarnen == 1 then
        
        say
("Gib den Namen des zu Verwarnenden Spielers ein")
        
        
local verwarnter input("")
        
        
mysql_query("UPDATE player.player SET Verwarnungen = Verwarnungen + 1 WHERE name='"..verwarnter.."';")
        
        
mysql_query("UPDATE account.account SET availDt = NOW() + INTERVAL 1 DAY WHERE id = (SELECT account_id FROM player.player WHERE Verwarnungen='3');")
        
    
end
    end
end
end 
Könnte jemand den Quest so erweitern das man sehen kann wie viel Verwarnungen welcher Char / Acc hat ? (NUR FÜR GM´s)

Und

PHP Code:
-----------------------------
-- 
Statistik Quest by Imbattle
-----------------------------
quest statistic begin
    state start begin
         when kill with npc
.get_empire() ~= pc.get_empire() begin
            
if npc.is_pc() then
                pc
.setqf(npc.get_empire().."_count"pc.getqf(npc.get_empire().."_kill")+1)
            else
                
pc.setqf("pvm_count"pc.getqf("pvm_count")+1)
            
end
        end

        when letter begin 
            send_letter
("Statistiken"
        
end 
         
        when button 
or info begin  
            say_title
("Statistiken:")
            
say("Hallo,")
            
say("Hier zeige ich dir deine Statistiken:")
            
say("")
            
say_green("Logins: ".." ".. pc.getqf("login_count") .."")
            
say("Logouts: ".." ".. pc.getqf("logout_count") .."")
            
say("Getöte Spieler: ".." ".. pc.getqf("killpc_count") .."")
            
say_red("- Rotes Reich : "..pc.getqf("1_count"))
            
say_yellow("- Gelbes Reich : "..pc.getqf("2_count"))
            
say_blue("- Blaues Reich : "..pc.getqf("3_count"))
            
say_blue2("Getötete Monster: ".." ".. pc.getqf("kill_count") .."")
        
end
        
        when login begin
            local login_count 
pc.getqf("login_count") + 1
            pc
.setqf("login_count"login_count)
            
q.set_counter("login_count"login_count)
        
end
        
        when logout begin
            local logout_count 
pc.getqf("logout_count") + 1
            pc
.setqf("logout_count"logout_count)
            
q.set_counter("logout_count"logout_count)
        
end
        when kill begin
            
if npc.is_pc() then
                local killpc_count 
pc.getqf("killpc_count") +1
                pc
.setqf("killpc_count"killpc_count)
                
q.set_counter("killpc_count"killpc_count)
            else
                
local kill_count pc.getqf("kill_count") +1
                pc
.setqf("kill_count"kill_count)
                
q.set_counter("kill_count"kill_count)
            
end
        end
    end
end 
Alles Klappt aber er zählt die say("Getöte Spieler: ".." ".. 0 + pc.getqf("killpc_count") .."") nicht :( da steht immer ein 0 egal ob ich ein spieler töte oder nicht.
Kann es niemand beheben ?
04/29/2013 19:54 [SA]Soyku#8008
quest ork begin
state start begin
when 20094.chat."Töte die Orks (Ab Level 50)" begin
say_size(400, 350)
say_green("Töte die Orks")
say_green("")
say_green("Die Orks. Kennst du sie auch?")
say_green("Sie überwachen uns schon seit langem ")
say_green("und wir haben jeden Tag angst, dass sie")
say_green("angreifen. Nun wollen wir aber auch mal")
say_green("Mut zeigen und sie mit ihren eigenen Waffen")
say_green("schlagen. Kannst du mir dabei helfen?")
say_green("")
say_green("Töte 150 Orks in der Mitte des Orktals!")
say_green("")
say_green("Belohnung: 48er Rüstung+8")
say("")
say_green("Willst du die Quest beginnen?")
local a = select("Ja", "Nein")
if a == 2 then
return
elseif a == 1 then
if pc.get_level() < 50 then
say_size(400, 350)
say_green("Du bist erst "..pc.get_level().."!")
else
say_size(400, 350)
say_green("Viel Erfolg!")
pc.setqf("state", 150)
q.set_counter("Ork", 150)
set_state(ork)
end
end
end
end

state ork begin
when letter begin
send_letter("Töte die Orks")
end

when button or info begin
say_size(400, 350)
say_green("Orks:")
say_green("Du musst noch "..pc.getqf("state").." von 150 töten")
say_green("")
end

when 636.kill or 637.kill or 651.kill or 652.kill or 653.kill or 654.kill or 655.kill or 656.kill or 657.kill begin
local count = pc.getqf("state") - 1
if count <= 150 then
pc.setqf("state", count)
q.set_counter("Ork", -count)
end
if count == 0 then
if pc.job() == 0 then
say_size(400, 350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Schuppenplattenpanzer+8")
pc.give_item2(11268, 1)
set_state(__COMPLETE__)
elseif pc.job() == 1 then
say_size(400, 350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Jungdrachenanzug+8")
pc.give_item2(11468, 1)
set_state(__COMPLETE__)
elseif pc.job() == 2 then
say_size(400, 350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Nebelplattenpanzer+8")
pc.give_item2(11268, 1)
set_state(__COMPLETE__)
elseif pc.job() == 3 then
say_size(400, 350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Kleidung der Moral+8")
pc.give_item2(11868, 1)
set_state(__COMPLETE__)
end
end
end
end

state __COMPLETE__ begin
end
end




Bekomme die Quest nicht fertig, die Orks sind fertig und die Quest wird nicht fertig.
Man kann sie auch nicht abgeben.
04/29/2013 20:12 Chikyou#8009
Hi!
The devilscave.quest that .Nove posted, doesn't work for me, because when i login in the third level, i go back to city.
So, i created my own devil's catacomb quest, without d.s/getf. In fact, the quest isn't a dungeon, but, when finally i kill Charon (vnum 2597), it teleports me to the azrael's level, but, it send me to town too!
And... i don't know why.. if i change d.new_jump_all with pc.warp, it works!
But... a lot of persons killing Charon to go to the last level, it's.. i mean, it's not what i want.

Here the quest.
I hope someone can help me s:

Code:
quest catacumbas begin
	state start begin
		when 20367.chat."As Catacumbas do Demónio" begin
			say_title("Guarda das Catacumbas:")
			say("Por um momento chegas a acreditar que")
			say("o Fantasma da Morte foi derrotado. Mas")
			say("assim que cruzas a entrada para as")
			say("Catacumbas do Demónio, um ar gélido abate-se")
			say("sobre ti. Imediatamente consegues senti-lo:")
			say("a morte reina aqui nas profundezas. Como sempre.")
			say("Os gritos das almas amaldiçoadas acompanham")
			say("cada passo teu. Apreensivo, ergues a tua arma:")
			say("derrotas o Fantasma da Morte uma vez e irás")
			say("fazê-lo novamente!")
			wait()
			say_title("Guarda das Catacumbas:")
			say("Deves ser nível 75 para entrares.")
			say("Precisas de um Grupo.")
			say("")
			wait()
			if pc.get_level() >= 75 then
				say_title("Guarda das Catacumbas:")
				say("Sim... vejo que estás preparado")
				say("como para entrares nesta nova aventura.")
				say("Agora a decisão é tua: Queres entrar?")
				local a = select ("Sim", "Não")
				if a == 1 then
					--if party.is_party() then
						say_title("Guarda das Catacumbas:")
						say("Serás teleportado.")
						say("Boa sorte.")
						wait()
						pc.warp(415200, 4209200)
						pc.setqf("piso", 1)
						pc.setqf("droparchave", 1)
					--else
						--say_title("Guarda das Catacumbas:")
						--say("Lamento, precisas de ter um grupo")
						--say("para entrares nas catacumbas.")
					--end
				end
			else
				say_title("Guarda das Catacumbas:")
				say("Desculpa, não és forte o suficiente")
				say("como para entrares nas catacumbas.")
			end
		end
		when 2501.kill or 2502.kill or 2503.kill or 2505.kill begin
			if pc.getqf("piso") == 1 then
				local chave = math.random(1, 500)
				if chave >= 490 and pc.getqf("droparchave") == 1 then
					pc.setqf("droparchave", 0)
					game.drop_item("30311", 1)
				end
			end
		end
		when 30101.take with item.get_vnum() == 30311 begin
			say_title("Estátua de Kud")
			say("Serás teleportado.")
			wait()
			item.remove()
			pc.warp(463200, 4208200)
			pc.setqf("piso", 2)
		end
		when 30103.click begin
			say_title("Tartaruga de Rocha")
			say("Serás teleportado ao terceiro andar.")
			wait()
			pc.warp(542700, 4228200)
			pc.setqf("piso", 3)
		end
		when mverdadeira.timer begin
			if pc.getqf("piso") == 3 then
				say_title("As Catacumbas do Demónio")
				say("Serás teleportado.")
				wait()
				d.new_jump_all(209, 3143, 12657)
				pc.setqf("piso", 4)
			end
		end
		when 30104.click begin
			if pc.getqf("piso") == 4 then
				say_title("Estaca com Runas")
				say("Serás teleportado.")
				wait()
				d.new_jump_all(209, 4917, 42925)
				pc.setqf("piso", 5)
			end
		end
		when 2591.kill begin
			game.drop_item("30312", 1)
		end
		when 8038.kill begin
			local sorte = math.random(1, 7)
			if sorte == 1 then
				pc.setqf("mverdadeira1", 1)
				if pc.getqf("mverdadeira1") == 1 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			elseif sorte == 2 then
				pc.setqf("mverdadeira2", 2)
				if pc.getqf("mverdadeira2") == 2 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			elseif sorte == 3 then
				pc.setqf("mverdadeira3", 3)
				if pc.getqf("mverdadeira3") == 3 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			elseif sorte == 4 then
				pc.setqf("mverdadeira2", 4)
				if pc.getqf("mverdadeira4") == 4 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			elseif sorte == 5 then
				pc.setqf("mverdadeira5", 2)
				if pc.getqf("mverdadeira5") == 5 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			elseif sorte == 6 then
				pc.setqf("mverdadeira2", 6)
				if pc.getqf("mverdadeira6") == 6 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			elseif sorte == 7 then
				pc.setqf("mverdadeira2", 7)
				if pc.getqf("mverdadeira7") == 7 then
					timer("mverdadeira", 3)
					notice("Destruiram a metin verdadeira.")
				else
					notice("Destruiram uma metin falsa.")
				end
			end
		end
		when 30102.take with item.get_vnum() == 30312 begin
			say_title("Obelisco de Basalto")
			say("Serás teleportado.")
			wait()
			item.remove()
			pc.setqf("piso", 6)
			pc.warp(542200, 4278200)
		end
		when 2597.kill begin
			timer("piso7", 3)
		end
		when piso7.timer begin
			if pc.getqf("piso") == 6 then
				say_title("As Catacumbas do Demónio")
				say("Serão teleportados.")
				wait()
				d.new_jump_all(209, 4147, 43191)
				pc.setqf("piso", 7)
			end
		end
		when 2598.kill begin
			if pc.getqf("piso") == 7 then
				notice_all("O Grupo de "..pc.get_name().." matou o Azrael!")
				timer("mandar_cidade", 30)
			end
		end
		when mandar_cidade.timer begin
			say_title("As Catacumbas do Demónio")
			say("Parabéns por completarem as Catacumbas!")
			say("Agora serão teleportados às vossas cidades.")
			wait()
			warp_to_village()
			pc.setqf("piso", 0)
			pc.setqf("droparchave", 0)
		end
		when 45minutos.timer begin
			say_title("As Catacumbas do Demónio")
			say("Aventureiros, o tempo esgotou-se.")
			say("Serão teleportados às vossas cidades.")
			wait()
			warp_to_village()
		end
		when login with pc.get_map_index() == 209 begin
			if pc.getqf("piso") == 1 then
				say_title("As Catacumbas do Demónio")
				say("Neste primeiro piso, deves matar os monstros")
				say("até encontrares a Chave de Azurite.")
				say_item_vnum(30311)
				say("Quando a possuires, tens que a colocar na ")
				say("Estátua de Kud, localizada no final deste mesmo")
				say("Piso. Tens 45 minutos para completares o mapa todo")
				say("por isso, apressa-te! Boa sorte!")
				timer("45minutos", 2700)
			elseif pc.getqf("piso") == 2 then
				say_title("As Catacumbas do Demónio")
				say("Parabéns, Chegaste ao segundo piso.")
				say("Aqui terás que encontrar o caminho até à ")
				say("Tartaruga de Rocha. Ela levar-te-á até ao ")
				say("piso seguinte.")
			elseif pc.getqf("piso") == 3 then
				say_title("As Catacumbas do Demónio")
				say("Neste terceiro piso, deverás descobrir")
				say("qual a Metin verdadeira, destruindo todas")
				say("as Metins da Desforra que vires.")
				say("Quando a verdadeira for destruída, ")
				say("passarão para o piso 4.")
			elseif pc.getqf("piso") == 4 then
				say_title("As Catacumbas do Demónio")
				say("Aqui no Labirinto, deverão encontrar")
				say("o caminho correto para chegar à Estaca ")
				say("com Runas. Deverão seguir uma combinação")
				say("correta, através dos portais, para chegar a ela.")
			elseif pc.getqf("piso") == 5 then
				 say_title("As Catacumbas do Demónio")
				 say("No quinto andar das catacumbas, devem matar")
				 say("o Boss Tártaros, de modo a obter o Totem de Rosto.")
				 say_item_vnum(30312)
				 say("Uma vez que possuam este item, deverão mete-lo no")
				 say("Obelisco de Basalto.")
			elseif pc.getqf("piso") == 6 then
				say_title("As Catacumbas do Demónio")
				say("Mata o Boss Charon e chegarás ao último")
				say("andar das Catacumbas.")
			elseif pc.getqf("piso") == 7 then
				notice("Último andar das Catacumbas.")
				notice("Matem o Azrael.")
			end
		end
	end
end
04/29/2013 20:49 LikeCranK™#8010
Quote:
Originally Posted by [SA]Soyku View Post
PHP Code:
quest ork begin
state start begin 
when 20094.chat
."Töte die Orks (Ab Level 50)" begin
say_size
(400350)
say_green("Töte die Orks")
say_green("")
say_green("Die Orks. Kennst du sie auch?")
say_green("Sie überwachen uns schon seit langem ")
say_green("und wir haben jeden Tag angst, dass sie")
say_green("angreifen. Nun wollen wir aber auch mal")
say_green("Mut zeigen und sie mit ihren eigenen Waffen")
say_green("schlagen. Kannst du mir dabei helfen?")
say_green("")
say_green("Töte 150 Orks in der Mitte des Orktals!")
say_green("")
say_green("Belohnung: 48er Rüstung+8")
say("")
say_green("Willst du die Quest beginnen?")
local a select("Ja""Nein")
if 
== 2 then
return
elseif 
== 1 then
if pc.get_level() < 50 then
say_size
(400350)
say_green("Du bist erst "..pc.get_level().."!")
else
say_size(400350)
say_green("Viel Erfolg!")
pc.setqf("state"150)
q.set_counter("Ork"150)
set_state(ork)
end
end
end
end

state ork begin
when letter begin
send_letter
("Töte die Orks")
end

when button 
or info begin
say_size
(400350)
say_green("Orks:")
say_green("Du musst noch "..pc.getqf("state").." von 150 töten")
say_green("")
end

when 636.kill 
or 637.kill or 651.kill or 652.kill or 653.kill or 654.kill or 655.kill or 656.kill or 657.kill begin
local count 
pc.getqf("state") - 1
if count <= 150 then
pc
.setqf("state"count)
q.set_counter("Ork", -count)
end
if count == 0 then
if pc.job() == 0 then
say_size
(400350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Schuppenplattenpanzer+8")
pc.give_item2(112681)
set_state(__COMPLETE__)
elseif 
pc.job() == 1 then
say_size
(400350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Jungdrachenanzug+8")
pc.give_item2(114681)
set_state(__COMPLETE__)
elseif 
pc.job() == 2 then
say_size
(400350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Nebelplattenpanzer+8")
pc.give_item2(112681)
set_state(__COMPLETE__)
elseif 
pc.job() == 3 then
say_size
(400350)
say_green("Töte die Orks")
say_green("")
say_green("Sehr schön! Du hast es geschafft.")
say_green("Nun sind wir endlich wieder sicher!")
say_green("Hier ist deine Belohnung:")
say_green("- Kleidung der Moral+8")
pc.give_item2(118681)
set_state(__COMPLETE__)
end    
end
end
end

state __COMPLETE__ begin
end
end 



Bekomme die Quest nicht fertig, die Orks sind fertig und die Quest wird nicht fertig.
Man kann sie auch nicht abgeben.
Fehlermeldung?