[SERVICE] Die Questkontrolle

04/23/2011 14:59 .Delta#2056
probiers mal statt
PHP Code:
mob.spawn(8027) 
mit
PHP Code:
d.spawn_mob(8027, 359, 426) 
Die Koords kannst/musst du halt noch anpassen^^
04/23/2011 15:00 DasKuchen#2057
Hatte ich davor auch schon deswegen habe ich diese methode probiert aber ich werde es gleich nochmal versuchen


ob fail oder nicht werde ich editieren.



PS: Muss ich vllt den NPC in der mob_proto einstellen.
04/23/2011 15:02 .Delta#2058
Quote:
Originally Posted by DasKuchen View Post
Hatte ich davor auch schon deswegen habe ich diese methode probiert aber ich werde es gleich nochmal versuchen


ob fail oder nicht werde ich editieren.



PS: Muss ich vllt den NPC in der mob_proto einstellen.
wenn d.spawn_mob nicht will dann nimm
PHP Code:
mob.spawn(8027, 359, 426, 1) 
Koords natürlich wieder anpassen
04/23/2011 15:35 DasKuchen#2059
Geht nicht es leigt aber vllt am DT ich versuche mal ne andere methode zu finden
04/23/2011 16:08 √π.#2060
Was sagt Putty denn, wo der Fehler ist?
04/23/2011 16:25 DasKuchen#2061
Putty gibt mir keinen Fehler

EDIT:#
Habe jetzt eine andere Methode gefunden habe eine neue regen.txt geschreiben wo der 90 metin immer wieder neu spawnt ,doch alles geht nur der 90 meti nspawnt nicht nach dem blauem tod sollte er spawnen

ABSCHNITT:
PHP Code:
    when 1095.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        d
.notice("".. pc.get_name() .." hat den Blauen Tod bezwungen!")
        
d.notice("Glückwunsch!")
        
d.notice("Es geht aber noch weiter")
        
d.notice("Uppe deine Sachen dannach töte den Metin")
        
d.notice("der Rest erklärt sich von selbst")        
        
local reward_alchemist = {20074, 20075, 20076}
        
d.spawn_mob(20074, 609, 179);
        
d.spawn_mob(20075, 609, 172);
        
d.spawn_mob(20076, 609, 185);
        
d.spawn_mob(20094, 619, 170);
        
d.set_regen_file("data/dungeon/90metin.txt")        
        
d.setqf("can_refine", 1)
    
end 
90metin.txt
PHP Code:
r    611    162    10    10    0    0    10s    100    1    8027 
04/23/2011 17:02 .Delta#2062
versuchs mit m statt r
also vorne dran
04/23/2011 17:08 '-SkyLiiNe-'#2063
PHP Code:
quest auszahlen_3 begin
    state start begin
        when 95002.
use begin
            say_title
("500kk Yang auszahlen")
            
say("Du willst also 500kk Yang ausgezahlt bekommen?")
            
say("Kein Problem, aber bitte beachte du darfst mit")
            
say("dem ausgezahltem Yang nicht mehr wie 2kkk besitzen")
            
say("sonst kommt es zu einem Bug!")
            
say("Wenn du nicht in den Bereich des Bugs kommst")
            
say("kannst du dir nun dein Geld auszahlen lassen.")
            
say("ACHTUNG: beim Auszahlen darf das Item NICHT")
            
say("gestapelt sein sonst kommt es zu einem Bug!")
                
            
local s = select("Auszahlen", "Abbrechen")
                
            if 
s == 1 then
            local x 
= pc.countitem(95002)
                if 
pc.countitem(95002) < x then
                    say
("NICHT BETRÜGEN")
                elseif 
pc.countitem(95002) >= x then    
                    pc
.changemoney(500000000)
                    
say("Dir wurden soeben 500kk Yang ausgezahlt.")
                    
pc.removeitem("95002",1)
                else
                    return    
                
end
            end    
            
if s == 2 then
                
return
            
end    
        end
    end
end 
Es wird immer Geld ausgezahlt,
auch wenn man das Item wegwirft bevor man die Quest startet...
04/23/2011 17:13 .Delta#2064
ja tu das local x = pc.count_item(95002) mal vor die select auswahl
04/23/2011 17:53 '-SkyLiiNe-'#2065
PHP Code:
quest auszahlen_3 begin
    state start begin
        when 95002.
