[SERVICE] Die Questkontrolle

07/28/2013 23:38 SATunE#8641
Hey, ich hatte letztens eine anfrage auf eine 100% Seelenstein quest gemacht, und war parr Tage in abwesenheit. Nun möchte ich noch eine bitte zu der Quest erstellen.

Die Rangpunkte werden nicht angezogen.
Kann es jemand villeicht so hinbasteln das sie abgezogen werden, oder erst GARNICHTS mit Rangpunkten in der Quest hat?

Wäre nett

PHP Code:
quest training_grandmaster_skill begin
    state start begin
    when 50514.
use begin
        say_title
("Ultimativ Seelenstein")

        if 
pc.get_skill_group() == 0 then
        say
("Du hast keine Skills"..pc.get_skill_group())
        return
        
end

        
if get_time() < pc.getqf("next_time"then -- and not is_test_server() then
        
if pc.is_skill_book_no_delay() then
            say
("Hiermit kannst du eine")
            
say("Fertigkeit perfektionieren.")
            
say("")
            
wait()
            
say_title("Ultimativ Seelenstein")
        else
            
say("Du musst noch warten.")
            return
        
end
        end

        local result 
training_grandmaster_skill.BuildGrandMasterSkillList(pc.get_job(), pc.get_skill_group())

        
local vnum_list result[1]
        
local name_list result[2]

        if 
table.getn(vnum_list) == 0 then
        say
("Deine Fertigkeiten sind bereits perfekt!")
        return
        
end

        say
("Wähle eine Fertigkeit aus.")
        
say("")

        
local menu_list = {}
        
table.foreach(name_list, function(inametable.insert(menu_listnameend)
        
table.insert(menu_list"Abbrechen"

        
local s=select_table(menu_list)
        if 
table.getn(menu_list) == s then
        
return
        
end

        local skill_name
=name_list[s]
        
local skill_vnum=vnum_list[s]
        
local skill_level pc.get_skill_level(skill_vnum)
        
local cur_alignment pc.get_real_alignment()
        
local need_alignment 1000+500*(skill_level-30)

        
test_chat("Deine Rangpunkte:"..cur_alignment)
        
test_chat("Benötigte Rangpunkte:"..need_alignment)

        
local title=string.format("%s Perfektionieren"skill_nameskill_level-30+1)

        
say_title(title)
        
say("Beim lesen des Seelensteins")
        
say("verlierst du Rangpunkte!")
        
say("")

        if 
cur_alignment<-99999+need_alignment then
        say_reward
("Zu wenig Rangpunkte.")
        return
        
end

        
if cur_alignment<0 then
        say_reward
(string.format("Benötigte Rangpunkte: %d -> %d"need_alignmentneed_alignment*2))
        
say_reward("(®ö¤HÂ¥H¤Uªº¸Ü, ÂµÂ½Â´c*È®ø¯Ó2*¿)")
        
need_alignment=need_alignment*2
        
elseif cur_alignment<need_alignment then
        say_reward
(string.format("Benötigte Rangpunkte:: %d"need_alignment))
        
say_reward("Zu wenige Rangpunkte")
        else
        
say_reward(string.format("Benötigte Rangpunkte: %d"need_alignment))
        
end
        say
("")

        
local s=select("Weiter""Abbrechen")    
        if 
s==2 then
        
return
        
end


        
if cur_alignment>=and cur_alignment<need_alignment then
        say_title
(string.format("%s Â½T©w"title))
        
say("Es ist soweit!")
        
say("Um zu trainieren,")
        
say("gib bitte ein: Trainieren")
        
say("")
        
say("")
        
say_reward("Trainieren")
        
say("")
        
local s=input()
        if 
s!="Trainieren" then
            
return
        
end
        end

        
if get_time() < pc.getqf("next_time"then -- and not is_test_server() then
        
if pc.is_skill_book_no_delay() then
            pc
.remove_skill_book_no_delay()
        else
            
say("[°ª¯Åµ¥¯Å]§Þ¯Ã**×½m¿ù»~: Â¥Ã°Â®Â§Â¤Â¤")
            return
        
end
        end

        pc
.setqf("next_time"get_time()+time_hour_to_sec(number(812)))

        if 
need_alignment>0 then
        local new_skill_level 
pc.get_skill_level(skill_vnum)+1
            
if new_skill_level == 41 then
                say
(string.format("%s ist schon Perfekt"skill_name))
            else
            
pc.set_skill_level(skill_vnumnew_skill_level)
                
say(string.format("%s Erfolgreich gestiegen"skill_name))
                
say("")
                
say_reward("Erfolgreich!")
                
say("")
            
end
        end

        item
.remove()
    
end
    
function BuildGrandMasterSkillList(jobgroup)
        
GRAND_MASTER_SKILL_LEVEL 30
        PERFECT_MASTER_SKILL_LEVEL 
40

        local skill_list 
special.active_skill_list[job+1][group]
        
local ret_vnum_list = {}
        
local ret_name_list = {}

        -- 
test_chat(string.format("job=%d, group=%d"jobgroup))

        
table.foreach(skill_list
        function(
iskill_vnum
        
local skill_level pc.get_skill_level(skill_vnum)

        -- 
test_chat(string.format("[%d]=%d"skill_vnumskill_level))
        if 
skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level PERFECT_MASTER_SKILL_LEVEL then

            table
.insert(ret_vnum_listskill_vnum)
            
local name=locale.GM_SKILL_NAME_DICT[skill_vnum]
            if 
name == nil then name=skill_vnum end
            table
.insert(ret_name_listname)
        
end
        end
)
        return {
ret_vnum_listret_name_list}


        --return {
ret_vnum_listret_name_list}
    
end
    end
end 
MFG
07/29/2013 19:38 .LuckyStrike#8642
Heyho,

Habe mir gerade ne Warpring Quest geschrieben und nunja, wenn ich
auf der 1. Seite auf ein Warp klicken will, zeigt der mir immer die 2. Seite
und wenn ich auf der 2. Seite auf nen Warp klicken will, funktioniert es.
Warum? Hier die Quest:

P.S:
Die Warps sind falsch!

PHP Code:
quest neutral_warp begin
    state start begin
        when 70007.
use begin
            local empire 
pc.get_empire()
            
say_yellow("Warpring")
            
local map select("Map1""Map2""Orktal""Eisland""Feuerland""Nächste Seite""Abbrechen")
            if 
map == 7 then
                
return
            elseif 
map == 6 then
            end
            local map2 
select("Dämonenturm""Roter Wald""Spinnendungeon""Abbrechen")
            if 
map2 == 4 then
                
return
            
end
            
if map == and empire == 3 then
                pc
.warp(921600204600)
            elseif 
map == and empire == 3 then
                pc
.warp(819200204800)
            elseif 
map == and empire == 3 then
                say_yellow
("Wohin?")
                
local wohin select("Anfang""Mitte")
                if 
wohin == 1 then
                    pc
.warp(65300142400)
                elseif 
wohin == 2 then
                    pc
.warp(7670079200)
                
end
            
elseif map == and empire == 3 then
                say_yellow
("Wohin?")
                
local wohin2 select("Anfang""Mitte")
                if 
wohin2 == 1 then
                    pc
.warp(13340020000)
                elseif 
wohin2 == 2 then
                    pc
.warp(7760062300)
                
end
            
elseif map == and empire == 3 then
                say_yellow
("Wohin?")
                
local wohin3 select("Anfang""Mitte")
                if 
wohin3 == 1 then
                    pc
.warp(14190075400)
                elseif 
wohin3 == 2 then
                    pc
.warp(8330068300)
                
end
            end
            
            
if map2 == and empire == 3 then
                pc
.warp(204800665600)
            elseif 
map2 == and empire == 3 then
                pc
.warp(6910069300)
            elseif 
map2 == and empire == 3 then
                say_yellow
("Wohin?")
                
local wohin4 select("SD1""SD2""SD3")
                if 
wohin4 == 1 then
                    pc
.warp(880010300)
                elseif 
wohin4 == 2 then
                    pc
.warp(3850028900)
                elseif 
wohin4 == 3 then
                    pc
.warp(1780046900)
                
end
            end
            
if map == and empire == 2 then
                pc
.warp(0102400)
            elseif 
map == and empire == 2 then
                pc
.warp(102400204800)
            elseif 
map == and empire == 2 then
                say_yellow
("Wohin?")
                
local wohin select("Anfang""Mitte")
                if 
wohin == 1 then
                    pc
.warp(65300142400)
                elseif 
wohin == 2 then
                    pc
.warp(7670079200)
                
end
            
elseif map == and empire == 2 then
                say_yellow
("Wohin?")
                
local wohin2 select("Anfang""Mitte")
                if 
wohin2 == 1 then
                    pc
.warp(13340020000)
                elseif 
wohin2 == 2 then
                    pc
.warp(7760062300)
                
end
            
elseif map == and empire == 2 then
                say_yellow
("Wohin?")
                
local wohin3 select("Anfang""Mitte")
                if 
wohin3 == 1 then
                    pc
.warp(14190075400)
                elseif 
wohin3 == 2 then
                    pc
.warp(8330068300)
                
end
            end
            
            
if map2 == and empire == 2 then
                pc
.warp(204800665600)
            elseif 
map2 == and empire == 2 then
                pc
.warp(6910069300)
            elseif 
map2 == and empire == 2 then
                say_yellow
("Wohin?")
                
local wohin4 select("SD1""SD2""SD3")
                if 
wohin4 == 1 then
                    pc
.warp(880010300)
                elseif 
wohin4 == 2 then
                    pc
.warp(3850028900)
                elseif 
wohin4 == 3 then
                    pc
.warp(1780046900)
                
end
            end
            
if map == and empire == 1 then
                pc
.warp(409600896000)
            elseif 
map == and empire == 1 then
                pc
.warp(307200819200)
            elseif 
map == and empire == 1 then
                say_yellow
("Wohin?")
                
local wohin select("Anfang""Mitte")
                if 
wohin == 1 then
                    pc
.warp(65300142400)
                elseif 
wohin == 2 then
                    pc
.warp(7670079200)
                
end
            
elseif map == and empire == 1 then
                say_yellow
("Wohin?")
                
local wohin2 select("Anfang""Mitte")
                if 
wohin2 == 1 then
                    pc
.warp(13340020000)
                elseif 
wohin2 == 2 then
                    pc
.warp(7760062300)
                
end
            
elseif map == and empire == 1 then
                say_yellow
("Wohin?")
                
local wohin3 select("Anfang""Mitte")
                if 
wohin3 == 1 then
                    pc
.warp(14190075400)
                elseif 
wohin3 == 2 then
                    pc
.warp(8330068300)
                
end
            end
            
            
if map2 == and empire == 1 then
                pc
.warp(204800665600)
            elseif 
map2 == and empire == 1 then
                pc
.warp(6910069300)
            elseif 
map2 == and empire == 1 then
                say_yellow
("Wohin?")
                
local wohin4 select("SD1""SD2""SD3")
                if 
wohin4 == 1 then
                    pc
.warp(880010300)
                elseif 
wohin4 == 2 then
                    pc
.warp(3850028900)
                elseif 
wohin4 == 3 then
                    pc
.warp(1780046900)
                
end
            end
        end
    end
end 
07/29/2013 21:13 vbacoder#8643
Folgender Questabschnitt funktioniert nicht:

PHP Code:
local kuchen  mysql_query("SELECT x FROM player.mob_spawn WHERE mob = '20399' LIMIT 1")
                
local kuchen2  mysql_query("SELECT y FROM player.mob_spawn WHERE mob = '20399' LIMIT 1")
                
bala tonumber(""..kuchen.x[1].."")
                
balas tonumber(""..kuchen2.y[1].."")
                
pc.warp("..bala..","..balas.."
Das Problem: Man wird nicht an die Koordinaten teleportiert.

Hier ein Bild der Tabelle:

mob | x | y
20399 | 222800 | 523100

Wenn ich ein say("..kuchen2.y[1]..")
einfügem wird es jedoch erfolgreich ausgelesen, was bestätigt, dass es eigendlich funktionieren sollte.

Weis jemand weiter? Ich wäre sehr dankbar :)
07/29/2013 22:05 hr4rjuku#8644
Quote:
Originally Posted by vbacoder View Post
Folgender Questabschnitt funktioniert nicht:

PHP Code:
local kuchen  mysql_query("SELECT x FROM player.mob_spawn WHERE mob = '20399' LIMIT 1")
                
local kuchen2  mysql_query("SELECT y FROM player.mob_spawn WHERE mob = '20399' LIMIT 1")
                
bala tonumber(""..kuchen.x[1].."")
                
balas tonumber(""..kuchen2.y[1].."")
                
pc.warp("..bala..","..balas.."
Das Problem: Man wird nicht an die Koordinaten teleportiert.

Hier ein Bild der Tabelle:

mob | x | y
20399 | 222800 | 523100

Wenn ich ein say("..kuchen2.y[1]..")
einfügem wird es jedoch erfolgreich ausgelesen, was bestätigt, dass es eigendlich funktionieren sollte.

Weis jemand weiter? Ich wäre sehr dankbar :)
PHP Code:
pc.warp(bala,balas

Mfg Hr4rjuku
07/30/2013 10:22 [Patrick]#8645
Tag,
hab' ein kleines Problem.
Mein eigener Run funktioniert zwar, aber
wenn man auf diese Map landet bekommt man keine Notiz per
d.notice.
Wenn ihr nicht wisst was ich meine, hier bitteschön:
Code:
		when login with pc.get_map_index() == 203 begin
		     d.notice("Test")
		     d.notice("Test")
		end
07/30/2013 10:51 ProfessorEnte#8646
Quote:
Originally Posted by [Patrick] View Post
Tag,
hab' ein kleines Problem.
Mein eigener Run funktioniert zwar, aber
wenn man auf diese Map landet bekommt man keine Notiz per
d.notice.
Wenn ihr nicht wisst was ich meine, hier bitteschön:
Code:
		when login with pc.get_map_index() == 203 begin
		     d.notice("Test")
		     d.notice("Test")
		end
PHP Code:
    if (pc.get_map_index() >= 2030000 and pc.get_map_index() <= 2039999then
        d
.notice("TEST Quaaaaak")
    
end 
Dungeonindex geht von 2030000 -> 2039999 wenn du in einem Dungeon bist.
07/30/2013 11:15 [Patrick]#8647
Edit:
Rätsel gelöst. :D
07/30/2013 13:30 Gleo9998#8648
habe fehler bei map_warp quest

-- Teleporter
quest map_warp begin
state start begin
when 9012.chat."Möchtest du reisen?" begin
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))

-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then

local guild_map_names = {
"Gildenzone",
"Gildenzone",
"Gildenzone",
}

guild_map_name = guild_map_names[empire]
local empire_castle={
"Burgschlacht",
"Burgschlacht",
"Burgschlacht",
}
empire_castle =empire_castle[empire]
local sub_set = 0


if pc.count_item(30180) >= 1 then
if level < 60 then -- 60?? : ?????, ???, ????, ???
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle, "Drachengottamulett benutzen", "Andere Gebiete")
if sub_set == 6 then -- ??
return
end

else -- 61?? : ????, ???, ????, ????
sub_set = select(guild_map_name, "Tal von Seungryong", "Yongbi-Wüste", "Berg Sohan", empire_castle, "Drachengottamulett benutzen", "Andere Gebiete")
if sub_set == 7 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", "Zurück", "Abbrechen") + 6
if sub_set == 10 then -- ??
return
end
if sub_set == 9 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
--- l
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, "Drachengottamulett benutzen", "Andere Gebiete")
if sub_set == 7 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", "Abbrechen") + 6
if sub_set == 9 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 = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
{--Drachengottamulett
{ 283600, 808300 },
{ 283600, 808300 },
{ 283600, 808300 },

} ,
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
}
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
if level < 60 then -- 60?? : ?????, ???, ????, ???
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 -- 61?? : ????, ???, ????, ????
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", "Zurück", "Abbrechen") + 5
if sub_set == 9 then -- ??
return
end
if sub_set == 8 then -- ??
say_title("Teleporter:")
say("Wohin möchtest du teleportiert werden?")
--- l
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", "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("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 = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
-- 62 metin2_map_n_flame_01
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
}
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])
end

else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3

--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
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(469300,964200)
elseif empire == 2 then
pc.warp(55700,157900)
elseif empire == 3 then
pc.warp(969600,278400)
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
end -- end_of_chat
end -- end_of_state
end -- end_of_quest
07/30/2013 14:54 vpser#8649
Quote:
Originally Posted by WyppyOne View Post
Ok , i want to make a channel only for vip players ... but when a normal player log in on that channel the quest doesn't " exit " the player , but the message box appear .
Where is the problem ? And is another solution ? for log out players ?
Sorry for my english >.< i hope you understand

Code:
quest premium_channel begin 
    state start begin 
        when login with pc.get_channel_id()==2 and pc.getf("premium_user", "premium_user")==0 begin 
	    cmdchat("/logout")
	    say("welcome "..pc.get_name().." on vip channel[ENTER], unfortunately you are not a[ENTER]vip user[ENTER]good bye") 
            say("[DELAY value;20000] [/DELAY]") --10 second delay 
			 
        end 
    end 
end
Code:
cmdchat("/logout")
replace this with

Code:
command("quit")
07/30/2013 19:55 SandEimer#8650
kann mir hier jemand helfen
[Only registered and activated users can see links. Click Here To Register...]
07/31/2013 01:07 abcdosentee#8651
PHP Code:
quest Umtausch begin
    state start begin
    
    when 20004.take with item
.vnum == 65403 begin 
         say
("Hey,")
         
say("Hier Kannst du die Rollen Umtauschen gegen nützliche dinge")
         
say("Gegen Ancienten.")
         
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
         
say("Ich kann dir nur Rollen Abnehmen .")
         
say("")
         
local s select ("Grauen Ancient""Roten Anient""Nichts von alledem!")

         if 
== 1 then
            
if pc.count_item(65403) >= 1 then
                pc
.removeitem("65403")                
                
pc.give_item2("85001")
                
say("Danke dir!")
                
say("Du erhältst einen Grauen Ancient")
                
say("Ich hoffe es wird dir von großem Nutzen sein")
                
say("lieber Abenteurer!")
                
say("")
            
end
         
if == 2 then
            
if pc.count_item(65403) >= 1 then
                pc
.removeitem("65403")
                
pc.give_item2("85002")
                
say("Danke dir!")
                
say("Du erhältst einen Roten Anient")
                
say("Ich hoffe es wird dir von großem Nutzen sein")
                
say("lieber Abenteurer!")
                
say("")
            
end   
        end
    end
    
    when 20004.take with item
.vnum == 32102 begin 
         say
("Hey,")
         
say("Hier Kannst du die Rollen Umtauschen gegen nützliche dinge")
         
say("Gegen Ancienten.")
         
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
         
say("Ich kann dir nur Rollen Abnehmen.")
         
say("")
         
local s select ("Goldenen Ancient""Blauen Ancient""Nichts von alledem!")

         if 
== 1 then
            
if pc.count_item(32102) >= 1 then
                pc
.removeitem("32102")                
                
pc.give_item2("85003")
                
say("Danke dir!")
                
say("Du erhältst einen Goldenen Ancient")
                
say("Ich hoffe es wird dir von großem Nutzen sein")
                
say("lieber Abenteurer!")
                
say("")
            
end
         
if == 2 then
            
if pc.count_item(32105) >= 1 then
                pc
.removeitem("32105")
                
pc.give_item2("85004")
                
say("Danke dir!")
                
say("Du erhältst einen Blauen Ancient")
                
say("Ich hoffe es wird dir von großem Nutzen sein")
                
say("lieber Abenteurer!")
                
say("")
            
end   
        end
    end
    
    when 20004.take with item
.vnum == 32103 begin 
         say
("Hey,")
         
say("Hier Kannst du die Rollen Umtauschen gegen nützliche dinge")
         
say("Gegen Ancienten.")
         
say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
         
say("Ich kann dir nur Rollen Abnehmen.")
         
say("")
         
local s select ("Lila Ancient""Grauen Ancient""Nichts von alledem!")

         if 
== 1 then
            
if pc.count_item(32103) >= 1 then
                pc
.removeitem("32103")                
                
pc.give_item2("85005")
                
say("Danke dir!")
                
say("Du erhältst einen Lila Ancient")
                
say("Ich hoffe sie wird dir von großem Nutzen sein")
                
say("lieber Abenteurer!")
                
say("")
            
end
         
if == 2 then
            
if pc.count_item(32103) >= 1 then
                pc
.removeitem("32103")
                
pc.give_item2("85001")
                
say("Danke dir!")
                
say("Du erhältst einen Grauen Ancient")
                
say("Ich hoffe es wird dir von großem Nutzen sein")
                
say("lieber Abenteurer!")
                
say("")
            
end   
        end
    end 
Will nicht laden :/ was da los :/?
07/31/2013 14:30 Marsia#8652
Code:
quest truhe begin
	state start begin
		when 71146.use begin
			if.pc.job == 1 then
				chat("Du hast die Truhe geöffnet!") 
                local r = math.random(1, 11)
				if r == 1 then
					pc.give_item2(50401, 1)
					pc.remove_item(71146, 1)
				elseif r == 2 then
					pc.give_item2(50402, 1)
					pc.remove_item(71146, 1)
				elseif r == 3 then
					pc.give_item2(50403, 1)
					pc.remove_item(71146, 1)
				elseif r == 4 then
					pc.give_item2(50404, 1)
					pc.remove_item(71146, 1)
				elseif r == 5 then
					pc.give_item2(50405, 1)
					pc.remove_item(71146, 1)
				elseif r == 6 then
					pc.give_item2(50416, 1)
					pc.remove_item(71146, 1)
				elseif r == 7 then
					pc.give_item2(50417, 1)
					pc.remove_item(71146, 1)
				elseif r == 8 then
					pc.give_item2(50418, 1)
					pc.remove_item(71146, 1)
				elseif r == 9 then
					pc.give_item2(50419, 1)
					pc.remove_item(71146, 1)
				elseif r == 10 then
					pc.give_item2(50420, 1)
					pc.remove_item(71146, 1)
				elseif r == 11 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			elseif pc.job == 2 then
				chat("Du hast die Truhe geöffnet!") 
                local d = math.random(1, 11)
				if d == 1 then
					pc.give_item2(50431, 1)
					pc.remove_item(71146, 1)
				elseif d == 2 then
					pc.give_item2(50432, 1)
					pc.remove_item(71146, 1)
				elseif d == 3 then
					pc.give_item2(50433, 1)
					pc.remove_item(71146, 1)
				elseif d == 4 then
					pc.give_item2(50434, 1)
					pc.remove_item(71146, 1)
				elseif d == 5 then
					pc.give_item2(50435, 1)
					pc.remove_item(71146, 1)
				elseif d == 6 then
					pc.give_item2(50446, 1)
					pc.remove_item(71146, 1)
				elseif d == 7 then
					pc.give_item2(50447, 1)
					pc.remove_item(71146, 1)
				elseif d == 8 then
					pc.give_item2(50448, 1)
					pc.remove_item(71146, 1)
				elseif d == 9 then
					pc.give_item2(50449, 1)
					pc.remove_item(71146, 1)
				elseif d == 10 then
					pc.give_item2(50450, 1)
					pc.remove_item(71146, 1)
				elseif d == 11 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			elseif pc.job == 3 then
				chat("Du hast die Truhe geöffnet!") 
                local a = math.random(1, 13)
				if a == 1 then
					pc.give_item2(50461, 1)
					pc.remove_item(71146, 1)
				elseif a == 2 then
					pc.give_item2(50462, 1)
					pc.remove_item(71146, 1)
				elseif a == 3 then
					pc.give_item2(50463, 1)
					pc.remove_item(71146, 1)
				elseif a == 4 then
					pc.give_item2(50464, 1)
					pc.remove_item(71146, 1)
				elseif a == 5 then
					pc.give_item2(50465, 1)
					pc.remove_item(71146, 1)
				elseif a == 6 then
					pc.give_item2(50466, 1)
					pc.remove_item(71146, 1)
				elseif a == 7 then
					pc.give_item2(50476, 1)
					pc.remove_item(71146, 1)
				elseif a == 8 then
					pc.give_item2(50477, 1)
					pc.remove_item(71146, 1)
				elseif a == 9 then
					pc.give_item2(50478, 1)
					pc.remove_item(71146, 1)
				elseif a == 10 then
					pc.give_item2(50479, 1)
					pc.remove_item(71146, 1)
				elseif a == 11 then
					pc.give_item2(50480, 1)
					pc.remove_item(71146, 1)
				elseif a == 12 then
					pc.give_item2(50481, 1)
					pc.remove_item(71146, 1)
				elseif a == 13 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			elseif pc.job == 4 then
				chat("Du hast die Truhe geöffnet!") 
                local b = math.random(1, 13)
				if b == 1 then
					pc.give_item2(50491, 1)
					pc.remove_item(71146, 1)
				elseif b == 2 then
					pc.give_item2(50492, 1)
					pc.remove_item(71146, 1)
				elseif b == 3 then
					pc.give_item2(50493, 1)
					pc.remove_item(71146, 1)
				elseif b == 4 then
					pc.give_item2(50494, 1)
					pc.remove_item(71146, 1)
				elseif b == 5 then
					pc.give_item2(50495, 1)
					pc.remove_item(71146, 1)
				elseif b == 6 then
					pc.give_item2(50496, 1)
					pc.remove_item(71146, 1)
				elseif b == 7 then
					pc.give_item2(50506, 1)
					pc.remove_item(71146, 1)
				elseif b == 8 then
					pc.give_item2(50507, 1)
					pc.remove_item(71146, 1)
				elseif b == 9 then
					pc.give_item2(50508, 1)
					pc.remove_item(71146, 1)
				elseif b == 10 then
					pc.give_item2(50509, 1)
					pc.remove_item(71146, 1)
				elseif b == 11 then
					pc.give_item2(50510, 1)
					pc.remove_item(71146, 1)
				elseif b == 12 then
					pc.give_item2(50511, 1)
					pc.remove_item(71146, 1)
				elseif b == 13 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			end
		end
		when 71147.use begin
			chat("Du hast die Truhe geöffnet!") 
			local q = math.random(1, 3)
			if q == 1 then
				pc.give_item2(71001, 5)
				pc.remove_item(71147, 1)
			elseif q == 2 then
				pc.give_item2(71094, 5)
				pc.remove_item(71147, 1)
			elseif q == 3 then
				pc.give_item2(70102, 2)
				pc.remove_item(71147, 1)
			end
		end
	end
end

Fehler=
[:string "start"]:1: unexpected symbol near ´.´
07/31/2013 17:51 [Patrick]#8653
HeyHo,

hab mein ersten Dungeon bald fertig. (Juhu..)
Aber leider gibt es ein Problem, denn bei mir schmiert der Core nach einer Zeit ab,
seitdem ich die Servertimer eingebaut habe.
Kann mir jemand sagen, wo bei mir der Fehler ist?
07/31/2013 17:58 √π.#8654
Code:
		when suenden_run1.server_timer begin
			if not d.select(get_server_timer_arg()) then return end
			server_timer("suenden_run2", 60*5, get_server_timer_arg())
			d.notice("Es verbleiben noch 15 Minuten.")
		end
Die anderen dementsprechend ändern.
07/31/2013 19:21 SATunE#8655
Quote:
Originally Posted by Marsia View Post
Code:
quest truhe begin
	state start begin
		when 71146.use begin
			if pc.job == 1 then
				chat("Du hast die Truhe geöffnet!") 
                local r = math.random(1, 11)
				if r == 1 then
					pc.give_item2(50401, 1)
					pc.remove_item(71146, 1)
				elseif r == 2 then
					pc.give_item2(50402, 1)
					pc.remove_item(71146, 1)
				elseif r == 3 then
					pc.give_item2(50403, 1)
					pc.remove_item(71146, 1)
				elseif r == 4 then
					pc.give_item2(50404, 1)
					pc.remove_item(71146, 1)
				elseif r == 5 then
					pc.give_item2(50405, 1)
					pc.remove_item(71146, 1)
				elseif r == 6 then
					pc.give_item2(50416, 1)
					pc.remove_item(71146, 1)
				elseif r == 7 then
					pc.give_item2(50417, 1)
					pc.remove_item(71146, 1)
				elseif r == 8 then
					pc.give_item2(50418, 1)
					pc.remove_item(71146, 1)
				elseif r == 9 then
					pc.give_item2(50419, 1)
					pc.remove_item(71146, 1)
				elseif r == 10 then
					pc.give_item2(50420, 1)
					pc.remove_item(71146, 1)
				elseif r == 11 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			elseif pc.job == 2 then
				chat("Du hast die Truhe geöffnet!") 
                local d = math.random(1, 11)
				if d == 1 then
					pc.give_item2(50431, 1)
					pc.remove_item(71146, 1)
				elseif d == 2 then
					pc.give_item2(50432, 1)
					pc.remove_item(71146, 1)
				elseif d == 3 then
					pc.give_item2(50433, 1)
					pc.remove_item(71146, 1)
				elseif d == 4 then
					pc.give_item2(50434, 1)
					pc.remove_item(71146, 1)
				elseif d == 5 then
					pc.give_item2(50435, 1)
					pc.remove_item(71146, 1)
				elseif d == 6 then
					pc.give_item2(50446, 1)
					pc.remove_item(71146, 1)
				elseif d == 7 then
					pc.give_item2(50447, 1)
					pc.remove_item(71146, 1)
				elseif d == 8 then
					pc.give_item2(50448, 1)
					pc.remove_item(71146, 1)
				elseif d == 9 then
					pc.give_item2(50449, 1)
					pc.remove_item(71146, 1)
				elseif d == 10 then
					pc.give_item2(50450, 1)
					pc.remove_item(71146, 1)
				elseif d == 11 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			elseif pc.job == 3 then
				chat("Du hast die Truhe geöffnet!") 
                local a = math.random(1, 13)
				if a == 1 then
					pc.give_item2(50461, 1)
					pc.remove_item(71146, 1)
				elseif a == 2 then
					pc.give_item2(50462, 1)
					pc.remove_item(71146, 1)
				elseif a == 3 then
					pc.give_item2(50463, 1)
					pc.remove_item(71146, 1)
				elseif a == 4 then
					pc.give_item2(50464, 1)
					pc.remove_item(71146, 1)
				elseif a == 5 then
					pc.give_item2(50465, 1)
					pc.remove_item(71146, 1)
				elseif a == 6 then
					pc.give_item2(50466, 1)
					pc.remove_item(71146, 1)
				elseif a == 7 then
					pc.give_item2(50476, 1)
					pc.remove_item(71146, 1)
				elseif a == 8 then
					pc.give_item2(50477, 1)
					pc.remove_item(71146, 1)
				elseif a == 9 then
					pc.give_item2(50478, 1)
					pc.remove_item(71146, 1)
				elseif a == 10 then
					pc.give_item2(50479, 1)
					pc.remove_item(71146, 1)
				elseif a == 11 then
					pc.give_item2(50480, 1)
					pc.remove_item(71146, 1)
				elseif a == 12 then
					pc.give_item2(50481, 1)
					pc.remove_item(71146, 1)
				elseif a == 13 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			elseif pc.job == 4 then
				chat("Du hast die Truhe geöffnet!") 
                local b = math.random(1, 13)
				if b == 1 then
					pc.give_item2(50491, 1)
					pc.remove_item(71146, 1)
				elseif b == 2 then
					pc.give_item2(50492, 1)
					pc.remove_item(71146, 1)
				elseif b == 3 then
					pc.give_item2(50493, 1)
					pc.remove_item(71146, 1)
				elseif b == 4 then
					pc.give_item2(50494, 1)
					pc.remove_item(71146, 1)
				elseif b == 5 then
					pc.give_item2(50495, 1)
					pc.remove_item(71146, 1)
				elseif b == 6 then
					pc.give_item2(50496, 1)
					pc.remove_item(71146, 1)
				elseif b == 7 then
					pc.give_item2(50506, 1)
					pc.remove_item(71146, 1)
				elseif b == 8 then
					pc.give_item2(50507, 1)
					pc.remove_item(71146, 1)
				elseif b == 9 then
					pc.give_item2(50508, 1)
					pc.remove_item(71146, 1)
				elseif b == 10 then
					pc.give_item2(50509, 1)
					pc.remove_item(71146, 1)
				elseif b == 11 then
					pc.give_item2(50510, 1)
					pc.remove_item(71146, 1)
				elseif b == 12 then
					pc.give_item2(50511, 1)
					pc.remove_item(71146, 1)
				elseif b == 13 then
					pc.give_item2(50513, 1)
					pc.remove_item(71146, 1)
				end
			end
		end
		when 71147.use begin
			chat("Du hast die Truhe geöffnet!") 
			local q = math.random(1, 3)
			if q == 1 then
				pc.give_item2(71001, 5)
				pc.remove_item(71147, 1)
			elseif q == 2 then
				pc.give_item2(71094, 5)
				pc.remove_item(71147, 1)
			elseif q == 3 then
				pc.give_item2(70102, 2)
				pc.remove_item(71147, 1)
			end
		end
	end
end

Fehler=
[:string "start"]:1: unexpected symbol near ´.´
PHP Code:
quest truhe begin
    state start begin
        when 71146.
use begin
            
if.pc.job == 1 then
                chat
("Du hast die Truhe geöffnet!"
                
local r math.random(111)
                if 
== 1 then
                    pc
.give_item2(504011)
                    
pc.remove_item(711461)
                elseif 
== 2 then
                    pc
.give_item2(504021)
                    
pc.remove_item(711461)
                elseif 
== 3 then
                    pc
.give_item2(504031)
                    
pc.remove_item(711461)
                elseif 
== 4 then
                    pc
.give_item2(504041)
                    
pc.remove_item(711461)
                elseif 
== 5 then
                    pc
.give_item2(504051)
                    
pc.remove_item(711461)
                elseif 
== 6 then
                    pc
.give_item2(504161)
                    
pc.remove_item(711461)
                elseif 
== 7 then
                    pc
.give_item2(504171)
                    
pc.remove_item(711461)
                elseif 
== 8 then
                    pc
.give_item2(504181)
                    
pc.remove_item(711461)
                elseif 
== 9 then
                    pc
.give_item2(504191)
                    
pc.remove_item(711461)
                elseif 
== 10 then
                    pc
.give_item2(504201)
                    
pc.remove_item(711461)
                elseif 
== 11 then
                    pc
.give_item2(505131)
                    
pc.remove_item(711461)
                
end
            
elseif pc.job == 2 then
                chat
("Du hast die Truhe geöffnet!"
                
local d math.random(111)
                if 
== 1 then
                    pc
.give_item2(504311)
                    
pc.remove_item(711461)
                elseif 
== 2 then
                    pc
.give_item2(504321)
                    
pc.remove_item(711461)
                elseif 
== 3 then
                    pc
.give_item2(504331)
                    
pc.remove_item(711461)
                elseif 
== 4 then
                    pc
.give_item2(504341)
                    
pc.remove_item(711461)
                elseif 
== 5 then
                    pc
.give_item2(504351)
                    
pc.remove_item(711461)
                elseif 
== 6 then
                    pc
.give_item2(504461)
                    
pc.remove_item(711461)
                elseif 
== 7 then
                    pc
.give_item2(504471)
                    
pc.remove_item(711461)
                elseif 
== 8 then
                    pc
.give_item2(504481)
                    
pc.remove_item(711461)
                elseif 
== 9 then
                    pc
.give_item2(504491)
                    
pc.remove_item(711461)
                elseif 
== 10 then
                    pc
.give_item2(504501)
                    
pc.remove_item(711461)
                elseif 
== 11 then
                    pc
.give_item2(505131)
                    
pc.remove_item(711461)
                
end
            
elseif pc.job == 3 then
                chat
("Du hast die Truhe geöffnet!"
                
local a math.random(113)
                if 
== 1 then
                    pc
.give_item2(504611)
                    
pc.remove_item(711461)
                elseif 
== 2 then
                    pc
.give_item2(504621)
                    
pc.remove_item(711461)
                elseif 
== 3 then
                    pc
.give_item2(504631)
                    
pc.remove_item(711461)
                elseif 
== 4 then
                    pc
.give_item2(504641)
                    
pc.remove_item(711461)
                elseif 
== 5 then
                    pc
.give_item2(504651)
                    
pc.remove_item(711461)
                elseif 
== 6 then
                    pc
.give_item2(504661)
                    
pc.remove_item(711461)
                elseif 
== 7 then
                    pc
.give_item2(504761)
                    
pc.remove_item(711461)
                elseif 
== 8 then
                    pc
.give_item2(504771)
                    
pc.remove_item(711461)
                elseif 
== 9 then
                    pc
.give_item2(504781)
                    
pc.remove_item(711461)
                elseif 
== 10 then
                    pc
.give_item2(504791)
                    
pc.remove_item(711461)
                elseif 
== 11 then
                    pc
.give_item2(504801)
                    
pc.remove_item(711461)
                elseif 
== 12 then
                    pc
.give_item2(504811)
                    
pc.remove_item(711461)
                elseif 
== 13 then
                    pc
.give_item2(505131)
                    
pc.remove_item(711461)
                
end
            
elseif pc.job == 4 then
                chat
("Du hast die Truhe geöffnet!"
                
local b math.random(113)
                if 
== 1 then
                    pc
.give_item2(504911)
                    
pc.remove_item(711461)
                elseif 
== 2 then
                    pc
.give_item2(504921)
                    
pc.remove_item(711461)
                elseif 
== 3 then
                    pc
.give_item2(504931)
                    
pc.remove_item(711461)
                elseif 
== 4 then
                    pc
.give_item2(504941)
                    
pc.remove_item(711461)
                elseif 
== 5 then
                    pc
.give_item2(504951)
                    
pc.remove_item(711461)
                elseif 
== 6 then
                    pc
.give_item2(504961)
                    
pc.remove_item(711461)
                elseif 
== 7 then
                    pc
.give_item2(505061)
                    
pc.remove_item(711461)
                elseif 
== 8 then
                    pc
.give_item2(505071)
                    
pc.remove_item(711461)
                elseif 
== 9 then
                    pc
.give_item2(505081)
                    
pc.remove_item(711461)
                elseif 
== 10 then
                    pc
.give_item2(505091)
                    
pc.remove_item(711461)
                elseif 
== 11 then
                    pc
.give_item2(505101)
                    
pc.remove_item(711461)
                elseif 
== 12 then
                    pc
.give_item2(505111)
                    
pc.remove_item(711461)
                elseif 
== 13 then
                    pc
.give_item2(505131)
                    
pc.remove_item(711461)
                
end
            end
        end
        when 71147.
use begin
            chat
("Du hast die Truhe geöffnet!"
            
local q math.random(13)
            if 
== 1 then
                pc
.give_item2(710015)
                
pc.remove_item(711471)
            elseif 
== 2 then
                pc
.give_item2(710945)
                
pc.remove_item(711471)
            elseif 
== 3 then
                pc
.give_item2(701022)
                
pc.remove_item(711471)
            
end
        end
    end
end 
probier es mal so!

in zeile 4:
PHP Code:
if.pc.job == 1 then 
da gehört zwischen if und pc kein "."
PHP Code:
if pc.job == 1 then