[SERVICE] Die Questkontrolle

Brodan · 04/03/2011, 21:00

Quote:

Originally Posted by Delta619

Brodan ein end mehr untendran dann dürfte es funktionieren

Wohin genau o:

.Delta · 04/03/2011, 21:10

ganz nach unten

Brodan · 04/03/2011, 21:46

Quote:

Originally Posted by Delta619

ganz nach unten

Also so:

Spoiler

oder stimmt wieder etwas nicht :s

AquilaMt2 · 04/03/2011, 23:56

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^^

.Aliyanaa · 04/04/2011, 17:54

Meine Quest geht immer noch ned <.<

xMichiix · 04/04/2011, 18:22

Quote:

Originally Posted by ~Exclain~

Meine Quest geht immer noch ned <.<

^this meine auch nich ...

BL00DSTYL3 · 04/04/2011, 19:20

hat sich erledigt -werde hier nacher anderen Quest rein editieren

heshii' · 04/04/2011, 19:30

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

.Delta · 04/04/2011, 20:06

Quote:

Originally Posted by iFoXy

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

'-SkyLiiNe-' · 04/04/2011, 20:09

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 x == 2 then
            return
        end
        if x == 1 then
            pc.give_exp2(200000000)
            chat("Du hast 200.000.000 Erfahrung erhalten!")
            item.remove(80001,1)
        end
    end
end

funkt ned
=/

heshii' · 04/04/2011, 20:13

Quote:

Originally Posted by Delta619

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

.Delta · 04/04/2011, 20:23

Quote:

Originally Posted by iFoXy

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?

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() == 1 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 x == 2 then
            return
        end
        if x == 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?

heshii' · 04/04/2011, 20:37

Quote:

Originally Posted by Delta619

ich hab gedacht ich hätte es dir grade gesagt?
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() == 1 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 x == 2 then return end if x == 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 ....

Lowwer · 04/04/2011, 20:52

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) == 0 and pc.weapon != item then
                    pc.give_item2(item)
                    pc.give_item2(27002,200 )
                    pc.give_item2(72702,1 )
                    pc.give_item2(80009,1 )
                    pc.give_item2(71004,1 )
                    pc.give_item2(71017,1 )
                    pc.give_item2(70038,20 )
                    pc.give_item2(2500,1 )
                    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

'-SkyLiiNe-' · 04/04/2011, 22:17

Quote:

Originally Posted by Delta619

@[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 x == 2 then return end if x == 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)