use begin
            say_title
("500kk Yang auszahlen")
            
say("Du willst also 500kk Yang ausgezahlt bekommen?")
            
say("Kein Problem, aber bitte beachte du darfst mit")
            
say("dem ausgezahltem Yang nicht mehr wie 2kkk besitzen")
            
say("sonst kommt es zu einem Bug!")
            
say("Wenn du nicht in den Bereich des Bugs kommst")
            
say("kannst du dir nun dein Geld auszahlen lassen.")
            
say("ACHTUNG: beim Auszahlen darf das Item NICHT")
            
say("gestapelt sein sonst kommt es zu einem Bug!")
            
            
local x = pc.countitem(95002)   
            
local s = select("Auszahlen", "Abbrechen")
                
            if 
s == 1 then
                
if pc.countitem(95002) < x then
                    say
("NICHT BETRÜGEN")
                elseif 
pc.countitem(95002) >= x then    
                    pc
.changemoney(500000000)
                    
say("Dir wurden soeben 500kk Yang ausgezahlt.")
                    
pc.removeitem("95002",1)
                else
                    return    
                
end
            end    
            
if s == 2 then
                
return
            
end    
        end
    end
end 
Geht nicht.
Es passiert jz garnix mehr.
04/23/2011 18:02 .Delta#2066
dann vllt so auch wenns n bisschen umständlich wirkt :D
PHP Code:
quest auszahlen_3 begin
    state start begin
        when 95002.
use begin
            say_title
("500kk Yang auszahlen")
            
say("Du willst also 500kk Yang ausgezahlt bekommen?")
            
say("Kein Problem, aber bitte beachte du darfst mit")
            
say("dem ausgezahltem Yang nicht mehr wie 2kkk besitzen")
            
say("sonst kommt es zu einem Bug!")
            
say("Wenn du nicht in den Bereich des Bugs kommst")
            
say("kannst du dir nun dein Geld auszahlen lassen.")
            
say("ACHTUNG: beim Auszahlen darf das Item NICHT")
            
say("gestapelt sein sonst kommt es zu einem Bug!")
            
            
local x = pc.count_item(95002)
            
pc.setqf("itemzahl", x)
            
local s = select("Auszahlen", "Abbrechen")
                
            if 
s == 1 then
                
if pc.count_item(95002) < pc.getqf("itemzahl") then
                    say
("NICHT BETRÜGEN")
                elseif 
pc.count_item(95002) >= pc.getqf("itemzahl") then    
                    pc
.changemoney(500000000)
                    
say("Dir wurden soeben 500kk Yang ausgezahlt.")
                    
pc.removeitem("95002",1)
                else
                    return    
                
end
            end    
            
if s == 2 then
                
return
            
end    
        end
    end
end 
04/23/2011 18:05 '-SkyLiiNe-'#2067
Quote:
Originally Posted by .Delta View Post
dann vllt so auch wenns n bisschen umständlich wirkt :D
PHP Code:
quest auszahlen_3 begin
    state start begin
        when 95002.
use begin
            say_title
("500kk Yang auszahlen")
            
say("Du willst also 500kk Yang ausgezahlt bekommen?")
            
say("Kein Problem, aber bitte beachte du darfst mit")
            
say("dem ausgezahltem Yang nicht mehr wie 2kkk besitzen")
            
say("sonst kommt es zu einem Bug!")
            
say("Wenn du nicht in den Bereich des Bugs kommst")
            
say("kannst du dir nun dein Geld auszahlen lassen.")
            
say("ACHTUNG: beim Auszahlen darf das Item NICHT")
            
say("gestapelt sein sonst kommt es zu einem Bug!")
            
            
local x = pc.count_item(95002)
            
pc.setqf("itemzahl", x)
            
local s = select("Auszahlen", "Abbrechen")
                
            if 
s == 1 then
                
if pc.count_item(95002) < pc.getqf("itemzahl") then
                    say
("NICHT BETRÜGEN")
                elseif 
pc.count_item(95002) >= pc.getqf("itemzahl") then    
                    pc
.changemoney(500000000)
                    
say("Dir wurden soeben 500kk Yang ausgezahlt.")
                    
pc.removeitem("95002",1)
                else
                    return    
                
end
            end    
            
if s == 2 then
                
return
            
end    
        end
    end
