[SERVICE] Die Questkontrolle

04/03/2011 21:00 Brodan#1846
Quote:
Originally Posted by Delta619 View Post
Brodan ein end mehr untendran dann dürfte es funktionieren

Wohin genau o:
04/03/2011 21:10 .Delta#1847
ganz nach unten
04/03/2011 21:46 Brodan#1848
Quote:
Originally Posted by Delta619 View Post
ganz nach unten
Also so:


oder stimmt wieder etwas nicht :s
04/03/2011 23:56 AquilaMt2#1849
Quote:
say_title ( "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 ( "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 ) * 1000
if cost < 1000 then
cost = 1000
end
say_title ( "Teleporter:" )
say ( "Wohin möchtest du teleportiert werden?" )
say_reward ( string . format ( "Das kostet dich %d 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 = {
"Hoher Rat der GMs" ,
"Hoher Rat der GMs" ,
"Hoher Rat der GMs" ,
}
guild_map_name = guild_map_names [ empire ]
local empire_castle = {
"DeathYT2 Event& ChillMap" ,
"DeathYT2 Event& ChillMap" ,
"DeathYT2 Event& ChillMap" ,
}
empire_castle = empire_castle [ empire ]
local sub_set = 0
if level < 60 then
sub_set = select ( guild_map_name , "Tal von Seungryong" , "Yongbi-Wüste" , "Berg Sohan" , empire_castle , "Andere Gebiete" )
if sub_set == 6 then
return
end
else
sub_set = select ( guild_map_name , "Tal von Seungryong" , "Yongbi-Wüste" , "Berg Sohan" , empire_castle , "Andere Gebiete" )
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 ( "Doyyumhwaji" , "Dämonenturm" , "Spinnendungeon" , "Lungsam" , "Roter Wald" , "Land der Riesen" , "Zurück" , "Abbrechen" ) + 5
if sub_set == 13 then
return
end
if sub_set == 12 then
say_title ( "Teleporter:" )
say ( "Wohin möchtest du teleportiert werden?" )
say_reward ( string . format ( "Das kostet dich %d Yang." , cost ) )
sub_set = select ( guild_map_name , "Tal von Seungryong" , "Yongbi-Wüste" , "Berg Sohan" , empire_castle , "Andere Gebiete" )
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 ( "Doyyumhwaji" , "Dämonenturm" , "Spinnendungeon" , "Lungsam" , "Roter Wald" , "Land der Riesen" , "Abbrechen" ) + 5
if sub_set == 12 then
return
end
end
end
end
end
if pc . gold < cost then
say ( "Du hast nicht genug Geld," )
say_title ( "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 = {
{
{ 999900 , 999900 } ,
{ 999900 , 999900 } ,
{ 999900 , 999900 } ,
} ,
{
{ 402100 , 673900 } ,
{ 270400 , 739900 } ,
{ 321300 , 808000 } ,
} ,
{
{ 217800 , 627200 } ,
{ 221900 , 502700 } ,
{ 344000 , 502500 } ,
} ,
{
{ 434200 , 290600 } ,
{ 375200 , 174900 } ,
{ 491800 , 173600 } ,
} ,
{
{ 2.81292e+07 , 2.81292e+07 } ,
{ 2.81292e+07 , 2.81292e+07 } ,
{ 2.81292e+07 , 2.81292e+07 } ,
} ,
{
{ 599400 , 756300 } ,
{ 597800 , 622200 } ,
{ 730700 , 689800 } ,
} ,
{
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
} ,
{
{ 60000 , 496000 } ,
{ 60000 , 496000 } ,
{ 60000 , 496000 } ,
} ,
{
{ 288700 , 5700 } ,
{ 288700 , 5700 } ,
{ 288700 , 5700 } ,
} ,
{
{ 1.1199e+06 , 70800 } ,
{ 1.1199e+06 , 70800 } ,
{ 1.1199e+06 , 70800 } ,
} ,
{
{ 845100 , 745900 } ,
{ 845100 , 745900 } ,
{ 845100 , 745900 } ,
} ,
}
test_chat ( warp [ sub_set ] [ empire ] [ 1 ] .. warp [ sub_set ] [ empire ] [ 2 ] )
say_title ( "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 ( "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 ( "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 ( "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
könnte mier hier vllt jemand diese DeathYT2 Event& ChillMap wegmachen sodass der Teleporter einen nicht mehr dort hin portet? Falls ihr diese Info braucht: das ist diese Anfängerwiese wo auf der ganzen map nur map1 mobs sind die es zB auch bei den Computercrank files gibt

thx schon mal im vorraus^^
04/04/2011 17:54 .Aliyanaa#1850
Meine Quest geht immer noch ned <.<
04/04/2011 18:22 xMichiix#1851
Quote:
Originally Posted by ~Exclain~ View Post
Meine Quest geht immer noch ned <.<
^this meine auch nich ...
04/04/2011 19:20 BL00DSTYL3#1852
hat sich erledigt -werde hier nacher anderen Quest rein editieren
04/04/2011 19:30 heshii'#1853
PHP Code:
quest eventtot begin
    state start begin
            when 1095.kill begin
                notice_all
("".. pc.get_name() .." hat den Blauen Tod bezwungen!!!")
            
end
    end
end 
Geht nicht keine ahnung warum habe andere mobs getestet ....
ist aber ganz simpel gebaut muss eig fuktionieren
04/04/2011 20:06 .Delta#1854
Quote:
Originally Posted by iFoXy View Post
PHP Code:
quest eventtot begin
    state start begin
            when 1095.kill begin
                notice_all
("".. pc.get_name() .." hat den Blauen Tod bezwungen!!!")
            
end
    end
end 
Geht nicht keine ahnung warum habe andere mobs getestet ....
ist aber ganz simpel gebaut muss eig fuktionieren
wenn du nen DT-Run bis zum blauen Tod hast, wird eine extra Killquest für den blauen Tod nicht funktionieren ;)

@ alle Anderen:

ich schaue morgen auf eure Quests, muss heute noch n bisschen was für Colloquium machen ;)
04/04/2011 20:09 '-SkyLiiNe-'#1855
PHP Code:
quest expbox begin
    state start begin
        when 80001.
use begin
        say_title
("EXP-Box:")
        
say("Du möchtest also 200 Millionen EXP bekommen?")
        
say("ACHTUNG: Es kann sein das du vom Server gekickt wirst!")
        
say("Indem Fall log dich einfach wieder ein, der Kick")
        
say("kommt von den vielen Level-UPs!")
        
say_reward("EXP-Box benutzen?")
        
        
local x select("Ja","Abbrechen")
            
        if 
== 2 then
            
return
        
end
        
if == 1 then
            pc
.give_exp2(200000000)
            
chat("Du hast 200.000.000 Erfahrung erhalten!")
            
item.remove(80001,1)
        
end
    end
end 
funkt ned
=/
04/04/2011 20:13 heshii'#1856
Quote:
Originally Posted by Delta619 View Post
wenn du nen DT-Run bis zum blauen Tod hast, wird eine extra Killquest für den blauen Tod nicht funktionieren ;)

