[SERVICE] Die Questkontrolle

01/02/2013 19:45 ©by Noa#7411
Quote:
Originally Posted by MrPlayboy View Post
Kay, kannste mir in der Zeit in diese Quest ne Abfrage schreiben, die prüft ob genug Platz im Inventar ist?
Wenn ich pc.enough_inventory()==1 mache gehts nicht
PHP Code:
pc.enough_inventory() 
gibt ein boolnischen wert zurück dh. in und nach den klammern kommt kein wert hin

Quote:
Originally Posted by Night³ View Post
wen ich ingame auf quest klicke dan ist die leer hier die quest kan mir einer helfen?
PHP Code:
quest gm_status begin
    state start begin
        when login begin
            set_state
(info)
        
end
    end
    state info begin
        when letter begin
            send_letter
("GM-Online")
        
end
        when info 
or button begin
            say_title 
("GM Status:")
            
say_gold("Name --- Status")
            
say_gold("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
            if 
game.get_event_flag "[SA] "== 1 then
            say_green
"[SA]  ist online  (SA)"
            
else
            
say_red("[SA]  ist offline  (SA)")
            
end
            
if game.get_event_flag("[SA] ")== 1 then
            say_green
("[SA]  ist online  (SA)")
            else
            
say_red("[SA]  ist offline  (SA)")
            
end
            
if game.get_event_flag("[GA] ")== 1 then
            say_green
("[GA]  ist online  (GA)")
            else
            
say_red("[GA]  ist offline  (GA)")
            
end
            
if game.get_event_flag("[TM] ")== 1 then
            say_green
("[TM]  ist online  (TM)")
            else
            
say_red("[TM]  ist offline  (TM)")
            
end
            
if game.get_event_flag("[GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
            
if game.get_event_flag("[SGM] ")== 1 then
            say_green
("[SGM]  ist online  (SGM)")
            else
            
say_red("[SGM]  ist offline  (SGM)")
            
end
            
if game.get_event_flag("[SGM] ")== 1 then
            say_green
("[SGM]  ist online  (SGM)")
            else
            
say_red("[SGM]  ist offline  (SGM)")
            
end
            
if game.get_event_flag("[GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
            
if game.get_event_flag("][GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
        end
    end
end 
Kontrolliere lieber deine game flags zb eine von den
PHP Code:
if game.get_event_flag "[SA] "== 1 then 
-->die klammern fehlen
01/02/2013 21:27 MrPlayboy#7412
Hier der Ingameshop:

PHP Code:
quest meister begin
    state start begin    
        
function wenig_coins() 
            if 
pc.count_item(80016) > 10 then  
                say_reward
("Item erfolgreich gekauft")             
            else
                 
say_reward("Du hast nicht genug Coins") 
            
end 
        end 
        when 20082.chat
."Ingame Itemshop" begin 
            
if pc.getqf("igshop")==0 then
                say_title
("Meisterin")
                
say("Seid gegrüßt, bei mir kannst du für eine kleine")
                
say("Gebühr an Coins wertvolle Rüstungen und Waffen")
                
say("kaufen. Coins droppst du ab Level 100 überall")
                
say("als Alternativdropp")
                
pc.setqf("igshop", 1)
            elseif 
pc.getqf("igshop")==1 then
                local a
=select("Krieger","Ninja","Sura","Schami","Verlassen") 
                --
krieger
                
if a==1 then 
                local b
=select("Ruestungen","Waffen") 
                    if 
b==1 then --rusi
                    local c
=select("Lv 90","Lv 102","Lv 122") 
                        if 
c==2 then 
                            say_item_vnum
("19020") 
                            
say("") 
                            
say("Name:        Drachensternpanzer+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Krieger") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            if 
select("Kaufen","Verlassen")==1 then
                                meister
.wenig_coins()  
                                
pc.give_item2("19020") 
                                
pc.remove_item("80016", 5) 
                            
end 
                        
elseif c==1 then 
                            say_item_vnum
("42070") 
                            
say("") 
                            
say("Name:        Platinpanzer+0") 
                            
say("Level:        90") 
                            
say("Rasse:        Krieger") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local ab=select("Kaufen","Verlassen")             
                            if 
ab==1 then
                                meister
.wenig_coins()  
                                
pc.give_item2("42070") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif c==3 then 
                            say_item_vnum
("19120") 
                            
say("") 
                            
say("Name:        Schneepanzer+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Krieger") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local ac=select("Kaufen","Verlassen")             
                            if 
ac==1 then 
                                meister
.wenig_coins()                               
                                
pc.give_item2("19120") 
                                
pc.remove_item("80016", 8) 
                            
end 
                        end 
                    
else            --waffe
                        local free
=select("Rotstahlschwert+0","Rotstahlklinge+0","Schwarzstahlschwert+0","Schwarzstahlklinge+0","Kristallschwert+0","Kristallschneider+0") 
                        if 
free==3 then 
                            say_item_vnum
("9290") 
                            
say("") 
                            
say("Name:        Schwarzstahlschwert+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Krieger, Ninja, Sura") 
                            
say("Typ:            1 Hand") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local aceed=select("Kaufen","Verlassen")             
                            if 
aceed==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("9290") 
                                
pc.remove_item("80016", 5) 
                            
end 
                        
elseif free==1 then 
                            say_item_vnum
("8290") 
                            
say("") 
                            
say("Name:        Rotstahlschwert+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Krieger, Ninja, Sura") 
                            
say("Typ:            1 Hand") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local aceded=select("Kaufen","Verlassen")             
                            if 
aceded==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("8290") 
                                
pc.remove_item("80016", 3) 
                            
end              
                        
elseif free==4 then           
                            say_item_vnum
("9190") 
                            
say("") 
                            
say("Name:        Schwarzstahlklinge+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Krieger") 
                            
say("Typ:            2 Hand") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local aceddded=select("Kaufen","Verlassen")             
                            if 
aceddded==1 then
                                meister
.wenig_coins()  
                                
pc.give_item2("9190") 
                                
pc.remove_item("80016", 5) 
                            
end 
                        
elseif free==2 then 
                            say_item_vnum
("8190") 
                            
say("") 
                            
say("Name:        Rotstahlklinge+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Krieger") 
                            
say("Typ:            2 Hand") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local acedeeed=select("Kaufen","Verlassen")             
                            if 
acedeeed==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("8190") 
                                
pc.remove_item("80016", 5) 
                            
end
                        
elseif free==5 then 
                            say_item_vnum
("54810") 
                            
say("") 
                            
say("Name:        Kristallschwert+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Krieger") 
                            
say("Typ:            2 Hand") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local jkjkjkjkjkj=select("Kaufen","Verlassen")             
                            if 
jkjkjkjkjkj==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("54810") 
                                
pc.remove_item("80016", 8) 
                            
end
                        
elseif free==6 then 
                            say_item_vnum
("54840") 
                            
say("") 
                            
say("Name:        Kristallschneider+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Krieger") 
                            
say("Typ:            2 Hand") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local slslslslsl=select("Kaufen","Verlassen")             
                            if 
slslslslsl==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("54840") 
                                
pc.remove_item("80016", 8) 
                            
end
                        end                        
                    end   
--end Krieger
                    
                
elseif a==2 then --ninja
                    local 
as=select("Ruestungen","Waffen") 
                    if as==
1 then --rusi
                        local ad
=select("Lv 90","Lv 102","Lv 122") 
                        if 
ad==2 then 
                            say_item_vnum
("19040") 
                            
say("") 
                            
say("Name:        Drachensternanzug+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Ninja") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local aa=select("Kaufen","Verlassen")             
                            if 
aa==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("19020") 
                                
pc.remove_item("80016", 5) 
                            
end 
                        
elseif ad==1 then 
                            say_item_vnum
("44070") 
                            
say("") 
                            
say("Name:        Platinanzug+0") 
                            
say("Level:        80-90") 
                            
say("Rasse:        Ninja") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local ab=select("Kaufen","Verlassen")             
                            if 
ab==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("44070") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif ad==3 then 
                            say_item_vnum
("19120") 
                            
say("") 
                            
say("Name:        Schneeanzug+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Ninja") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local aca=select("Kaufen","Verlassen")             
                            if 
aca==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("19140") 
                                
pc.remove_item("80016", 8) 
                            
end
                        end
                        
                    
elseif as==2 then --waffe
                        local freeee
=select("Rotstahlmesser+0","Rotstahlbogen+0","Schwarzstahlmesser+0","Schwarzstahlbogen+0","Kristallmesser+0","Kristallbogen+0") 
                        if 
freeee==1 then 
                            say_item_vnum
("8490") 
                            
say("") 
                            
say("Name:        Rotstahlmesser+0") 
                            
say("Level:        80-90") 
                            
say("Rasse:        Ninja") 
                            
say("Typ:            Dolch") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local aceedf=select("Kaufen","Verlassen")             
                            if 
aceedf==1 then
                                meister
.wenig_coins()  
                                
pc.give_item2("8490") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif freeee==5 then 
                            say_item_vnum
("54830") 
                            
say("") 
                            
say("Name:        Kristallmesser+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Ninja") 
                            
say("Typ:            Dolch") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local faceded=select("Kaufen","Verlassen")             
                            if 
faceded==1 then
                                meister
.wenig_coins()  
                                
pc.give_item2("54830") 
                                
pc.remove_item("80016", 8) 
                            
end         
                        
elseif freeee==2 then 
                            say_item_vnum
("8380") 
                            
say("") 
                            
say("Name:        Rotstahlbogen+0") 
                            
say("Level:        80-90") 
                            
say("Rasse:        Ninja") 
                            
say("Typ:            Bogen") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local faceddded=select("Kaufen","Verlassen")             
                            if 
faceddded==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("8380") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif freeee==6 then 
                            say_item_vnum
("54820") 
                            
say("") 
                            
say("Name:        Kristallbogen+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Ninja") 
                            
say("Typ:            Bogen") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local acedefeed=select("Kaufen","Verlassen")             
                            if 
acedefeed==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("54820") 
                                
pc.remove_item("80016", 8) 
                            
end
                        
elseif freeee==3 then 
                            say_item_vnum
("9490") 
                            
say("") 
                            
say("Name:        Schwarzstahlmesser+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Ninja") 
                            
say("Typ:            Bogen") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local opopopopopop=select("Kaufen","Verlassen")             
                            if 
opopopopopop==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("9490") 
                                
pc.remove_item("80016", 5) 
                            
end
                        
elseif freeee==4 then 
                            say_item_vnum
("9390") 
                            
say("") 
                            
say("Name:        Schwarzstahlbogen+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Ninja") 
                            
say("Typ:            Bogen") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local opopopopop=select("Kaufen","Verlassen")             
                            if 
opopopopop==1 then 
                                meister
.wenig_coins()  
                                
pc.give_item2("9390") 
                                
pc.remove_item("80016", 5) 
                            
end
                        end
                    end 
                
elseif a==3 then 
                    local zz
=select("Ruestungen","Waffen") 
                    if 
zz==1 then 
                        local ii
=select("Lv 80","Lv 102","Lv 122") 
                        if 
ii==2 then 
                            say_item_vnum
("19060") 
                            
say("") 
                            
say("Name:        Drachensternp.panzer+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Sura") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local bb=select("Kaufen","Verlassen")             
                            if 
bb==1 then
                                meister
.wenig_coins()  
                                
pc.give_item2("19060") 
                                
pc.remove_item("80016", 10) 
                            
end 
                        
elseif ii==1 then 
                            say_item_vnum
("46070") 
                            
say("") 
                            
say("Name:        Platinplattenpanzer+0") 
                            
say("Level:        80-90") 
                            
say("Rasse:        Sura") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local abc=select("Kaufen","Verlassen")             
                            if 
abc==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("46070") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif ii==3 then 
                            say_item_vnum
("19160") 
                            
say("") 
                            
say("Name:        Schneeplattenpanzer+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Sura") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local aco=select("Kaufen","Verlassen")             
                            if 
aco==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("19160") 
                                
pc.remove_item("80016", 10) 
                            
end 
                        end
                    
elseif zz==2 then 
                        local fffreeee
=select("Rotstahlschwert+0","Schwarzstahlschwert+0","Kristallklinge+0") 
                        if 
fffreeee==1 then 
                            say_item_vnum
("8290") 
                            
say("") 
                            
say("Name:        Rotstahlschwert+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Krieger, Ninja, Sura") 
                            
say("Typ:            1 Hand") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local sdfg=select("Kaufen","Verlassen")             
                            if 
sdfg==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("8290") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif fffreeee==3 then 
                            say_item_vnum
("54800") 
                            
say("") 
                            
say("Name:        Kristallklinge+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Sura") 
                            
say("Typ:            1 Hand") 
                            
say("Kosten:       8000 Coins") 
                            
wait() 
                            
local fghfgfj=select("Kaufen","Verlassen")             
                            if 
fghfgfj==1 then
                                meister
.wenig_coins()
                                
pc.give_item2("54800") 
                                
pc.remove_item("80016", 8) 
                            
end 
                        
elseif fffreeee==2 then 
                            say_item_vnum
("9290") 
                            
say("") 
                            
say("Name:        Schwarzstahlschwert+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Krieger, Ninja, Sura") 
                            
say("Typ:            1 Hand") 
                            
say("Kosten:    5000 Coins") 
                            
wait()                                  
                            
local ghghghgh=select("Kaufen","Verlassen")             
                            if 
ghghghgh==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("9290") 
                                
pc.remove_item("80016", 5) 
                            
end
                        end
                    end
                
elseif a==4 then            
                    local zzz
=select("Ruestungen","Waffen")            
                    if 
zzz==1 then 
                        local iii
=select("Lv 80","Lv 102","Lv 122") 
                        if 
iii==2 then 
                            say_item_vnum
("19080") 
                            
say("") 
                            
say("Name:        Drachensternkleidung+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Schami") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local bbb=select("Kaufen","Verlassen")             
                            if 
bbb==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("19080") 
                                
pc.remove_item("80016", 10) 
                            
end 
                        
elseif iii==1 then 
                            say_item_vnum
("48070") 
                            
say("") 
                            
say("Name:        Platinkleidung0") 
                            
say("Level:        90") 
                            
say("Rasse:        Schami") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local abcd=select("Kaufen","Verlassen")             
                            if 
abcd==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("48070") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif iii==3 then 
                            say_item_vnum
("19180") 
                            
say("") 
                            
say("Name:        Schneekleidung+0") 
                            
say("Level:        122-140") 
                            
say("Rasse:        Schami") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local acoe=select("Kaufen","Verlassen")             
                            if 
acoe==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("19180") 
                                
pc.remove_item("80016", 10) 
                            
end 
                        end
                    
elseif zzz==2 then             
                        local yklom
=select("Rotstahlstab+0","Schwarzstahlstab+0","Eisglocke+0","Eisstab+0") 
                        if 
yklom==1 then 
                            say_item_vnum
("8590") 
                            
say("") 
                            
say("Name:        Rotstahlstab+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Schami") 
                            
say("Typ:            Glocke") 
                            
say("Kosten:    3000 Coins") 
                            
wait() 
                            
local abab=select("Kaufen","Verlassen")             
                            if 
abab==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("8590") 
                                
pc.remove_item("80016", 3) 
                            
end 
                        
elseif yklom==3 then 
                            say_item_vnum
("54850") 
                            
say("") 
                            
say("Name:        Eisglocke+0") 
                            
say("Level:        102-120") 
                            
say("Rasse:        Schami") 
                            
say("Typ:            Glocke") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local ghoma=select("Kaufen","Verlassen")             
                            if 
ghoma==1 then 
                                meister
.wenig_coins()
                                
pc.give_item2("54850") 
                                
pc.remove_item("80016", 8) 
                            
end 
                        
elseif yklom==2 then 
                            say_item_vnum
("9590") 
                            
say("") 
                            
say("Name:        Schwarzstahlstab+0") 
                            
say("Level:        100") 
                            
say("Rasse:        Schami") 
                            
say("Typ:            Faecher") 
                            
say("Kosten:    5000 Coins") 
                            
wait() 
                            
local atgff=select("Kaufen","Verlassen")             
                            if 
atgff==1 then
                                meister
.wenig_coins()
                                
pc.give_item2("9590") 
                                
pc.remove_item("80016", 5) 
                            
end 
                        
elseif yklom==4 then 
                            say_item_vnum
("54860") 
                            
say("") 
                            
say("Name:        Eisstab+0") 
                            
say("Level:        80-90") 
                            
say("Rasse:        Schami") 
                            
say("Typ:            Glocke") 
                            
say("Kosten:    8000 Coins") 
                            
wait() 
                            
local atgff=select("Kaufen","Verlassen")             
                            if 
atgff==1 then
                                meister
.wenig_coins()
                                
pc.give_item2("54860") 
                                
pc.remove_item("80016", 8) 
                            
end
                        end 
                    end
                end      
            end
        end        
--when
    end        
--state
end        
--quest 
Und die Quest mit der Inventarabfrage, habs so gemacht wie du es gesagt hast aber es steht immer Kein Platz obwohl Invi leer is

PHP Code:
quest start1 begin
    state start begin
        when 50187.
use begin
        
        
if pc.enough_inventory() then                   
            
if pc.job == 0 then
            pc
.give_item2("19")
            
pc.give_item2("3009")
            
pc.give_item2("11209")
            
pc.give_item2("12209")
            
end

            
if pc.job == 1 then    
            pc
.give_item2("1009")
            
pc.give_item2("2009")
            
pc.give_item2("11409")
            
pc.give_item2("12349")
            
end
            
            
if pc.job == 2 then
            pc
.give_item2("19")
            
pc.give_item2("11609")
            
pc.give_item2("12489")
            
end
            
            
if pc.job == 3 then
            pc
.give_item2("5009")
            
pc.give_item2("7009")
            
pc.give_item2("11809")
            
pc.give_item2("12629")
            
end
            pc
.give_item2("50188")
        else
            
chat("Du hast nicht genug Platz im Inventar")
        
end
        end
        
        when 50188.
use begin
        
        
if pc.enough_inventory() then    
                        
            
if pc.job == 0 then
            pc
.give_item2("299")
            
pc.give_item2("3219")
            
pc.give_item2("11239")
            
pc.give_item2("12229")
            
end

            
if pc.job == 1 then    
            pc
.give_item2("1179")
            
pc.give_item2("2159")
            
pc.give_item2("11439")
            
pc.give_item2("12369")
            
end
            
            
if pc.job == 2 then
            pc
.give_item2("299")
            
pc.give_item2("11639")
            
pc.give_item2("12509")
            
end
            
            
if pc.job == 3 then
            pc
.give_item2("5119")
            
pc.give_item2("7169")
            
pc.give_item2("11839")
            
pc.give_item2("12649")
            
end
            pc
.give_item2("50189")
            
pc.remove_item("50188")
        else
            
chat("Du hast nicht genug Platz im Inventar")
        
end
        end
        
        when 50189.
use begin
        
        
if pc.enough_inventory() then    
                        
            
if pc.job == 0 then
            pc
.give_item2("11971")
            
pc.give_item2("12249")
            
end

            
if pc.job == 1 then    
            pc
.give_item2("11972")
            
pc.give_item2("12369")
            
end
            
            
if pc.job == 2 then
            pc
.give_item2("11973")
            
pc.give_item2("12529")
            
end
            
            
if pc.job == 3 then
            pc
.give_item2("11974")
            
pc.give_item2("12669")
            
end
            pc
.give_item2("50190")
            
pc.remove_item("50189")
        else
            
chat("Du hast nicht genug Platz im Inventar")
        
end
        end
        
        when 50190.
use begin
        
        
if pc.enough_inventory() then    
                        
            
if pc.job == 0 then
            pc
.give_item2("169")
            
pc.give_item2("3149")
            
end

            
if pc.job == 1 then    
            pc
.give_item2("1119")
            
pc.give_item2("2139")
            
end
            
            
if pc.job == 2 then
            pc
.give_item2("169")
            
end
            
            
if pc.job == 3 then
            pc
.give_item2("5099")
            
pc.give_item2("7139")
            
end
            pc
.give_item2("50191")
            
pc.remove_item("50190")
        else
            
chat("Du hast nicht genug Platz im Inventar")
        
end
        end
        
        when 50191.
use begin
        
        
if pc.enough_inventory() then    
                        
            
if pc.job == 0 then
            pc
.give_item2("186")
            
pc.give_item2("3169")
            
end

            
if pc.job == 1 then    
            pc
.give_item2("1136")
            
pc.give_item2("2176")
            
end
            
            
if pc.job == 2 then
            pc
.give_item2("196")
            
end
            
            
if pc.job == 3 then
            pc
.give_item2("5126")
            
end
            pc
.give_item2("50192")
            
pc.remove_item("50191")
        else
            
chat("Du hast nicht genug Platz im Inventar")
        
end
        end
    end
end 
01/02/2013 23:07 ©by Noa#7413
PHP Code:
pc.enough_inventory() 
kann man nur bei einem gewählten item benutzen, um zu fragen ob man genug freie slotzs hat benutzt man
PHP Code:
pc.get_empty_inventory_count() 
01/03/2013 00:15 Azemi6#7414
Hab immer noch ein kleines problemchen mit einer pvp quest
ich habe auch schon probiert einige end's weg zu nehmen oder an zu hängen aber kommt immer das gleiche =l

in v-box steht folgendes:
PHP Code:
WHEN  : kill
            with with npc
.is_pc() and npc.get_empire() != pc.get_empire()
must start with ' quest
neuepvp95.quest:129:Abort trab (core dumped)
Error occured on compile neuepvp95.quest 


PHP Code:
quest neuepvp95 begin 
    state start begin 
        when login 
or levelup with pc.level >= 95 begin 
            set_state
(neuepvp95) 
        
end 
    end 

    state neuepvp95 begin 
        when letter begin 
            send_letter
("Die Prüfung") 
        
end 

        when button 
or info begin 
            say
("Du hast Level 95 erreicht?") 
            
say("Glückwunsch! Aber nicht zu") 
            
say("früh gefreut, denn ich hätte") 
            
say("da eine kleine Prüfung für dich.") 
            
say("Und zwar solst du") 
            
say("10 Feinde aus den anderen") 
            
say("Reichen töten. So sehen wir") 
            
say("ob du würdig bist also zeig uns was in dir steckt!") 
            
say_reward("Töte 10 andere Spieler aus anderen Reichen") 
            
say("") 
            
pc.setqf("state", 10) 
            
q.set_counter("kills", 10) 
            
set_state(kill) 
        
end 
    end 
       
    state kill begin 
        when letter begin 
            send_letter
("PvP - Quest") 
        
end 
         
        when button 
or info begin 
            say_title
("Spieler:") 
            
say_reward("Du musst noch "..pc.getqf("state").." von 10 töten") 
            
say("") 
        
end 

        when kill with npc
.is_pc() and npc.get_empire() != pc.get_empire() begin
            local count 
= pc.getqf("state") - 1 
            
if count <= 1 then 
                pc
.setqf("state", count) 
                
q.set_counter("kills", -count) 
            
end 
            
if count == 0 then 
                say
("Toll du hast es geschafft!") 
                
say("Gratulation.") 
                
say("Diese Mühen sollen natürlich nicht unbelohnt") 
                
say("bleiben, deshalb kannst du zwischen folgenden") 
                
say("Preis wählen:") 
                if 
pc.job == 0 then 
                    say
("Du bist Krieger oder? Hhmmm....") 
                    
say("Diese Waffen solten zu dir Passen:") 
                    
say("") 
                    
local s = select("Nyphton", "Zweihand Nyphtonschwert") 
                    if 
s == 1 then 
                        say
("Gut, du hast dich für das Nyphton entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(429, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    elseif 
s == 2 then 
                        say
("Gut, du hast dich für das Zweihand Nyphtonschwert entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9199, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    
end
                
elseif pc.job == 1 then 
                    say
("Da du ein Ninja bist, kannst du zwischen") 
                    
say("folgenden Preisen entscheiden:") 
                    
local g = select("Todes Dolch", "Bogen der Erde") 
                    if 
g == 1 then 
                        say
("Gut, du hast dich für die Todes Dolch entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(919, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    elseif 
g == 2 then 
                        say
("Gut, du hast die für die Bogen der Erde entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item(8069, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    
end 
                
elseif pc.job == 2 then 
                    say
("Da du ein Sura bist, kannst du zwischen") 
                    
say("folgenden Preisen entscheiden:") 
                    
local f = select("Heiliges Höllenschwert", "Heiliges Höllenschwert") 
                    if 
f == 1 then 
                        say
("Gut, du hast dich für das Heiliges Höllenschwert entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9959, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!")  
                    elseif 
f == 2 then 
                        say
("Gut, du hast dich für das Heiliges Höllenschwert entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9959, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    
end 
                
elseif pc.job == 3 then 
                    say
("Da du eine Schamane bist, kannst du zwischen") 
                    
say("folgenden Preisen entscheiden:") 
                    
local a = select("Stab des Lebens", "Stab des Todes") 
                    if 
a == 1 then 
                        say
("Gut, du hast dich für den Stab des Lebens entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9599, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    elseif 
a == 2 then 
                        say
("Gut, du hast dich für den Stab des Todes entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(35279, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                        
end 
                    end 
                end 
                clear_letter
() 
                
set_state(__COMPLETE__) 
            
end 
        end 
    end 
    state __COMPLETE__ begin 
    end 
end 
01/03/2013 01:09 LordMampf2#7415
Hallo =)
Ich glaube ein "end" über "clear_letter()" ist zu viel
grüßle LordMampf2
01/03/2013 03:01 Night³#7416
geht immer noch nicht

PHP Code:
quest gm_status begin
    state start begin
        when login begin
            set_state
(info)
        
end
    end
    state info begin
        when letter begin
            send_letter
("GM-Online")
        
end
        when info 
or button begin
            say_title 
("GM Status:")
            
say_gold("Name --- Status")
            
say_gold("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
            if 
game.get_event_flag ("[SA] ")== 1 then
            say_green
("[SA]  ist online  (SA)")
            else
            
say_red("[SA]  ist offline  (SA)")
            
end
            
if game.get_event_flag("[SA] ")== 1 then
            say_green
("[SA]  ist online  (SA)")
            else
            
say_red("[SA]  ist offline  (SA)")
            
end
            
if game.get_event_flag("[GA] ")== 1 then
            say_green
("[GA]  ist online  (GA)")
            else
            
say_red("[GA]  ist offline  (GA)")
            
end
            
if game.get_event_flag("[TM] ")== 1 then
            say_green
("[TM]  ist online  (TM)")
            else
            
say_red("[TM]  ist offline  (TM)")
            
end
            
if game.get_event_flag("[GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
            
if game.get_event_flag("[SGM] ")== 1 then
            say_green
("[SGM]  ist online  (SGM)")
            else
            
say_red("[SGM]  ist offline  (SGM)")
            
end
            
if game.get_event_flag("[SGM] ")== 1 then
            say_green
("[SGM]  ist online  (SGM)")
            else
            
say_red("[SGM]  ist offline  (SGM)")
            
end
            
if game.get_event_flag("[GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
            
if game.get_event_flag("][GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
        end
    end
end 
01/03/2013 07:18 ©by Noa#7417
Quote:
Originally Posted by Azemi6 View Post
Hab immer noch ein kleines problemchen mit einer pvp quest
ich habe auch schon probiert einige end's weg zu nehmen oder an zu hängen aber kommt immer das gleiche =l

in v-box steht folgendes:
PHP Code:
WHEN  : kill
            with with npc
.is_pc() and npc.get_empire() != pc.get_empire()
must start with ' quest
neuepvp95.quest:129:Abort trab (core dumped)
Error occured on compile neuepvp95.quest 
PHP Code:
quest neuepvp95 begin 
    state start begin 
        when login 
or levelup with pc.level >= 95 begin 
            set_state
(neuepvp95) 
        
end 
    end 

    state neuepvp95 begin 
        when letter begin 
            send_letter
("Die Prüfung") 
        
end 

        when button 
or info begin 
            say
("Du hast Level 95 erreicht?") 
            
say("Glückwunsch! Aber nicht zu") 
            
say("früh gefreut, denn ich hätte") 
            
say("da eine kleine Prüfung für dich.") 
            
say("Und zwar solst du") 
            
say("10 Feinde aus den anderen") 
            
say("Reichen töten. So sehen wir") 
            
say("ob du würdig bist also zeig uns was in dir steckt!") 
            
say_reward("Töte 10 andere Spieler aus anderen Reichen") 
            
say("") 
            
pc.setqf("state", 10) 
            
q.set_counter("kills", 10) 
            
set_state(kill) 
        
end 
    end 
       
    state kill begin 
        when letter begin 
            send_letter
("PvP - Quest") 
        
end 
         
        when button 
or info begin 
            say_title
("Spieler:") 
            
say_reward("Du musst noch "..pc.getqf("state").." von 10 töten") 
            
say("") 
        
end 

        when kill with npc
.is_pc() and npc.get_empire() != pc.get_empire() begin
            local count 
= pc.getqf("state") - 1 
            
if count <= 1 then 
                pc
.setqf("state", count) 
                
q.set_counter("kills", -count) 
            
end 
            
if count == 0 then 
                say
("Toll du hast es geschafft!") 
                
say("Gratulation.") 
                
say("Diese Mühen sollen natürlich nicht unbelohnt") 
                
say("bleiben, deshalb kannst du zwischen folgenden") 
                
say("Preis wählen:") 
                if 
pc.job == 0 then 
                    say
("Du bist Krieger oder? Hhmmm....") 
                    
say("Diese Waffen solten zu dir Passen:") 
                    
say("") 
                    
local s = select("Nyphton", "Zweihand Nyphtonschwert") 
                    if 
s == 1 then 
                        say
("Gut, du hast dich für das Nyphton entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(429, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    elseif 
s == 2 then 
                        say
("Gut, du hast dich für das Zweihand Nyphtonschwert entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9199, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    
end
                
elseif pc.job == 1 then 
                    say
("Da du ein Ninja bist, kannst du zwischen") 
                    
say("folgenden Preisen entscheiden:") 
                    
local g = select("Todes Dolch", "Bogen der Erde") 
                    if 
g == 1 then 
                        say
("Gut, du hast dich für die Todes Dolch entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(919, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    elseif 
g == 2 then 
                        say
("Gut, du hast die für die Bogen der Erde entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item(8069, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    
end 
                
elseif pc.job == 2 then 
                    say
("Da du ein Sura bist, kannst du zwischen") 
                    
say("folgenden Preisen entscheiden:") 
                    
local f = select("Heiliges Höllenschwert", "Heiliges Höllenschwert") 
                    if 
f == 1 then 
                        say
("Gut, du hast dich für das Heiliges Höllenschwert entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9959, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!")  
                    elseif 
f == 2 then 
                        say
("Gut, du hast dich für das Heiliges Höllenschwert entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9959, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    
end 
                
elseif pc.job == 3 then 
                    say
("Da du eine Schamane bist, kannst du zwischen") 
                    
say("folgenden Preisen entscheiden:") 
                    
local a = select("Stab des Lebens", "Stab des Todes") 
                    if 
a == 1 then 
                        say
("Gut, du hast dich für den Stab des Lebens entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(9599, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                    elseif 
a == 2 then 
                        say
("Gut, du hast dich für den Stab des Todes entschieden!") 
                        
say("Viel Spaß mit deinem Gewinn!") 
                        
pc.give_item2(35279, 1) 
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!") 
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!") 
                        
end 
                    end 
                end 
                clear_letter
() 
                
set_state(__COMPLETE__) 
            
end 
        end 
    end 
    state __COMPLETE__ begin 
    end 
end 
PHP Code:
                    elseif a == 2 then  
                        say
("Gut, du hast dich für den Stab des Todes entschieden!")  
                        
say("Viel Spaß mit deinem Gewinn!")  
                        
pc.give_item2(35279, 1)  
                        
notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!")  
                        
notice_all("Er/Sie hat 10 Spieler getötet, Glückwunsch!")  
                        
end  
                    end 
unter notice_all(""..pc.get_name().." hat soeben die PvP - Quest abgeschlossen!")
ist ein end zu viel

@MrPlayboy

benutze lieber say("text") als chat
01/03/2013 15:01 TubeYourGames#7418
Mir hat immer noch keiner geholfen...

Quote:
Originally Posted by TubeYourGames View Post
Hey Leute!
Ich hab die Quest in den "Quest" Ordner eingefügt und auch in die Questliste eingefügt und wenn ich den NPC 9010 anklicke wird auch sofort ein Fenster mit "GM Online Info" geöffnet aber dann schließt sich das Fenster.
Bitte helft mir ! :)

Hier der Code:
01/03/2013 16:36 ©by Noa#7419
Quote:
Originally Posted by TubeYourGames View Post
Mir hat immer noch keiner geholfen...
hier ist dein fehler-->
game.set_event_flag(pc.get_name(), 1)

game.set_event_flag(str, value)

funktionen kann man nicht in den string bereich schreiben

hier noch etwas

when logout with pc.is_game() begin

pc.is_game() ist doch gar nicht definiert oder?
01/03/2013 19:12 Huperis#7420
Hallo,
ich habe eben eine Quest geschrieben, um eine Waffe die man hat, gegen eine andere auszutauschen.
Code:

Wenn ich jetzt die Quest hochlade & dann compile kommt dieser Error:

Wodran liegt das? Mir fällt so jetzt kein Fehler auf :o
Danke! :)
01/03/2013 19:32 Sp0ngeb0b ist cool#7421
Quote:
Originally Posted by ©by Noa View Post
hier ist dein fehler-->
game.set_event_flag(pc.get_name(), 1)

game.set_event_flag(str, value)

funktionen kann man nicht in den string bereich schreiben
geht natürlich, da pc.get_name() ein string ausgibt ;)

und ja, pc.is_game() gibt es nicht xD
01/03/2013 20:50 Sogma#7422
Moin moin,

dieser Abschnitt hier kann nicht kompiliert werden.

Code:
	state start begin
		when login or levelup with pc.get_level()>= 40 begin
			set state(info)
		end
	end
Wo ist der Fehler?

EDIT: HAB DEN FEHLER SELBST GEFUNDEN
01/04/2013 03:16 ralriki#7423
Hey alle zusammen habe bei dieser quest ein problem ab Zeile 128 geht es nichtmehr weiter ich töte 8023 die meldung ""Ihr hab den Stein zerstört ihr werden nun in die nächste Ebene gebracht") kommt auch aber dann passiert nichts

PHP Code:
quest drachenraum begin
    state start begin
        when 30121.chat
."Tempel des Drachen" with pc.get_map_index() == 73 begin
        
if get_time() > game.get_event_flag("Grotte_time") then
        game
.set_event_flag("Grotte_zugang",0)
        
end
        
if pc.is_gm() then
        say_title
(""..mob_name(30121).."")
        
say("")
        
say("Hallo Gamemaster, "..pc.get_name().."")
        
say("Ich lasse dich auch ohne die Schlüssel und")
        
say("das Passwort passieren.")
        
wait()
        
pc.warp(171900, 1221300)
        return
        
end        
        
if pc.count_item("80041") >= 1 then
        say_title
(""..mob_name(30121).."")
        
say("")
        
say("Du hast das GM-Item, du darfst eintreten.")
        
wait() 
        return 
        
end
        
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
        say_title
(""..mob_name(30121).."")
        
say("")
        
say("Dir fehlen "..item_name(30179).."")
        
say_item_vnum(30179)
        
say("Komme wieder wenn du 3 besitzt.")
        return
        
end
        
if game.get_event_flag("Grotte_zugang") == 1 then
        say_title
(""..mob_name(30121).."")
        
say("")
        
pc.setqf("grotte_passworto", 078954687921)
        if 
pc.getqf("abgabe") == 1 then
        pc
.setqf("abgabe",0)
        
say("Du hast bereits deine 3 Schlüssel abgeben.")
        
say("Ich lasse dich passieren.")
        
pc.setqf("erlaubt",1)
        
wait()
        
pc.warp(171900, 1221300)
        return
        
end
        say
("Tut mir Leid, der Raum ist reseviert.")
        
say("Wenn du ein die Kennzahl hast für den Zugang,")
        
say("gebe sie jetzt bitte ein.")
        
local passwort = tonumber(input(""))
        --
pc.setqf("grotte_passworto", passwort) 
        if 
game.get_event_flag("Grotte_passwort") == passwort then
        say_title
(""..mob_name(30121).."")
        
say("")
        
say("Die Kennzahl stimmt überein.")
        if 
pc.count_item(30179) < 3 then
        say
("Ich kann dir den zutritt nicht gewähren")
        
say("Dir fehlt "..item_name(30179).."")
        
say_item_vnum(30179)
        
say("Komme wieder wenn du 3 besitzt.")
        return
        
end
        pc
.remove_item("30179",3)
        
say("Ich gewähre dir den zutritt!")
        
pc.setqf("erlaubt",1)
        
wait()
        
pc.warp(171900, 1221300)
        elseif 
passi != pc.getqf("grotte_passworto") then
        say_title
(""..mob_name(30121).."")
        
say("")
        
say("Die Kennzahl ist leider falsch.")
        return
        
end
        end
        
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
        say_title
(""..mob_name(30121).."")
        
say("")
        
say("Du bist der erste der den Eintritt in den Tempel")
        
say("des Drachens verlangt. Ich werde dich passieren")
        
say("lassen, sofern du einen gewunden Schlüssel")
        
say("besitzt. Bevor du den Raum betreten darfst")
        
say("musst du eine geheime Zahl eingeben.")
        
say("Diese kannst du innerhalb von 5 Minuten an")
        
say("deine Mitstreiter weitergeben, so das auch")
        
say("sie den Raum betreten können. ")
        
say("")
        
say("Bedenke auch das die Macht der Schlüssel nur")
        
say("30 Minuten lang hält. In dieser Zeit müsst")
        
say("ihr den Drachen besiegt haben.")
        
local i = select("Ich bin Bereit", "Abbrechen")
        if 
1 == i then
        say_title
(""..mob_name(30121).."")
        
say("Dann Lege jetzt die kennzahl fest.")
        
local passwort = tonumber(input(""))
        if 
passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
        game
.set_event_flag("Grotte_zugang",1)
        
game.set_event_flag("Grotte_passwort",passwort)
        
local times = get_time() + 300 --Wartezeit
        game
.set_event_flag("Grotte_time", times)
        
say_title(""..mob_name(30121).."")
        
pc.setqf("abgabe",1)
        
say("")
        
say("Die Kennzahl lautet:")
        
chat("Die Kennzahl lautet für den Tempel des Drachen: "..passwort.."")
        
say_reward(""..passwort.."")
        
say("Gib die Kennzahl deinen Mitstreitern weiter")
        
pc.remove_item("30179",3)
        else 
        
say_title(""..mob_name(30121).."")
        
say("")
        
say("Beim Kennzahl setzen ist ein fehler aufgetreten, versuche es erneut.")
        
say("Bitte gebe nur Ziffern ein.")
        
end
        end
        end
        end
    when login with pc
.get_map_index() == 73 and not pc.is_gm() begin
        
if pc.count_item("80041") >= 1 then chat("Tempel des Drachen: Du hast das GM-Item, prüfungen werden geblockt!") return end
        
if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 71 then
         chat
("Dir ist es nicht erlaubt diese Map zu betreten. "..pc.get_level().." "..pc.getqf("erlaubt").." "..pc.get_map_index().." ")
            
warp_to_village()
        
end
        chat
("Willkommen, zerstört schnell den Stein um zu dem Drachen zu gelangen.")
        
chat("Aber beeilt euch, sonst fliegt ihr raus")
        
local sekunden = game.get_event_flag("Grotte_time") - get_time()
        
notice_in_map("Verbleibende Zeit bis ihr rausfliegt: "..sekunden.." Sekunden")
        
timer("skipia_boss_ende", sekunden)
        
pc.set_warp_location(73 , 1825, 12207)
        
end
    when 8023.kill with pc
.get_map_index() == 73 begin
        timer
("skipia_boss_goo", 2)
        
notice_in_map("Ihr hab den Stein zerstört ihr werden nun in die nächste Ebene gebracht")
        
game.set_event_flag("Grotte_zugang",0)
        
d.new_jump_all(73, 8436, 10669)
        
d.setf("grotte_boss", 1)
        
d.spawn_mob(9012, 239, 173)
        
end
    when 8031.kill 
or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
    local n 
=d.getf("count") + 1
    d
.setf("count", n) 
    --
notice_all("Metin killed "..n.."")
    if 
n > 2 then
    local t 
= number(1,4)
    --
notice_all("Spawn Metin")
    if 
1 == t then
    d
.regen_file("data/dungeon/skia_boss1.txt")
    elseif 
2 == t then
    d
.regen_file("data/dungeon/skia_boss2.txt")
    elseif 
3 == t then
    d
.regen_file("data/dungeon/skia_boss3.txt")
    else
    
d.regen_file("data/dungeon/skia_boss4.txt")
    
end
    end
    end
    when 2493.kill with pc
.in_dungeon() and d.getf("grotte_boss") == 2 begin
        d
.setf("grotte_boss", 3)
        
notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.")
        
d.notice("Beeindruckend, ihr habt ihn tatsächlich besiegt.") -- Als Abschluss könnt ihr noch die Metins zerstören")
        d.notice("
ihr werdet in 60 Sekunden zurück in Grotte 2 gebracht.")
        timer("
skipia_boss_end", 60)
        d.kill_all()
        d.spawn_mob(9012, 239, 173)
        d.clear_regen()
        end

    when login with pc.in_dungeon() and d.getf("
grotte_boss") == 2 begin
    pc.set_warp_location(73 , 1825, 12207)
    end
    when login with pc.in_dungeon() and d.getf("
grotte_boss") == 1 begin
        timer("
skipia_boss_end", 3600)    
        d.set_regen_file("
data/dungeon/skia_boss.txt")
        local t = number(1,4)
        if 1 == t then
            d.regen_file("
data/dungeon/skia_boss1.txt")
            elseif 2 == t then
            d.regen_file("
data/dungeon/skia_boss2.txt")
            elseif 3 == t then
            d.regen_file("
data/dungeon/skia_boss3.txt")
            else
            d.regen_file("
data/dungeon/skia_boss4.txt")
        end
        local o = number(1,4)
        if 1 == o then
            d.regen_file("
data/dungeon/skia_boss1.txt")
            elseif 2 == o then
            d.regen_file("
data/dungeon/skia_boss2.txt")
            elseif 3 == o then
            d.regen_file("
data/dungeon/skia_boss3.txt")
            else
            d.regen_file("
data/dungeon/skia_boss4.txt")
            end    
        d.setf("
grotte_boss", 2)
        d.notice("
Willkommen im Tempel des Drachen, ihr habt maximal 1 Stunde Zeit Beran-Setaou zu besiegen, Viel Erfolg")
        d.setf("
count", 0)
        pc.set_warp_location(73 , 1825, 12207)
        end

    when login with pc.in_dungeon() and d.getf("
grotte_boss") == 3 begin -- begin
    --pc.warp(181700, 1220600)
    end
    
    when skipia_boss_end.timer begin
        d.exit_all()
        end
    when skipia_boss_ende.timer begin
        kill_all_in_map(71)
        game.set_event_flag("
Grotte_zugang",0)
        d.setf("
grotte_boss", 1)
        d.exit_all()
    end
    when login with pc.get_map_index() != 71 or not pc.in_dungeon() begin
    pc.setqf("
erlaubt",0)
    end
    end
end 
01/04/2013 06:51 TeRRoRSiZex3#7424
Heii Epvp,


Ich versuch schon kläglich die umgeänderte Version von mir für die Prestige.quest einzufügen.

Bin ziemlich neu im Questwriten wäre nett würde einer ma Drübergucken und die Fehler korrigieren sitze echt schon seit 3 Uhr an diesen scheiß Fehlern.

Meine Dauerfehlermeldung ist: qc in malloc(): error: allocation failed
Error occcured on compile prestige.quest


Wäre richtig nett würde mal einer Drübergucken =)) Danke im vorraus.

Code:
---------------------------------------------------------------------
---THIS PRESTIGE SYSTEM WAS MADE BY [SA]TEARS EDITED BY TERRORSIZE FROM TEARS OF HEAVEN---
---------------------------------------------------------------------
-----------------------PRESTIGE1 START-----------------------------------------------------
quest prestigeget begin
    state start begin
        when login or levelup with pc.level >= 1 and pc.getqf("prestige1") == 0 begin
            set_state(prestige1)
        end

    when prestige1 begin
        when letter begin
            send_letter("Prestige 1")
        end
		
		when button or info begin
            say_title("Das erste Prestige!")
			say("Da du nun  Level 1 erreicht hast bist du geehrt")
			say("Prestige 1 zu betreten, es wird dir je höherem Prestige Level")
			say("natürlich auch verschiedene Bonuse geben.")
			say("Möchtest du jetzt das erste Prestige betreten?")
			
			local prestige_betreten = select ("Ja", "Nein")
			
			if prestige_betreten == 2 then
			say("Na gut da du nicht willst. Selbst Schuld")
			return
			
			elseif prestige_betreten == 1 then
			say("Du willst also das erste Prestige aktivieren?")
			say("ACHTUNG:")
			say("Du bekommst nun einen dauerhaften Bonus von:")
			say_red("+2000 TP")
			say_red("+10 STR/+10 VIT/+10 DEX/+10 INT")
			say_reward("Möchtest du Prestige1 Betreten?")
			say_reward("Das nächste Prestige also "Prestige 2" bekommst du mit Level 30!")
			say("Aber wenn du Dieses Prestige nicht Annimmst kannst du deine Prestige Karriere vergessen!")
			local name = pc.get_name()
			
			local prestige_sicher = select ("Ja, ich will!", "Nein, lieber nicht >.<")
			
			if prestige_sicher == 2 then 
			say("Na gut dann überlege es dir nochmal!")
			return 
			
			elseif prestige_sicher == 1 then
			
			pc.setqf("prestige1", 1)
			
			affect.add_collect(apply.STR, 10, 60*60*24*365*60)
			affect.add_collect(apply.CON, 10, 60*60*24*365*60)
			affect.add_collect(apply.INT, 10, 60*60*24*365*60)
			affect.add_collect(apply.DEX, 10, 60*60*24*365*60)
			affect.add_collect(apply.MAX_HP, 2000, 60*60*24*365*60)
			
			mysql_query("UPDATE player.player SET prestige_level=1 WHERE name='"..name.."';")
			
			cmdchat("exit")
			
				clear_letter()
				set_state(__COMPLETE__)
			end
		end

    state __COMPLETE__ begin
    end
		
-----------------------PRESTIGE1 ENDE-----------------------------------------------------

-----------------------PRESTIGE2 START-----------------------------------------------------
	when login or levelup with pc.level >= 30 and pc.getqf("prestige1") == 1 begin
            set_state(prestige2)
        end

    when prestige2 begin
        when letter begin
            send_letter("Prestige 2")
        end
		
		when button or info begin
            say_title("Das zweite Prestige!")
			say("Da du das erste Prestige erfolgreich erreicht hattest,")
			say("ist es dir nun möglich das Prestige 2 mit Level 30 zu Betreten.")
			say_red("Diesmal wird es dir keine Bonuse bringen!")
			say("Möchtest du jetz das zweite Prestige betreten?")
			
			local prestige_betreten = select ("Ja", "Nein")
			
			if prestige_betreten == 2 then
			say("Na gut da du nicht willst. Selbst Schuld")
			return
			
			elseif prestige_betreten == 1 then
			say("Du willst also das zweite Prestige aktivieren?")
			say_reward("Das nächste Prestige also "Prestige 3" bekommst du mit Level 75!")
			say_reward("Aber wenn du Dieses Prestige nicht Annimmst kannst du deine Prestige Karriere vergessen!")
			local name = pc.get_name()
			
			local prestige_sicher = select ("Ja, ich will!", "Nein, lieber nicht >.<")
			
			if prestige_sicher == 2 then 
			say("Na gut dann überlege es dir nochmal!")
			return 
			
			elseif prestige_sicher == 1 then
			
			pc.setqf("prestige1", 2)
			
			mysql_query("UPDATE player.player SET prestige_level=2 WHERE name='"..name.."';")
			
			cmdchat("exit")
			
				clear_letter()
				set_state(__COMPLETE__)
			end
		end

    state __COMPLETE__ begin
    end
-----------------------PRESTIGE2 ENDE-----------------------------------------------------

-----------------------PRESTIGE3 START-----------------------------------------------------
	when login or levelup with pc.level >= 75 and pc.getqf("prestige1") == 2 begin
            set_state(prestige3)
        end

    when prestige3 begin
        when letter begin
            send_letter("Prestige 3")
        end
		
		when button or info begin
            say_title("Das dritte Prestige")
			say("Oh! du hast also auch das 3. Prestige geschafft?")
			say("Nun gut dann wärst du ja berreit das dritte")
			say("Prestige zu erreichen mit Level 75 natürlich gibts es hier wieder")
			say("Dauerhafte Bonuse")
			say("Willst du nun das dritte Prestige betreten?")
			
			local prestige_betreten = select ("Ja", "Nein")
			
			if prestige_betreten == 2 then
			say("Na gut da du nicht willst. Selbst Schuld")
			return
			
			elseif prestige_betreten == 1 then
			say("Du willst also das dritte Prestige aktivieren?")
			say_title("ACHTUNG:")
			say("Du bekommst nun einen dauerhaften Bonus von:")
			say_red("+4000 TP")
			say_red("+10 Schwertverteidiung")
			say_red("+10 Zweihandverteidigung")
			say_red("+10 Dolchverteidiung")
			say_red("+10 Magieverteidigung")
			say_red("+10 Glocken/Stabverteidigung")
			say_red("+10 Fächerverteidigung")
			say_red("+10 Pfeilverteidigung")
			say_reward("Möchtest du Prestige 3 Betreten?")
			say_reward("Das nächste Prestige also "Prestige 4" bekommst du mit Level 100!")
			say("Aber wenn du Dieses Prestige nicht Annimmst kannst du deine Prestige Karriere vergessen!")
			local name = pc.get_name()
			
			local prestige_sicher = select ("Ja, ich will", "Nein, lieber nicht")
			
			if prestige_sicher == 2 then 
			say("Na gut dann überleg es dir nochmal")
			return 
			
			elseif prestige_sicher == 1 then
			
			pc.setqf("prestige1", 3)
			
			mysql_query("UPDATE player.player SET prestige_level=3 WHERE name='"..name.."';")
			
			cmdchat("exit")
				
				clear_letter()
				set_state(__COMPLETE__)
			end
		end

    state __COMPLETE__ begin
    end
		
-----------------------PRESTIGE3 ENDE-----------------------------------------------------
		
-----------------------PRESTIGE4 ENDE-----------------------------------------------------
	when login or levelup with pc.level >= 100 and pc.getqf("prestige1") == 3 begin
            set_state(prestige4)
        end

    when prestige4 begin
        when letter begin
            send_letter("Prestige 4")
        end
		
		when button or info begin
            say_title("Das vierte Prestige")
			say("Hartneckig wie ich sehe... auch Prestige 3 und Level 100...")
			say("war keine Herausforderung für dich,")
			say("da du ja so viel Spaß am Leveln hast")
			say("kannst du nun Prestige4 betreten")
			
			local prestige_betreten = select ("Ja", "Nein")
			
			if prestige_betreten == 2 then
			say("Na gut da du nicht willst. Selbst Schuld")
			return
			
			elseif prestige_betreten == 1 then
			say("Du willst also das vierte Prestige aktivieren?")
			say_title("ACHTUNG:")
			say("Du bekommst nun einen dauerhaften Bonus von:")
			say_red("+6000 TP")
			say_red("+20 Durchbohrender Treffer")
			say_red("+20 Kritischer Treffer")
			say_reward("Möchtest du Prestige 4 Betreten?")
			say_reward("Das nächste Prestige also "Prestige 5" bekommst du mit Level 120!")
			say("Aber wenn du Dieses Prestige nicht Annimmst kannst du deine Prestige Karriere vergessen!")
			local name = pc.get_name()
			
			local prestige_sicher = select ("Ja, ich will!", "Nein, lieber nicht >.<")
			
			if prestige_sicher == 2 then 
			say("Na gut dann überlege es dir nochmal!")
			return 
			
			elseif prestige_sicher == 1 then
			
			pc.setqf("prestige1", 4)
			
			mysql_query("UPDATE player.player SET prestige_level=4 WHERE name='"..name.."';")
			
			cmdchat("exit")		
				
				clear_letter()				
				set_state(__COMPLETE__)
			end
		end

    state __COMPLETE__ begin
    end
-----------------------PRESTIGE4 ENDE-----------------------------------------------------

-----------------------PRESTIGE5 START-----------------------------------------------------
	when login or levelup with pc.level >= 120 and pc.getqf("prestige1") == 4 begin
            set_state(prestige5)
        end

    when prestige5 begin
        when letter begin
            send_letter("Prestige 5")
        end
		
		when button or info begin
            say_title("Das fünfte Prestige")
			say("Das ist die Vorletzte Prestigestufe")
			say("du hast nichtmehr viel Arbeit vor dir")
			say("Aber nun gut dann viel Spaß mit deinem fünften Prestige")
			say_red("auf dem Prestige bekommst du nun wieder keine Bonuse!")
			say("Möchtest du jetz das fünfte Prestige betreten?")
			
			local prestige_betreten = select ("Ja", "Nein")
			
			if prestige_betreten == 2 then
			say("Na gut da du nicht willst. Selbst Schuld")
			return
			
			elseif prestige_betreten == 1 then
			say("Du willst also das fünfte Prestige aktivieren?")
			say_reward("Das nächste Prestige also "Prestige 6" bekommst mit dem Maximal Level 150!")
			say("Aber wenn du Dieses Prestige nicht Annimmst kannst du deine Prestige Karriere vergessen!")
			local name = pc.get_name()
			
			local prestige_sicher = select ("Ja, ich will!", "Nein, lieber nicht >.<")
			
			if prestige_sicher == 2 then 
			say("Na gut dann überleg es dir nochmal")
			return 
			
			elseif prestige_sicher == 1 then
			
			pc.setqf("prestige1", 5)
				
			mysql_query("UPDATE player.player SET prestige_level=5 WHERE name='"..name.."';")

			cmdchat("exit")
			
			clear_letter()
				set_state(__COMPLETE__)
			end
		end

    state __COMPLETE__ begin
    end
-----------------------PRESTIGE5 ENDE-----------------------------------------------------		

-----------------------PRESTIGE6 START-----------------------------------------------------	
	when login or levelup with pc.level >= 150 and pc.getqf("prestige1") == 5 begin
            set_state(prestige6)
        end

    when prestige6 begin
        when letter begin
            send_letter("Prestige 6")
        end
		
		when button or info begin
            say_title("*Baby* Das sechste Prestige =)!!")
			say("Dies ist das letzte Prestige")
			say("du hast dir viel Mühe gegeben und")
			say("es wird dir natürlich auch entlohnt.")
			say("Möchtest du jetz das sechste Prestige betreten?")
			
			local prestige_betreten = select ("Ja", "Nein")
			
			if prestige_betreten == 2 then
			say("Na gut da du nicht willst. Selbst Schuld")
			return
			
			elseif prestige_betreten == 1 then
			say("Du willst also das sechste Prestige aktivieren?")
			say_title("ACHTUNG:")
		    say("Du bekommst nun den letzten dauerhaften Bonus von:")
			say_red("+10000 TP")
			say_red("+20 Stark gegen Krieger")
			say_red("+20 Stark gegen Ninja")
		    say_red("+20 Stark gegen Sura")
			say_red("+20 Stark gegen Schamane")
			say_reward("Möchtest du Prestige 6 Betreten?")
			say_reward("Wenn du dies nicht Betrittst wirds nix mit den Bonusen!!!")
			local name = pc.get_name()
			
			local prestige_sicher = select ("Ja, ich will!", "Nein, lieber nicht >.< Omg?")
			
			if prestige_sicher == 2 then 
			say("Na gut dann überleg es dir nochmal")
			return 
			
			elseif prestige_sicher == 1 then
			
			pc.setqf("prestige1", 6)
			
			mysql_query("UPDATE player.player SET prestige_level=6 WHERE name='"..name.."';")

			cmdchat("exit")
			
			clear_letter()
				set_state(__COMPLETE__)
			end
		end

    state __COMPLETE__ begin
    end
-----------------------PRESTIGE6 ENDE-----------------------------------------------------

-----------------------PRESTIGE EMBLEM START----------------------------------------------
		when login begin
		
		if pc.getqf("prestige1") == 1 then
		cmdchat("prestige1")
		end
		
		if pc.getqf("prestige1") == 2 then
		cmdchat("prestige2")
		end
		
		if pc.getqf("prestige1") == 3 then
		cmdchat("prestige3")
		end
		
		if pc.getqf("prestige1") == 4 then
		cmdchat("prestige4")
		end
		
		if pc.getqf("prestige1") == 5 then
		cmdchat("prestige5")
		end
		
		if pc.getqf("prestige1") == 6 then
		cmdchat("prestige6")
		end
		
		if pc.getqf("prestige1") == 7 then
		cmdchat("prestige6")
		end
	end
		
----------------------PRESTIGE EMBLEM ENDE--------------------------------------------------------------


-----------------------PRESTIGE Equip Prüfung PRESTIGE1 START-----------------------------------------------------

		when login with pc.getqf("prestige1") == 1 begin
		
		if pc.get_level() == 1 then
		
		say("Das Prestige war erfolgreich")
		say("Du bist jetzt Prestige Level 1!")
		say("Und bekommst jetzt deine Bonuse!")
		say_red("+2000 TP")
		say_red("+10 STR/+10 VIT/+10 DEX/+10 INT")	
		notice_all("System: ".. pc.get_name() .." ist Prestige Level 1. Herzlichen Glückwunsch!")
		
			affect.add_collect(apply.STR, 10, 60*60*24*365*60)
			affect.add_collect(apply.CON, 10, 60*60*24*365*60)
			affect.add_collect(apply.INT, 10, 60*60*24*365*60)
			affect.add_collect(apply.DEX, 10, 60*60*24*365*60)
			affect.add_collect(apply.MAX_HP, 2000, 60*60*24*365*60)
		
		end
	end

	

-----------------------PRESTIGE Equip Prüfung PRESTIGE1 ENDE-----------------------------------------------------


-----------------------PRESTIGE Equip Prüfung PRESTIGE2 START-----------------------------------------------------

		when login with pc.getqf("prestige1") == 2 begin
		
		if pc.get_level() == 30 then
		
		say("Das Prestige war erfolgreich")
		say("Du bist jetzt Prestige Level 2!")
		say("Und bekommst jetzt deine Bonuse!")
		say("Hmm oder doch nich ;)")
		say("Hau Reeeeeeiiin :DD ;)")
		say("Doch 1 Yang lass ich dir kauf dirn Eiß dafür =)")
		notice_all("System: ".. pc.get_name() .." ist Prestige Level 2. Herzlichen Glückwunsch!")
		
		pc.give_gold(1)
	
		end
	end
	

-----------------------PRESTIGE Equip Prüfung PRESTIGE2 ENDE-----------------------------------------------------

	
-----------------------PRESTIGE Equip Prüfung PRESTIGE3 START-----------------------------------------------------


		when login with pc.getqf("prestige1") == 3 begin
		
		if pc.get_level() == 75 then
		
		say("Das Prestige war erfolgreich")
		say("Du bist jetzt Prestige Level 3!")
		say("Und bekommst jetzt deine Bonuse!")
		say_red("+4000 TP")
		say_red("+10 Schwertverteidiung")
		say_red("+10 Zweihandverteidigung")
		say_red("+10 Dolchverteidiung")
		say_red("+10 Magieverteidigung")
		say_red("+10 Glocken/Stabverteidigung")
		say_red("+10 Fächerverteidigung")
		say_red("+10 Pfeilverteidigung")
		notice_all("System: ".. pc.get_name() .." ist Prestige Level 3. Herzlichen Glückwunsch!")
		
			affect.add_collect(apply.RESIST_SWORD, 10, 60*60*24*365*60)
			affect.add_collect(apply.RESIST_TWOHAND, 10, 60*60*24*365*60)
			affect.add_collect(apply.RESIST_MAGIC, 10, 60*60*24*365*60)
			affect.add_collect(apply.RESIST_BOW, 10, 60*60*24*365*60)
			affect.add_collect(apply.RESIST_DAGGER, 2000, 60*60*24*365*60)
			affect.add_collect(apply.RESIST_BELL, 10, 60*60*24*365*60)
			affect.add_collect(apply.RESIST_FAN, 10, 60*60*24*365*60)
			affect.add_collect(apply.MAX_HP, 4000, 60*60*24*365*60)
		
		end
	end


-----------------------PRESTIGE Equip Prüfung PRESTIGE3 ENDE-----------------------------------------------------
	
	
-----------------------PRESTIGE Equip Prüfung PRESTIGE4 START-----------------------------------------------------


		when login with pc.getqf("prestige1") == 4 begin
		
		if pc.get_level() == 100 then
		
		say("Das Prestige war erfolgreich")
		say("Du bist jetzt Prestige Level 4!")
		say("Und bekommst jetzt deine Bonuse!")
		say_red("+6000 TP")
		say_red("+20 Durchbohrender Treffer")
		say_red("+20 Kritischer Treffer")
		notice_all("System: ".. pc.get_name() .." ist Prestige Level 4. Herzlichen Glückwunsch!")
		
			affect.add_collect(apply.PENETRATE_PCT, 20, 60*60*24*365*60)
			affect.add_collect(apply.CRITICAL_PCT, 20, 60*60*24*365*60)
			affect.add_collect(apply.MAX_HP, 6000, 60*60*24*365*60)
		
		end
	end
	
	
-----------------------PRESTIGE Equip Prüfung PRESTIGE4 ENDE-----------------------------------------------------
	
	
-----------------------PRESTIGE Equip Prüfung PRESTIGE5 START-----------------------------------------------------

	
		when login with pc.getqf("prestige1") == 5 begin
		
		if pc.get_level() == 120 then
		
		say("Das Prestige war erfolgreich")
		say("Du bist jetzt Prestige Level 5!")
		say("Auf diesem Prestige bekommt man keine Bonis!")
		notice_all("System: ".. pc.get_name() .." ist Prestige Level 5. Herzlichen Glückwunsch!")
		
		end
	end	
	
	
-----------------------PRESTIGE Equip Prüfung PRESTIGE5 ENDE-----------------------------------------------------
	
	
	
-----------------------PRESTIGE Equip Prüfung PRESTIGE6 START-----------------------------------------------------	
	
	
	
		when login with pc.getqf("prestige1") == 6 begin
		
		if pc.get_level() == 150 then
		
		say("Das Prestige war erfolgreich")
		say("Du hast nun das letzte Prestige Level 6")
		say("Geschafft, Herzlichen Glückwunsch vom StarryNight2 Team!")
		say("Du bekommst nun deine Bonuse!")
	    say_red("+10000 TP")
		say_red("+20 Stark gegen Krieger")
		say_red("+20 Stark gegen Ninja")
		say_red("+20 Stark gegen Sura")
		say_red("+20 Stark gegen Schamane")
		notice_all("System: ".. pc.get_name() .." WoooW Prestige Level 6. Herzlichen Glückwunsch, du hast es Geschafft =)")
		
			affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 20, 60*60*24*365*60)
			affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 20, 60*60*24*365*60)
			affect.add_collect(apply.ATT_BONUS_TO_SURA, 20, 60*60*24*365*60)
		    affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 20, 60*60*24*365*60)
			affect.add_collect(apply.MAX_HP, 20, 60*60*24*365*60)
		
		pc.setqf("prestige1", 7)
		
		end
	end
	end
end
	
-----------------------PRESTIGE Equip Prüfung PRESTIGE6 ENDE-----------------------------------------------------



-----------------------PRESTIGE SYSTEM ENDE - QUEST ERFOLGREICH GECODET BY [SA]Tears von TEARS OF HEAVEN-------------------------------------------------

mfG, TeRRoR

#edit Wäre nett würdet ihr mir dann die Fehlerfreie Quest per Pn schicken =))
01/05/2013 00:25 Night³#7425
Quote:
Originally Posted by Night³ View Post
geht immer noch nicht

PHP Code:
quest gm_status begin
    state start begin
        when login begin
            set_state
(info)
        
end
    end
    state info begin
        when letter begin
            send_letter
("GM-Online")
        
end
        when info 
or button begin
            say_title 
("GM Status:")
            
say_gold("Name --- Status")
            
say_gold("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
            if 
game.get_event_flag ("[SA] ")== 1 then
            say_green
("[SA]  ist online  (SA)")
            else
            
say_red("[SA]  ist offline  (SA)")
            
end
            
if game.get_event_flag("[SA] ")== 1 then
            say_green
("[SA]  ist online  (SA)")
            else
            
say_red("[SA]  ist offline  (SA)")
            
end
            
if game.get_event_flag("[GA] ")== 1 then
            say_green
("[GA]  ist online  (GA)")
            else
            
say_red("[GA]  ist offline  (GA)")
            
end
            
if game.get_event_flag("[TM] ")== 1 then
            say_green
("[TM]  ist online  (TM)")
            else
            
say_red("[TM]  ist offline  (TM)")
            
end
            
if game.get_event_flag("[GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
            
if game.get_event_flag("[SGM] ")== 1 then
            say_green
("[SGM]  ist online  (SGM)")
            else
            
say_red("[SGM]  ist offline  (SGM)")
            
end
            
if game.get_event_flag("[SGM] ")== 1 then
            say_green
("[SGM]  ist online  (SGM)")
            else
            
say_red("[SGM]  ist offline  (SGM)")
            
end
            
if game.get_event_flag("[GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
            
if game.get_event_flag("][GM] ")== 1 then
            say_green
("[GM]  ist online  (GM)")
            else
            
say_red("[GM]  ist offline  (GM)")
            
end
        end
    end
end 
up