end 
^Geht, danke
04/23/2011 19:02 stasiak96#2068
Ich würde für eine solche Suche bitten, das Entfernen der Dichtung.
SF 2010

04/25/2011 10:00 Metinstyle123#2069
Hallo ihr lieben,
habe eine Reichsquest gefunden die aber nicht funktioniert sie sieht so aus

PHP Code:
quest Reichsteleporter begin
    state start begin
        when 9004.chat
."Reichsteleporter" begin
        say_title 
( "Reichs Teleporter:" ) 
        
say ( "Dies ist eine faszinierende Gegend. Aber" ) 
        
say ( "passiert hier denn auch mal etwas" ) 
        
say ( "Außergewöhnliches? Eher wohl nicht. In anderen" ) 
        
say ( "Teilen des Landes sieht es mitunter ganz anders." ) 
        
say ( "aus! Es gibt daher sicher einen intressanten" ) 
        
say ( "Ort, an den ich dich teleportieren könnte. Da" ) 
        
say ( "jedoch die Kräfte des Bösen wieder stärker" ) 
        
say ( "geworden sind, wurden Raum und Zeit ins Chaos" ) 
        
say ( "gestürzt. Dadurch kann es passieren, dass deine" ) 
        
say ( "Rückkehr nicht immer augenblicklich funktioniert." ) 
        
say ( "Möchtest du dennoch teleportiert werden?" ) 

            
local main_set = select ( "Ja" , "Nein" ) 
            if 
main_set == 2 then 
                
return 
            
end 
            
            
if pc . get_level ( ) <= 10 then 
                say_title 
( "Reichs Teleporter:" ) 
                
say ( "Hm… Mit deinem derzeitigen Level bist du noch" ) 
                
say ( "zu schwach für die Reise durch Zeit und Raum." ) 
                
say ( "Komm wieder, wenn du höher als Level 10 bist." ) 
                    return 
                
end 
                    local map 
= pc . get_map_index ( ) 
                    
local empire = pc . get_empire ( ) 
                    
local level = pc . get_level ( ) 
                    
local cost = math . floor ( level / 5 ) * 1 
                    
if cost < 1 then 
                    cost 
= 1 
                end 
                say_title 
( "Reichs Teleporter:" ) 
                
say ( "Wohin möchtest du teleportiert werden?" ) 
                
say_reward ( string . format ( "Das kostet dich 20000 Yang." , cost ) ) 
                if 