@ alle Anderen:

ich schaue morgen auf eure Quests, muss heute noch n bisschen was für Colloquium machen ;)
Ich will ja das es auf map 1 funktioniert das geht aber nicht , keine ahnung warum
04/04/2011 20:23 .Delta#1857
Quote:
Originally Posted by iFoXy View Post
Ich will ja das es auf map 1 funktioniert das geht aber nicht , keine ahnung warum
ich hab gedacht ich hätte es dir grade gesagt? :p
du kannst es gerne mal so probieren, aber weiß nicht ob das funktioniert
PHP Code:
quest eventtot begin
    state start begin
            when 1095.kill with pc
.get_map_index() == or pc.get_map_index() == 21 or pc.get_map_index() == 41 begin
                notice_all
("".. pc.get_name() .." hat den Blauen Tod bezwungen!!!")
            
end
    end
end 
@[SA]Choco
PHP Code:
quest expbox begin
    state start begin
        when 80001.
use begin
        say_title
("EXP-Box:")
        
say("Du möchtest also 200 Millionen EXP bekommen?")
        
say("ACHTUNG: Es kann sein das du vom Server gekickt wirst!")
        
say("Indem Fall log dich einfach wieder ein, der Kick")
        
say("kommt von den vielen Level-UPs!")
        
say_reward("EXP-Box benutzen?")
        
        
local x select("Ja","Abbrechen")
            
        if 
== 2 then
            
return
        
end
        
if == 1 then
            pc
.give_exp2(200000000)
            
chat("Du hast 200.000.000 Erfahrung erhalten!")
            
pc.remove_item(80001,1)
        
end
end
    end
