[SERVICE] Die Questerstellung

01/12/2014 11:36 xFliege#976
Es kommt kein Fehler aber wenn ich auf das Item klick passiert nichts, ist type 18.
01/12/2014 11:40 .LuckyStrike#977
Quote:
Originally Posted by xFliege View Post
Es kommt kein Fehler aber wenn ich auf das Item klick passiert nichts, ist type 18.

Aber du hast das Item bekommen?
Wenn ja dann liegt es nicht an dieser Quest. :)
01/12/2014 11:42 xFliege#978
Ja liegt nicht an der Quest bei mir gehen gerade generell keine quests mehr xD
Immer wenn ich die Quest mit einschreib gehen keine Questitems mehr.

PHP Code:
quest  item_pet_wahl begin  
    state start begin  
        when 50179.
use begin  
            local x 
= {    5300153002530035300553006,  
                           
530075300853009530105301153012 53013 }  
            
say_title("Haustier-Bestellung")  
            
say("Duch diese Rolle kannst du dir ein Haustier bestellen.")  
            
say("Die Verfügbaren Haustiere sind unten aufgelistet.")  
            
say("Wähle dein Haustier.")  
            
local d select("Feuer Phönix""Baby Rentier""Eis Phönix""Baby Azrael""Rufus""Leonidas""Porkey""Khan""Knuud""BaoBao""Boney""Dickes Henkerchen")
            
pc.give_item2(x[d], 1)  
        
end  
    end  
end 
Könntest du mir das anpassen das ich zwei Seiten hab?
01/12/2014 12:25 .yorliK#979
Quote:
Originally Posted by xFliege View Post
Ja liegt nicht an der Quest bei mir gehen gerade generell keine quests mehr xD
Immer wenn ich die Quest mit einschreib gehen keine Questitems mehr.
Könntest du mir das anpassen das ich zwei Seiten hab?
Ich kenn mich mit den listen zwar noch nicht so gut aus, aber so wie ichs jetzt probiert habe funktionierts.

PHP Code:
quest  item_pet_wahl begin  
    state start begin  
        when 50179.
use begin  
            local x 
= {    5300153002530035300553006,  
                    
53007 } -- 6 Pets für select d
            local f 
= {    5300853009530105301153012 ,
                    
53013 }  -- 6 Pets für select n
            say_title
("Haustier-Bestellung")  
            
say("Duch diese Rolle kannste dir ein Haustier bestellen.")  
            
say("Die Verfügbaren Haustiere sind unten aufgelistet.")  
            
say("Wähle dein Haustier.")  
            
local d select("Feuer Phönix""Baby Rentier""Eis Phönix""Baby Azrael""Rufus""Leonidas""Weiter")
            if 
== 7 then
                local n
select("Porkey""Khan""Knuud""BaoBao""Boney""Dickes Henkerchen""Schließen")
                if 
== 7 then
                    
return
                else
                    
pc.give_item2(f[n], 1)
                
end
            
else
            
pc.give_item2(x[d], 1)  
            
end
        end  
    end  
end 
01/12/2014 12:28 K.A.K.A.S.H.I#980
Ich bräuchte eine Quest.
Die jedesmal Links bei den Quest angezeigt wird.
Die Quest soll dich ab Level 120 auf Max Level bringen.
Die Quest soll erst ab 120 erscheinen.
Wäre sehr nett wenn sie jemand schreiben könnte.
01/12/2014 12:41 J3igStar13#981
Kann mir einer ne quest schreiben, wo man aus einer bestimmten truhe verschieden items bekommt wo man auswählen kann zu wie viel prozent das item kommt.

Danke°
01/12/2014 13:08 .Soυzα#982
Hallo Leute ich habe ein problem mit meiner Quest kann mir da einer eine, richige erstellen oder die Editieren.??

Mit dem Tiger/Panda/Eisbär kann man Bugen die letzten unten.
Mann kann die wegrufen und rufen abwechelnd und Bonis stappelt sich.

PHP Code:
quest official_pets begin
    state start begin
        when 53001.
use with pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == and pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("tiger") == 0 begin
            
if pc.getqf("firephoenix_use") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP) ")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("firephoenix_use"1)
                
pc.setqf("firephoenix"1)
                
affect.add_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.add_collect(apply.MAX_HP250060*60*8)
                
horse.set_level("22")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP) ")
                
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.remove_collect(apply.MAX_HP250060*60*8)                
                
horse.unsummon()
                
pc.setqf("firephoenix_use"0)
                