map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then 
local guild_map_names 
= { 
"Rotes Reich Map1" , 
"Rotes Reich Map1" , 
"Rotes Reich Map1" , 
} 
guild_map_name = guild_map_names [ empire ] 
local empire_castle = { 
"Blaues Reich Map1" , 
"Blaues Reich Map1" , 
"Blaues Reich Map1" , 
} 
empire_castle = empire_castle [ empire ] 
local sub_set = 0 
if level < 10 then 
sub_set 
= select ( guild_map_name , "Rotes Reich Map2" , "Gelbes Reich Map1" , "Gelbes Reich Map2" , empire_castle , "Weiter ReicheMaps" ) 
if 
sub_set == 6 then 
return 
end 
else 
sub_set = select ( guild_map_name , "Rotes Reich Map2" , "Gelbes Reich Map1" , "Gelbes Reich Map2" , empire_castle , "Weiter ReicheMaps" ) 
if 
sub_set == 6 then 
say_title 
( "Teleporter:" ) 
say ( "Wohin möchtest du teleportiert werden?" ) 
say_reward ( string . format ( "Das kostet dich %d Yang." , cost ) ) 
sub_set = select ( "Blaues Reich Map2" , "Kommt noch!" , "Zurück" , "Abbrechen" ) + 5 
if sub_set == 9 then 
return 
end 
if sub_set == 8 then 
say_title 
( "Reichs Teleporter:" ) 
say ( "Wohin möchtest du teleportiert werden?" ) 
say_reward ( string . format ( "Das kostet dich %d Yang." , cost ) ) 
sub_set = select ( guild_map_name , "Rotes Reich Map2" , "Gelbes Reich Map1" , "Gelbes Reich Map2" , empire_castle , "Weitere ReicheMaps" ) 
if 
sub_set == 6 then 
say_title 
( "Reichs Teleporter:" ) 
say ( "Wohin möchtest du teleportiert werden?" ) 
say_reward ( string . format ( "Das kostet dich %d Yang." , cost ) ) 
sub_set = select ( "Blaues Reich Map2" , "Kommt Noch!" , "Abbrechen" ) + 5 
if sub_set == 8 then 
return 
end 
end 
end 
end 
end 
if pc . gold < cost then 
say 
( "Du hast nicht genug Geld," ) 
say_title ( "Reichs Teleporter:" ) 
say ( "Ich würde dich auch kostenlos teleportieren," ) 
say ( "aber ich habe eine große Familie. Um sie zu" ) 
say ( "ernähren, muss ich Geld verdienen." ) 
say_reward ( string . format ( "Es kostet %d Yang." , cost ) ) 
return 
end 
pc 
. changegold ( - cost ) 
local warp = { 
{ 
{ 
474200 , 954400 } , 
{ 
474200 , 954400 } , 
{ 
474200 , 954400 } , 
} , 
{ 
{ 
352900 , 882500 } , 
{ 
352900 , 882500 } , 
{ 
352900 , 882500 } , 
} , 
{ 
{ 
63200 , 166100 } , 
{ 
63200 , 166100 } , 
{ 
63200 , 166100 } , 
} , 
{ 
{ 
145600 , 239900 } , 
{ 
145600 , 239900 } , 
{ 
145600 , 239900 } , 
} , 
{ 
{ 
960100 , 268700 } , 
{ 
960100 , 268700 } , 
{ 
960100 , 268700 } , 
} , 
{ 
{ 
863900 , 245900 } , 
{ 
863900 , 245900 } , 
{ 
863900 , 245900 } , 
} , 
{ 
{ 
0 , 0 } , 
{ 
0 , 0 } , 
{ 
0 , 0 } , 
} , 
} 
test_chat ( warp [ sub_set ] [ empire ] [ 1 ] .. warp [ sub_set ] [ empire ] [ 2 ] ) 
say_title ( "Reichs Teleporter:" ) 
say ( "Achtung, ich teleportiere dich jetzt. Du wirst" ) 
say ( "an einem gefährlichen Ort landen, also pass auf" ) 
say ( "dich auf. Viel Glück!" ) 
wait ( ) 
pc . warp ( warp [ sub_set ] [ empire ] [ 1 ] , warp [ sub_set ] [ empire ] [ 2 ] ) 
else 
local sub_set2 = 3 
if empire == 1 then 
sub_set2 
= select ( "Yongan" , "Jayang" , locale . cancel ) 
elseif 
empire == 2 then 
sub_set2 
= select ( "Joan" , "Bokjung" , locale . cancel ) 
elseif 
empire == 3 then 
sub_set2 
= select ( "Pyungmoo" , "Bakra" , locale . cancel ) 
end 
if sub_set2 ~= 3 then 
if pc . gold < cost then 
say_title 
( "Reichs Teleporter:" ) 
say ( "Ich würde dich auch umsonst teleportieren," ) 
say ( "aber ich habe eine große Familie. Um sie zu" ) 
say ( "ernähren, muss ich Geld verdienen." ) 
say_reward ( string . format ( "Es kostet %d Yang." , cost ) ) 
else 
if 
sub_set2 == 1 then 
say_title 
( "Reichs Teleporter:" ) 
say ( "Ich teleportiere dich dorthin." ) 
wait ( ) 
if 
empire == 1 then 
pc 
. warp ( 474300 , 954800 ) 
elseif 
empire == 2 then 
pc 
. warp ( 63800 , 166400 ) 
elseif 
empire == 3 then 
pc 
. warp ( 959900 , 269200 ) 
end 
elseif sub_set2 == 2 then 
say_title 
( "Reichs Teleporter:" ) 
say ( "Ich teleportiere dich dorthin." ) 
wait ( ) 
if 
empire == 1 then 
pc 
. warp ( 353100 , 882900 ) 
elseif 
empire == 2 then 
pc 
. warp ( 145500 , 240000 ) 
elseif 
empire == 3 then 
pc 
. warp ( 863900 , 246000 ) 
end 
end 
pc 
. changegold ( - cost ) 
end 
end 
end 
Kann mir da jemand die quest so amchen das sie auch geht?
04/25/2011 10:49 .Delta#2070
[Only registered and activated users can see links. Click Here To Register...]
schau mal darein^^
Da gibt es eine funktionierende Version