end 
Steht der Type des Items auf 18?
04/04/2011 20:37 heshii'#1858
Quote:
Originally Posted by Delta619 View Post
ich hab gedacht ich hätte es dir grade gesagt? :p
du kannst es gerne mal so probieren, aber weiß nicht ob das funktioniert
PHP Code:
quest eventtot begin
    state start begin
            when 1095.kill with pc
.get_map_index() == or pc.get_map_index() == 21 or pc.get_map_index() == 41 begin
                notice_all
("".. pc.get_name() .." hat den Blauen Tod bezwungen!!!")
            
end
    end
end 
@[SA]Choco
PHP Code:
quest expbox begin
    state start begin
        when 80001.
use begin
        say_title
("EXP-Box:")
        
say("Du möchtest also 200 Millionen EXP bekommen?")
        
say("ACHTUNG: Es kann sein das du vom Server gekickt wirst!")
        
say("Indem Fall log dich einfach wieder ein, der Kick")
        
say("kommt von den vielen Level-UPs!")
        
say_reward("EXP-Box benutzen?")
        
        
local x select("Ja","Abbrechen")
            
        if 
== 2 then
            
return
        
end
        
if == 1 then
            pc
.give_exp2(200000000)
            
chat("Du hast 200.000.000 Erfahrung erhalten!")
            
pc.remove_item(80001,1)
        
end
end
    end
end 
Steht der Type des Items auf 18?
nope geht immernoch nicht ....
04/04/2011 20:52 Lowwer#1859
PHP Code:
quest basic_weapon begin
    state start begin
        when login begin
                local item 
19
                
if pc.job == 1 then
                    item 
1009
                
elseif pc.job == 3 then
                    item 
7009
                end
                
if pc.countitem(item) == and pc.weapon != item then
                    pc
.give_item2(item)
                    
pc.give_item2(27002,200 )
                    
pc.give_item2(72702,)
                    
pc.give_item2(80009,)
                    
pc.give_item2(71004,)
                    
pc.give_item2(71017,)
                    
pc.give_item2(70038,20 )
                    
pc.give_item2(2500,)
                    
pc.give_item2(50054,10 )
                    
horse.set_level("1")
                    
say_title("Willkommensgruß")
                    
say("")
                    
say("Hallo Neuling!")
                    
say("Viele spannende Abenteuer und starke")
                    
say("Monster werden dich hier in der Welt")
                    
say("von [Mein_Servername] erwarten. Hier wirst du")
                    
say("in einer angenehmen Atmosphäre spielen")
                    
say("können und Spaß haben. Am Besten")
                    
say("beginnst du deine Reise sofort und suchst")
                    
say("Herausforderungen. Zum Start haben wir dir")
                    
say("ein kleines Starterpaket gegeben, darunter")
                    
say("auch ein Pferd.")
                    
wait()
                    
say("Es werden dich viele neue Sachen")
                    
say("hier erwarten. Neue Items, neue Monster,")
                    
say("neues Equipment und vieles mehr.")
                    
say("")
                    
say("Es gibt neue Event-Maps, sowie ein")
                    
say("Handelsgebiet und eine Erholungswiese.")
                    
say("Aber wir wollen dich nicht groß von")
                    
say("deinem großem Abenteuer ablenken.")
                    
say("Beginne deine Reise!")
                    
wait()
                    
say("~")
                    
say_item_vnum(2)
                    
say("~")
                
end
            end
        end
    end
end 
04/04/2011 22:17 '-SkyLiiNe-'#1860
Quote:
Originally Posted by Delta619 View Post
@[SA]Choco
PHP Code:
quest expbox begin
quest expbox begin
    state start begin
        when 80001.
use begin
        say_title
("EXP-Box:")
        
say("Du möchtest also 200 Millionen EXP bekommen?")
        
say("ACHTUNG: Es kann sein das du vom Server gekickt wirst!")
        
say("Indem Fall log dich einfach wieder ein, der Kick")
        
say("kommt von den vielen Level-UPs!")
        
say_reward("EXP-Box benutzen?")
        
        
local x select("Ja","Abbrechen")
            
        if 
== 2 then
            
return
        
end
        
if == 1 then
            pc
.give_exp2("200000000")
            
chat("Du hast 200.000.000 Erfahrung erhalten!")
            
pc.removeitem("80001",1)
        
end
    end
end 
Steht der Type des Items auf 18?
ja type steht auf 18

Edit: VPC make.sh Fehler added
Code:
assertion failure : nested==0
expbox.quest:22:Abort trap (core dumped)