pc.setqf("firephoenix"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("firephoenix_use") == 1 begin
            
            pc
.setqf("firephoenix_use"0)
            
pc.setqf("firephoenix"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
            
affect.remove_collect(apply.MAX_HP250060*60*8
        
end
        when 53003.
use with pc.getqf("firephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == and pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("tiger") == 0 begin
            
if pc.getqf("icephoenix_use") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP) ")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("icephoenix_use"1)
                
pc.setqf("icephoenix"1)
                
affect.add_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.add_collect(apply.MAX_HP250060*60*8)
                
horse.set_level("23")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP) ")
                
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.remove_collect(apply.MAX_HP250060*60*8)       
                
horse.unsummon()
                
pc.setqf("icephoenix_use"0)
                
pc.setqf("icephoenix"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("icephoenix_use") == 1 begin
            
            pc
.setqf("icephoenix_use"0)
            
pc.setqf("icephoenix"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
            
affect.remove_collect(apply.MAX_HP250060*60*8)
        
end
        when 53002.
use with pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("pwahuang") == and pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("tiger") == 0 begin
            
if pc.getqf("reindeer") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("20% Stark gegen Halbmenschen")
                
chat("5000 Trefferpunkte (TP) ")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("reindeer_use"1)
                
pc.setqf("reindeer"1)
                
affect.add_collect(apply.ATTBONUS_HUMAN2060*60*8)
                
affect.add_collect(apply.MAX_HP500060*60*8)
                
horse.set_level("24")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("20% Stark gegen Halbmenschen")
                
chat("5000 Trefferpunkte (TP) ")
                
affect.remove_collect(apply.ATTBONUS_HUMAN2060*60*8)
                
affect.remove_collect(apply.MAX_HP500060*60*8)
                
horse.unsummon()
                
pc.setqf("reindeer_use"0)
                
pc.setqf("reindeer"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("reindeer_use") == 1 begin
            
            pc
.setqf("reindeer_use"0)
            
pc.setqf("reindeer"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATTBONUS_HUMAN2060*60*8)
            
affect.remove_collect(apply.MAX_HP500060*60*8)
        
end
        when 53005.
use with pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("tiger") == 0 begin
            
if pc.getqf("pwahuang") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("100 Angriffspunkte (AW)")
                
chat("5000 Trefferpunkte (TP) ")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("pwahuang_use"1)
                
pc.setqf("pwahuang"1)
                
affect.add_collect(apply.ATT_GRADE_BONUS10060*60*8)
                
affect.add_collect(apply.MAX_HP500060*60*8)
                
horse.set_level("25")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("100 Angriffspunkte (AW)")
                
chat("5000 Trefferpunkte (TP) ")
                
affect.remove_collect(apply.ATT_GRADE_BONUS10060*60*8)
                
affect.remove_collect(apply.MAX_HP500060*60*8)
                
horse.unsummon()
                
pc.setqf("pwahuang_use"0)
                
pc.setqf("pwahuang"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("pwahuang_use") == 1 begin
            
            pc
.setqf("pwahuang_use"0)
            
pc.setqf("pwahuang"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.DEF_GRADE_BONUS10060*60*8)
            
affect.remove_collect(apply.MAX_HP500060*60*8)
        
end
        when 53006.
use with pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("tiger") == and pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == 0 begin
            
if pc.getqf("dog_use") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP) ")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("dog_use"1)
                
pc.setqf("dog"1)
                
affect.add_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.add_collect(apply.MAX_HP250060*60*8)
                
horse.set_level("26")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP) ")
                
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.remove_collect(apply.MAX_HP250060*60*8)
                
horse.unsummon()
                
pc.setqf("dog_use"0)
                
pc.setqf("dog"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("dog_use") == 1 begin
            
            pc
.setqf("dog_use"0)
            
pc.setqf("dog"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
            
affect.remove_collect(apply.MAX_HP250060*60*8)        
        
end
        when 53007.
use with pc.getqf("dog") == and pc.getqf("pig") == and pc.getqf("tiger") == and pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == 0 begin
            
if pc.getqf("lion_use") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP)")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("lion_use"1)
                
pc.setqf("lion"1)
                
affect.add_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.add_collect(apply.MAX_HP250060*60*8)
                
horse.set_level("27")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("50 Angriffspunkte (AW)")
                
chat("2500 Trefferpunkte (TP)")
                
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.remove_collect(apply.MAX_HP250060*60*8)
                
horse.unsummon()
                
pc.setqf("lion_use"0)
                
pc.setqf("lion"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("lion_use") == 1 begin
            
            pc
.setqf("lion_use"0)
            
pc.setqf("lion"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
            
affect.remove_collect(apply.MAX_HP250060*60*8)
        
end
        when 53008.
use with pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("tiger") == and pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == 0 begin
            
if pc.getqf("pig") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("20% Stark gegen Halbmenschen!")
                
chat("7500 Trefferpunkte (TP)")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("pig_use"1)
                
pc.setqf("pig"1)
                
affect.add_collect(apply.ATTBONUS_HUMAN2060*60*8)
                
affect.add_collect(apply.MAX_HP750060*60*8)
                
horse.set_level("28")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("20% Stark gegen Halbmenschen!")
                
chat("7500 Trefferpunkte (TP)")
                
affect.remove_collect(apply.ATTBONUS_HUMAN2060*60*8)
                
affect.remove_collect(apply.MAX_HP750060*60*8)
                
horse.unsummon()
                
pc.setqf("pig_use"0)
                
pc.setqf("pig"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("pig_use") == 1 begin
            
            pc
.setqf("pig_use"0)
            
pc.setqf("pig"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATTBONUS_HUMAN2060*60*8)
            
affect.remove_collect(apply.MAX_HP750060*60*8)
        
end
        when 53009.
use with pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == 0 begin
            
if pc.getqf("tiger") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("2500 Trefferpunkte (TP)")
                
chat("50 Angriffspunkte (AW)")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("tiger_use"1)
                
pc.setqf("tiger"1)
                
affect.add_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.add_collect(apply.MAX_HP250060*60*8)
                
horse.set_level("29")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("2500 Trefferpunkte (TP)")
                
chat("50 Angriffspunkte (AW)")
                
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
                
affect.remove_collect(apply.MAX_HP250060*60*8)
                
horse.unsummon()
                
pc.setqf("tiger_use"0)
                
pc.setqf("tiger"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("tiger_use") == 1 begin
            
            pc
.setqf("tiger_use"0)
            
pc.setqf("tiger"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATT_GRADE_BONUS5060*60*8)
            
affect.remove_collect(apply.MAX_HP250060*60*8)
        
end
        when 53014.
use with pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == 0 begin
            
if pc.getqf("tiger") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("10% Chance körperlichen Angriff abzublocken")
                
chat("5000 Trefferpunkte (TP)")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("tiger_use"1)
                
pc.setqf("tiger"1)
                
affect.add_collect(apply.BLOCK1060*60*8)
                
affect.add_collect(apply.MAX_HP500060*60*8)
                
horse.set_level("30")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("10% Chance körperlichen Angriff abzublocken")
                
chat("5000 Trefferpunkte (TP)")
                
affect.remove_collect(apply.BLOCK1060*60*8)
                
affect.remove_collect(apply.MAX_HP500060*60*8)
                
horse.unsummon()
                
pc.setqf("tiger_use"0)
                
pc.setqf("tiger"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("tiger_use") == 1 begin
            
            pc
.setqf("tiger_use"0)
            
pc.setqf("tiger"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.BLOCK1060*60*8)
            
affect.remove_collect(apply.MAX_HP500060*60*8)
        
end
        when 53002.
use with pc.getqf("dog") == and pc.getqf("lion") == and pc.getqf("pig") == and pc.getqf("firephoenix") == and pc.getqf("icephoenix") == and pc.getqf("reindeer") == and pc.getqf("pwahuang") == 0 begin
            
if pc.getqf("tiger") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        chat
("Dein Haustier hat noch keinen Namen!")
                    
end
                chat
("Dein Haustier wurde gerufen!")
                
chat("Du erhälst folgende Bonis:")
                
chat("20% Stark gegen Halbmenschen")
                
chat("5000 Trefferpunkte (TP)")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("tiger_use"1)
                
pc.setqf("tiger"1)
                
affect.add_collect(apply.ATTBONUS_HUMAN2060*60*8)
                
affect.add_collect(apply.MAX_HP500060*60*8)
                
horse.set_level("31")
                
horse.unsummon() horse.summon()
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            else
                
chat("Dein Haustier verabschiedet sich nun von dir!")
                
chat("Dir werden folgende Zusatzbonis entfehrnt:")
                
chat("20% Stark gegen Halbmenschen")
                
chat("5000 Trefferpunkte (TP)")
                
affect.remove_collect(apply.ATTBONUS_HUMAN2060*60*8)
                
affect.remove_collect(apply.MAX_HP500060*60*8)
                
horse.unsummon()
                
pc.setqf("tiger_use"0)
                
pc.setqf("tiger"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("tiger_use") == 1 begin
            
            pc
.setqf("tiger_use"0)
            
pc.setqf("tiger"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Haustier ging alleine fort!")
            
affect.remove_collect(apply.ATTBONUS_HUMAN2060*60*8)
            
affect.remove_collect(apply.MAX_HP500060*60*8)
        
end
        when 39034.
use begin
            horse
.set_level(23)
            
say_title("Haustierzucker:")
            
say("")
            
say("Hallo meister, "..pc.get_name()..".")
            
say("Mit diesem Item kannst du den Namen deines")
            
say("Haustiers ändern.")
            
say("")
            
say("")
            
say_reward("Achtung: Alle Haustiere besitzen dann den gleichen namen!")
            
say_reward("Bitte gib nun den Namen deines Haustieres ein:")
            
local horse_name input()
                if 
string.len(horse_name) < 2 then
                    say_title
("Haustierzucker:")
                    
say("Der Name ist zu kurz.")
                    
say("")
                    
horse.unsummon()
                    return
                elseif 
string.len(horse_name) > 12 then
                    say_title
("Haustierzucker:")
                    
say("Der Name ist zu lang.")
                    
say("")
                    
horse.unsummon()
                    return
                
end
            local ret 
horse.set_name(horse_name)
                
say_title("Haustier:")
            if 
ret == 0 then
                say_reward
("Du hast momentan kein Haustier.")
                
say("")
                
horse.unsummon()
            elseif 
ret == 1 then
                say_reward
("Du kannst diesen Namen nicht benutzen!")
                
say("")
                
horse.unsummon()
            elseif 
ret == 2 then
                say_title
("Haustier:")
                
say("Warte bitte einen moment ich muss kurz überlegen !")
                
say("[DELAY value;340]...[/DELAY]")
                
say_reward("Ok, der Name "..horse_name.." ist ein guter.")
                
say("Ich wünsche dir viel Spaß mit deinem Haustier!")
                
horse.unsummon()
                
pc.remove_item("39034")
            
end
        end
    end
end 
01/12/2014 13:36 .yorliK#983
Quote:
Originally Posted by Lightbox View Post
Ich bräuchte eine Quest.
Die jedesmal Links bei den Quest angezeigt wird.
Die Quest soll dich ab Level 120 auf Max Level bringen.
Die Quest soll erst ab 120 erscheinen.
Wäre sehr nett wenn sie jemand schreiben könnte.
Nach deinem Endlevel anpassen. ENDLEVEL ändern in z.B. 150

PHP Code:
quest Level120b begin
    state start begin
        when login 
or levelup with pc.level>119 begin
        set_state
(Is120)
        
end
    end
    
    state Is120 begin
        when letter begin
        send_letter
("Level 120!")
        
end
        when button 
or info begin
            say_title
("Level 120!")
            
say("")
            
say("Da du nun Level 120 bist werde ich")
            
say("dich sofort aufs Endlevel setzen.")
            
say("")
            
wait()
            
say_reward("Du bist nun Level ENDLEVEL")
            while 
pc.get_level() < ENDLEVEL do
            
local a pc.get_next_exp()
            
pc.give_exp2(a)
            
end
            set_state
(__COMPLETE__)
        
end
    end
    state __COMPLETE__ begin
    end
end 
01/12/2014 14:14 xFliege#984
Quote:
Originally Posted by Kilroy. View Post
Ich kenn mich mit den listen zwar noch nicht so gut aus, aber so wie ichs jetzt probiert habe funktionierts.

PHP Code:
quest  item_pet_wahl begin  
    state start begin  
        when 50179.
use begin  
            local x 
= {    5300153002530035300553006,  
                    
53007 } -- 6 Pets für select d
            local f 
= {    5300853009530105301153012 ,
                    
53013 }  -- 6 Pets für select n
            say_title
("Haustier-Bestellung")  
            
say("Duch diese Rolle kannste dir ein Haustier bestellen.")  
            
say("Die Verfügbaren Haustiere sind unten aufgelistet.")  
            
say("Wähle dein Haustier.")  
            
local d select("Feuer Phönix""Baby Rentier""Eis Phönix""Baby Azrael""Rufus""Leonidas""Weiter")
            if 
== 7 then
                local n
select("Porkey""Khan""Knuud""BaoBao""Boney""Dickes Henkerchen""Schließen")
                if 
== 7 then
                    
return
                else
                    
pc.give_item2(f[n], 1)
                
end
            
else
            
pc.give_item2(x[d], 1)  
            
end
        end  
    end  
end 
Danke :)
01/12/2014 19:35 J3igStar13#985
Quote:
Kann mir einer ne quest schreiben, wo man aus einer bestimmten truhe verschieden items bekommt wo man auswählen kann zu wie viel prozent das item kommt.

Danke°
Und ich bräuchte ne Quest wo ich ein bestimmtes Item gg ein NPC tausche und je nach rasse kriegt er die rüssi und das item soll verschwinden..

Mfg
01/12/2014 20:16 Mijago#986
Quote:
Originally Posted by J3igStar13 View Post
Und ich bräuchte ne Quest wo ich ein bestimmtes Item gg ein NPC tausche und je nach rasse kriegt er die rüssi und das item soll verschwinden..

Mfg
Code:
quest trade01 begin
    state start begin
        when 1234.take begin
            local item = ({
                [19] = {11289,11489,11689,11889},
               -- [29] = {11299,11499,11699,11899},
            })[item.get_vnum()][pc.get_race()+1]
            pc.give_item2(item,1)
           item.remove()
        end
    end
end
da kannst du einstellen, was man für was bekommen soll :)

kannst auch nur eine Zeile nehmen :D
01/13/2014 06:31 Noa_#987
Quote:
Originally Posted by Mijago View Post
Code:
quest trade01 begin
    state start begin
        when 1234.take begin
            local item = ({
                [19] = {11289,11489,11689,11889},
               -- [29] = {11299,11499,11699,11899},
            })[item.get_vnum()][pc.get_race()+1]
            pc.give_item2(item,1)
           item.remove()
        end
    end
end
tabellenbeschreibung
PHP Code:
local item = ({[19] = -- item vnum 
{    11289, -- krieger
                        11489
, -- ninja
                        11689
, -- sura
                        11889 
-- Schami
                        
}})[item.get_vnum()][pc.get_race()+1
01/13/2014 17:15 xFliege#988
PHP Code:
quest marriage_manage begin
state start begin
when oldwoman
.chat."Ich will heiraten" with not pc.is_engaged_or_married() begin
if not npc.lock() then
say
("Guten Tag")
say("Moechtet Ihr tatsaechlich heiraten??")
return
end
if pc.level 25 then
say
("Nun denn...")
say("Ich habe leider eine schlechte Nachricht..")
say("Es sieht ganz so aus,")
say("als ob Ihr nicht die")
say("noetige Erfahrung ")
say("fuer eine Hochzeit habt.")
say("")
say_reward("Kommt wieder, wenn Ihr das Level 25 erreicht habt.")
say("")
npc.unlock()
return
end

local m_ring_num 
pc.countitem(70301)
local m_has_ring m_ring_num 0
if not m_has_ring then
say
("Nun denn...")
say("Euch fehlt etwas..")
say("")
say_item("Beide brauchen einen"70301"")
say_reward("Kommt wieder, wenn ihr einen Verlobungsring habt.")
say("")
npc.unlock()

return
end

local m_sex 
pc.get_sex()
if 
not marriage_manage.is_equip_wedding_dress() then
say
("Nun denn....")
say("So wollt Ihr heiraten?")
say("Euch fehlt die noetige Kleidung!")
say("So kann man sich nicht sehen lassen!")
say("")

if 
m_sex==0 then
say_item
("Kleidung"marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nun denn...")
say_reward("Einer hat keine Hochzeitskleidung!")
else
say_item("Kleidung"marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nun denn...")
say_reward("Einer hat keine Hochzeitskleidung!")
end
say
("")
npc.unlock()
return
end

local NEED_MONEY 
1000000
if pc.get_money() < NEED_MONEY then
say
("Nun denn...")
say("Etwas kostet das schoene Spielchen..")
say("Und ihr scheint")
say("nicht das noetige Geld zu haben!")
say("Kommt doch wieder, wenn ihr 1.000.000 Yang habt.")
say("")
say_reward(string.format("??¡ÓB?O????*n %d?U??"NEED_MONEY/10000))
say("")
npc.unlock()
return
end

say
("Alte Frau:")
say("Jetzt bist du erwachsen und")
say("kannst heiraten.")
say("Mit wem willst du heiraten?")
say("")
say_reward("Bitte gib den Namen ein:")

local sname input()
if 
sname == "" then
say
("Alte Frau:")
say("Du musst keine Angst vor")
say("dem Heiraten haben.")
say("Komme wieder, wenn du")
say("die richtige Entscheidung getroffen hast.")
say("")
npc.unlock()
return
end

local u_vid 
find_pc_by_name(sname)
local m_vid pc.get_vid()
if 
u_vid == 0 then
say
("Alte Frau:")
say("Du weisstden Namen nicht?")
say("Nun gut - Komme wieder, wenn du")
say("den richtigen Namen kennst.")
say("")
say_reward(string.format("%s aehnliche Namen wie"sname))
say("")
npc.unlock()
return
end

if not npc.is_near_vid(u_vid10then
say
("Alte Frau:")
say("Die Person, mt der du Heiraten")
say("willst, muss auch bei mir sein.")
say("Suche die Person und")
say("kommt dann zu mir zurueck.")
say("")
say_reward(string.format("%s ist die Distanz zu"sname))
say("")
npc.unlock()
return
end

local old 
pc.select(u_vid)
local u_level pc.get_level()
local u_job pc.get_job()
local u_sex pc.get_sex()
local u_name pc.name
local u_gold 
pc.get_money()
local u_married pc.is_married()
local u_has_ring pc.countitem(70301) > 0
local u_wear 
marriage_manage.is_equip_wedding_dress()
pc.select(old)
local m_level pc.get_level()

if 
u_vid == m_vid then
say
("Alte Frau:")
say("Das ist doch dein eigener Name.")
say("")
say_reward("Du kannst dich nicht selber heiraten.")
say("")
npc.unlock()
return
end

if u_sex == m_sex then
say
("Alte Frau:")
say("Es tut mir Leid, aber")
say("ich kann keine gleichgeschlechtlichen")
say("Ehen zulassen.")
say("")
say_reward("Keine gleichgeschlechtliche Ehe moeglich!")
say("")
npc.unlock()
return
end

if u_married then
say
("Alte Frau:")
say("Wusstest du nicht, dass die")
say("Person schon verheiratet ist?")
say("Du solltest nicht zu voreilig sein.")
say("")
say_reward(string.format("%s verheiratet gewesen."sname))
say("")
npc.unlock()
return
end

if u_level 25 then
say
("Alte Frau:")
say("Die Person ist noch zu jung.")
say("Junge und alte Menschen haben")
say("verschiedene Beduerfnisse...")
say("")
say_reward("Die Person muss das Level 25")
say_reward("erreichen, bevor Sie heiraten kann.")
say("")
npc.unlock()
return
end

if m_level u_level 15 or u_level m_level 15 then
say
("AlteFrau:")
say("Euer Levelunterschied ist einfach zu hoch.")
say("Das wuerde nur Probleme geben...")
say("Das kann ich einfach nicht zulassen.")
say("")
say_reward("Charaktere mit mehr als 15 Leveln ")
say_reward("Unterschied koennen nicht heiraten.")
say("")
npc.unlock()
return
end

if not u_has_ring then
if m_ring_num >= 2 then
say
("Alte Frau:")
say("Um zu eiraten, brauchst du ein")
say("Zeichen der Liebe.")
say("Komme wieder, wenn du eines")
say("hast.")
else
say("Alte Frau:")
say("Denke daran, ein Zeichen")
say("der Liebe zu tragen.")
say("")
end

say_item
("Als Zeichen der Liebe verwendbar."70301"")
say_reward("Die andere Person muss")
say_reward("auch ein Zeichen der Liebe tragen.")
say("")
npc.unlock()
return
end

if not u_wear then
say
("Alte Frau:")
say("Du hast keine Hochzeitskleidung an.")
say("Es waere Peinlich, mit einer Ruestung")
say("zu heiraten.")
say("Komme wieder, wenn du dich")
say("passend eingekleidet hast.")
say("")
if 
u_sex==0 then
say_item
("Kleidung"marriage_manage.get_wedding_dress(u_job), "")
say_reward("Um zu heiraten, musst du diese")
say_reward("Kleidung tragen.")
else
say_item("Kleidung"marriage_manage.get_wedding_dress(u_job), "")
say_reward("Um zu heiraten, musst du")
say_reward("ein Hochzeitskleid tragen.")
end
say
("")
npc.unlock()
return
end


local ok_sign 
confirmu_vid"Willst du"..pc.name.. "heiraten?"30)
if 
ok_sign == CONFIRM_OK then
local m_name 
pc.name
if pc.get_gold()>=NEED_MONEY then
pc
.change_gold(-NEED_MONEY)

pc.removeitem(703011)
pc.give_item2(703021)
local old pc.select(u_vid)
pc.removeitem(703011)
pc.give_item2(703021)
pc.select(old)

say("Alte Frau:")
say("Wir sind nun bereit, um")
say("die Hochzeit veranstalten zu koennen.")
say("Zum Ausdruck meiner Liebe zu euch")
say("spreche ich euch nun den Segen aus.")
say("Die Hochzeit findet auf der Insel der")
say("Liebe statt. ")
say("")
say_reward("Ich schicke euch nun")
say_reward("zur Insel der Liebe.")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say("Alte Frau:")
say("Dein Partner will dich nicht heiraten.")
say("Ein Gespraech wird euch")
say("sicherlich helfen.")
say("")
say_reward("Dein Partner weigerte sich,")
say_reward("zu heiraten.")
end
say
("")
npc.unlock()
end
-- ?? ???? ???? ??? ??

when oldwoman.chat."zur Hochzeit" with pc.is_engaged() begin
say
("Nun denn..")
say("Euer Ehepartner")
say("befindet sich nicht in eurem Reich!!!")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end


when 9011.chat
."Ehe anerkennen" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say
("Nun denn..")
say("Euer Partner ist entweder verheiratet oder")
say("befindet sich in einem anderen Reich!")
say("")
return
end
say
("Sofern der Partner")
say("in einem anderen Reich ist,")
say("kann er es jederzeit ueber das Item")
say("Tinktur der Reiche das Reich wechseln.")
say("Eine Scheidung kann den Ehepartner loesen.")

local sname input()
local u_vid find_pc_by_name(sname)
local m_vid pc.get_vid()

if 
u_vid == 0 then
say
("Ihr seid zu")
say("schwach um mit eurem Partner")
say("zu heiraten...")
say("")
say_reward(string.format("%s Parallelen zu"sname))
say("")
npc.unlock()
return
end

if not npc.is_near_vid(u_vid10then
say
("Nun denn..")
say("Eine Heirat innerhalb")
say("eines Geschlechts ist nicht moeglich.")
say("")
say("")
say_reward(string.format("%s zu dir bewegen muss sich"sname))
say("")
npc.unlock()
return
end

if u_vid == m_vid then
say
("Nun denn...")
say("Euer Geschlecht ist gleich!")
say("")
say_reward("Ihr muesst euer Geschlecht aendern.")
say("")
npc.unlock()
return
end

if u_vid != marriage.find_married_vid() then
say
("Nun denn...")
say("Euer Ehepartner ist nicht")
say("in eurer Naehe!")
say("")
npc.unlock()
return
end

local ok_sign 
confirm(u_vid"Willst du"..pc.name.. "heiraten??"30)
if 
ok_sign != CONFIRM_OK then
say
("Nun denn...")
say("Ihr wollt heiraten...")
say("So soll es sein!")
say("")
npc.unlock()
return
end
say
("Nehmt noch")
say("diesen Ehering mit!")
say("")
marriage.set_to_marriage()

-- 
2005.04.12.??? ?? ?? ??
-----------------------------------------------
-- 
say("Hier habt Ihr ihn!")
-- 
say("Ich wuensche euch viel Erfolg!")
-- 
marriage_manage.give_wedding_gift()
-- 
old pc.select(u_vid)
-- 
marriage_manage.give_wedding_gift()
-- 
pc.select(old)
say("")
say_reward("Ihr habt einen Ehering erhalten.")
say("")
npc.unlock()
end

function give_wedding_gift()
local male_item = {710727107371074}
local female_item = {710697107071071}
if 
pc.get_sex() == MALE then
pc
.give_item2(male_item[number(13)], 1)
else
pc.give_item2(female_item[number(13)], 1)
end
end

-- ??? ???? ?? ????? ?? ??
-- ?? 
pc.is_married() and marriage.in_my_wedding()

-- ??? ?? ??? ??? ?? ????
when 9011.chat."Hochzeitsmusik starten" with
(pc.is_engaged() or pc.is_married()) and
marriage.in_my_wedding() and
not marriage.wedding_is_playing_music() begin
marriage
.wedding_music(true"wedding.mp3")
setskin(NOWINDOW)
end
when 9011.chat
." Hochzeitsmusik stoppen" with
(pc.is_engaged() or pc.is_married()) and
marriage.in_my_wedding() and
marriage.wedding_is_playing_music() begin
marriage
.wedding_music(false"default")
setskin(NOWINDOW)
end
when 9011.chat
."Tageszeit zu Nacht aendern" with
pc
.is_married() and
marriage.in_my_wedding() begin
marriage
.wedding_dark(true)
setskin(NOWINDOW)
end

when 9011.chat
."Schneefall starten" with pc.is_married() and marriage.in_my_wedding() begin
marriage
.wedding_snow(true)
setskin(NOWINDOW)
end

when 9011.chat
."Hochzeit beenden" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say
("Hochzeitsplanerin:")
say("Willst du nun die Hochzeit beenden?")
say("")
return
end

say
("Hochzeitsplanerin:")
say("Willst du das Fest wirklich beenden?")
say("")
local s select("Ja","Nein")
if 
== 1 then
local u_vid 
marriage.find_married_vid()
if 
u_vid == 0 then
say
("Um die Hochzeit zu beenden, muss")
say("dein Partner zustimmen.")
say("Nun, da dein Partner nicht da ist,")
say("kann ich die Hochzeit nicht beenden.")
say("")
npc.unlock()
return
end
say
("Hochzeitsplanerin:")
say("Um die Hochzeit zu beenden, muss")
say("dein Partner zustimmen.")
say("Ich warte auf die Antwort...")
say("")
local ok_sign confirm(u_vid"Willst du die Hochzeit beenden?"30)
if 
ok_sign == CONFIRM_OK then
marriage
.end_wedding() -- ??? ???? ??? ??.
else
say("Hochzeit beenden:")
say("Die andere Person ist nicht einverstanden.")
say("")
end

end

npc
.unlock()
end

-- ??? ???? ???? ??? ??
when 11000.chat."Scheidung einreichen" or
11002.chat." Scheidung einreichen" or
11004.chat." Scheidung einreichen" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

local u_vid 
marriage.find_married_vid()
if 
u_vid == or not npc.is_near_vid(u_vid10then
say
("Waechter des Dorfplatzes:")
say("Die Scheidung ist eine sehr ernste Angelegenheit!")
say("Wenn du dich scheiden lassen willst,")
say("muss dein Partner dabei sein.")
say("")
return
end

say
("Waechter des Dorfplatzes:")
say("Die Scheidung kostet 500.000 Yang.")
say("Ausserdem muss die andere Person")
say("zustimmen.")
say("Willst du die Scheidung veranlassen?")
say("")

local MONEY_NEED_FOR_ONE 500000
local s 
select("Ja""Nein")

if 
== 1 then
local m_enough_money 
pc.gold MONEY_NEED_FOR_ONE
local m_have_ring 
pc.countitem(70302) > 0

local old 
pc.select(u_vid)
local u_enough_money pc.gold MONEY_NEED_FOR_ONE
local u_have_ring 
pc.countitem(70302) > 0
pc
.select(old)

if 
not m_have_ring then
say
("Du musst den Ehering mitbringen.")
return;
end
if not u_have_ring then
say
("Die andere Person muss den")
say("Ehering auch mitbringen.")
return;
end

if not m_enough_money then
say
("Waechter des Dorfplatzes:")
say("Du hast nicht genug Yang fuer die Scheidung.")
say("")
say_reward(string.format("Die Scheidung kostet %dvon"MONEY_NEED_FOR_ONE/10000))
say("")
return;
end
if not u_enough_money then
say
("Waechter des Dorfplatzes::")
say("Die andere Person hat nicht genug Yang.")
say("")
say_reward("Fuer die Scheidung muessen")
say_reward("beide 500.000 Yang bezahlen.")
say("")
return;
end

say
("Die Scheidung ist eine sehr")
say("schmerzhafte Angelegenheit. Willst")
say("du dich wirklich scheiden lassen?")
say("")
say("Wirklich? Du willst wirklich die Scheidung?")
say("")

local c=select("Ja""Nein")
if 
== c then
say_pc_name
()
say("Ich will die Scheidung, das")
say("ist meine Entscheidung.")
say("")
wait()
say("Waechter des Dorfplatzes:")
say("So sei es...")
say("Ihr seid 2 Personen, die weder zusammen")
say("halten, noch ihr Leben geniessen.")
say("")
say_reward("Ich werde die Ehe mit der Scheidung beenden.")
say("")
return
end

local ok_sign 
confirm(u_vidpc.name.." willst du dich Scheiden lassen?"30)
if 
ok_sign == CONFIRM_OK then

local m_enough_money 
pc.gold MONEY_NEED_FOR_ONE
local m_have_ring 
pc.countitem(70302) > 0

local old 
pc.select(u_vid)
local u_enough_money pc.gold MONEY_NEED_FOR_ONE
local u_have_ring 
pc.countitem(70302) > 0
pc
.select(old)

if 
m_have_ring and m_enough_money and u_have_ring and u_enough_money then
pc
.removeitem(703021)
pc.change_money(-MONEY_NEED_FOR_ONE)

local old pc.select(u_vid)
pc.removeitem(703021)
pc.change_money(-MONEY_NEED_FOR_ONE)
pc.select(old)

say("Waechter des Dorfplatzes:")
say("Die Scheidung war erfolgreich.")
say("Ihr seid zwei verschiedene Menschen,")
say("das kann man nicht aendern.")
say("")
say_reward("Scheidung erfolgreich abgeschlossen!")
say("")
marriage.remove()
else
say("Waechter des Dorfplatzes::")
say("Ein Fehler ist aufgetreten.")
say("Ich konnte euch nicht scheiden.")
say("Versuche es spaeter erneut.")
say("")
say_reward("Scheidung fehlgeschlagen.")
say("")
end
else
say("Waechter des Dorfplatzes:")
say("Die andere Person ist nicht einverstanden.")
say("Kommt am besten zu mir, dann")
say("reden wir ueber die Sache.")
say("")
say_reward("Die Scheidung wurde abgebrochen.")
say("")
end
end
end

when 11000.chat
."Ehering abgeben" or
11002.chat." Ehering abgeben" or
11004.chat." Ehering abgeben" with
not pc
.is_married() and
pc.count_item(70302)>0
begin
say
("Waechter des Dorfplatzes:")
say("Du wirst die Schlechten Erinnerungen")
say("schnell vergessen.")
say("")
say_reward("Der Ehering wurde erfolgreich entfernt.")
pc.remove_item(70302)
end

when 11000.chat
." Einseitige Scheidung" or
11002.chat." Einseitige Scheidung" or
11004.chat." Einseitige Scheidung" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

say
("Waechter des Dorfplatzes:")
say("Die einseitige Scheidung kostet dich 1.000.000 Yang.")
say("Willst du das bezahlen?")
say("")

local s select("Ja""Das ist mir zuviel.")

local NEED_MONEY 1000000
if == 2 then
return
end

if pc.money NEED_MONEY then
say
("Waechter des Dorfplatzes:")
say("Dein Yang reicht nicht fuer die Scheidung.")
say("Eine Scheidung ist teuer.")
say("Komme wieder, wenn du genug gespart hast.")
say("")
return
end

say
("Waechter des Dorfplatzes:")
say("Willst du wirklich die Scheidung?")
say("Hast du es dir gut ueberlegt?")
local c select("Ich will die Scheidung!""Ich ueberlege es mir noch.")

if 
== 2 then
say
("Waechter des Dorfplatzes:")
say("Das ist die richtige Entscheidung. Geniesse dein")
say("Leben.")
say("Nicht immer haben beide die gleichen Meinungen.")
say("")
say_reward("Die Scheidung wurde abgebrochen.")
say("")
return
end

pc
.removeitem(703021)
pc.change_gold(-NEED_MONEY)

marriage.remove()

say("Waechter des Dorfplatzes:")
say("Da ihr eich nicht verstanden habt, seid ihr nun")
say("geschieden.")
say("Ich hoffe, du bist nun gluecklich.")
say("")
say_reward("Die einseitige Scheidung war erfolgreich.")
say("")
end

-- ??? ?? ??
when oldwoman.chat."Liste der Hochzeiten" with not pc.is_engaged() begin
local t 
marriage.get_wedding_list()
if 
table.getn(t) == 0 then
say
("Im Moment findet keine Hochzeit statt.")
say("")
else
-- 
chat(table.getn(t))
local wedding_names = {}
table.foreachi(t, function(npwedding_names[n] = p[3].."und "..p[4].." Hochzeit" end)
wedding_names[table.getn(t)+1] = locale.confirm
local s 
select_table(wedding_names)

if 
!= table.getn(wedding_namesthen
marriage
.join_wedding(t[s][1], t[s][2])
end
end
end
when 9011.click with not pc
.is_engaged() and not pc.is_married() begin
say
("Hochzeitsplanerin:")
say("Wir alle kamen hierher, um die Hochzeit")
say("zu feiern.")
say("Gesegnet sei das Paar.")
say("")
end

function check_divorce_time()

local DIVORCE_LIMIT_TIME 86400

if is_test_server() then
DIVORCE_LIMIT_TIME 
60
end

if marriage.get_married_time() < DIVORCE_LIMIT_TIME then
say
("Hallenwaechter:")
say("Jetzt ist genug gefeiert!!!")
say("Alle raus hier!")
say("")
return 
false
end

return true
end

-- ?? ??? ?? ???? ??? ??
-- ?? ?? : 
pc.is_engaged_or_married()
function 
is_equip_wedding_dress()
local a pc.get_armor()
return 
>= 11901 and <= 11904
end
function get_wedding_dress(pc_job)
if 
0==pc_job then
return 11901
elseif 1==pc_job then
return 11903
elseif 2==pc_job then
return 11902
elseif 3==pc_job then
return 11904
else
return 
0;
end
end
end
end 
Könnte mir jemand das so einstellen, das beim heiraten kommt " xxx und xxx sind jetz miteinander verheiratet" oder so :D
01/13/2014 17:40 Fuuse#989
Hallo ich habe eine Bitte an euch, falls es überhaupt möglich ist ..

Ein NPC für eine Map, die Spieler drauf teleportiert aber die Spieler nur 60 Minuten Zeit haben um auf der Map zu bleiben. Nach den 60 Minuten, werden sie in die Map1 teleportiert und können die Map erst nach weiteren 60 Minuten betreten (durchs anklicken des NPC's) Hierbei wäre auch wichtig, dass die verbleibende Zeit angezeigt wird ''Dir sind nur noch z.B. 45 Minuten geblieben, beeil dich!''

Ich weiß nicht ob es machbar ist, ist aber ein Versuch wert. :)
01/13/2014 18:57 FuseBaby#990

Könnte mir jemand so eine Quest erstellen? Die Texte usw sind nicht notwendig, wollte es einfach nur übersichtlicher erklären wie es funktioniert und was ich meine. Vielen Dank schon mal :-D