[SERVICE] Die Questkontrolle

05/14/2011 18:37 Endless.#2341
Genau :D

Also z.b affect.add_collect(apply.15,200,999999) oder so^^ Die Boninamen
find ich ja in der DB^^ nur perm wie am besten?
05/14/2011 18:40 .Delta#2342
Quote:
Originally Posted by Endless. View Post
Genau :D

Also z.b affect.add_collect(apply.15,200,999999) oder so^^ Die Boninamen
find ich ja in der DB^^ nur perm wie am besten?
naja mach einfach ne lange zeit ;)
z.b. 60*60*24*365*4
f�r 4 Jahre ;)
05/14/2011 18:45 Endless.#2343
Gut, ich versuche gleich mal ne Testquest.:)

Danke dir aufjedenfall :D

Habe die alten Bioquests nich mehr gehabt, desswegen f�ge ich dies als
Belohnung nachher hinzu
05/15/2011 08:03 TOPzocker#2344
Hi,
was ist an der Quest falsch? Danke f�rs dr�berschaun schonma ;)

Quote:
quest upgrade_refine_scroll begin
state start begin
when 20016.chat."Schriftrolle des Krieges herstellen" begin
say_title("Schmied:")
say("Die Schriftrollen des Krieges sind geheimnisvolle")
say("Gegenst鄚de, die +0 bis +3 Gegenst鄚de")
say("verbessern, und das mit 100-prozentiger")
say("Erfolgsrate. Sie wirken jedoch nicht bei")
say("Gegenst鄚den +4 und h鐬er.")
say("")
wait()
say_title("Schmied:")
say("Um sie herzustellen, ben飆igt man Magisches")
say("Kupfererz.")
say_item("Magisches Kupfererz", 70035, "")
say("")
wait()
say_title("Schmied:")
say("Zus酹zlich ben飆igt man eine Segenschriftrolle.")
say_item("Segenschriftrolle", 25040, "")
say("")
wait()
say_title("Schmied:")
say("Hast du alle ben飆igten Gegenst鄚de?")
say("Dann brauchst du noch 200.000 Yang.")
say("Wenn du eine Segenschriftrolle, Magisches")
say("Kupfererz und 200.000 Yang hast, kannst du eine")
say("Schriftrolle des Krieges herstellen.")
say("Willst du sie herstellen?")
say("")
local s=select("Ja", "Nein")
if 1==s then
if pc.count_item(70035)>0 and pc.count_item(25040)>0 then
pc.remove_item(70035, 1)
pc.remove_item(25040, 1)
pc.changegold(-200000)
pc.give_item2(71021)
say_title("武神的祝福書製作成功!")
say("有魔神之眼很容易製作")
say("武神的祝福書 成功了~ 哈哈哈")
say("")
end
elseif pc.get_gold() < 200000 then
say_title("Information:")
say_reward("Du besitzt nicht genug Yang.")
end
elseif pc.count_item(70035)==0 then
say_title("Schmied:")
say("Dein Versuch, die Schriftrolle herzustellen, ist")
say("fehlgeschlagen, weil du nicht alle notwendigen")
say("Materialien bei dir tr輍st.")
say("")
end
elseif pc.count_item(25040)==0 then
say_title("Schmied:")
say("Dein Versuch, die Schriftrolle herzustellen, ist")
say("fehlgeschlagen, weil du nicht alle notwendigen")
say("Materialien bei dir tr輍st.")
say("")
end
elseif 2==s then
return
end
end
when 20016.chat."Schriftrolle des Drachen herstellen" begin
say_title("Schmied:")
say("Die Schriftrolle des Drachen steigert die")
say("Warscheinlichkeit einer erfolgreichen")
say("Verbesserung. Sogar bei Fehlschl輍en nimmt nur")
say("das Level ab, der Gegenstand wird nicht zerst顤t.")
say("Die Schriftrolle ist ein r酹selhafter Gegenstand,")
say("den man als eine verbesserte Segenschriftrolle")
say("betrachten kann.")
say("")
wait()
say_title("Schmied:")
say("Um sie herzustellen, ben飆igt man Magisches")
say("Eisenerz.")
say_item("Magisches Eisenerz", 71026, "")
say("")
wait()
say_title("Schmied:")
say("Zus酹zlich ben飆igt man eine Segenschriftrolle.")
say_item("Segenschriftrolle", 25040, "")
say("")
wait()
say_title("Schmied:")
say("Hast du alle ben飆igten Gegenst鄚de? Willst du")
say("eine Schriftrolle des Drachen herstellen? Daf�r")
say("brauchst du eine Segenschriftrolle und Magisches")
say("Eisenerz.")
say("")
local s=select("Ja", "Nein")
if 1==s then
if pc.count_item(71026)>0 and pc.count_item(25040)>0 then
pc.remove_item(71026, 1)
pc.remove_item(25040, 1)
pc.give_item2(71032)
say_title("龍神的祝福書製作成功!")
say("有玄鐵很容易製作")
say("龍神的祝福書 成功了~ 哈哈哈")
say("")
end
elseif pc.count_item(25040)==0
say_title("Schmied:")
say("Dein Versuch, die Schriftrolle herzustellen, ist")
say("fehlgeschlagen, weil du nicht alle notwendigen")
say("Materialien bei dir tr輍st.")
say("")
end
elseif say_title("Schmied:")
say("Dein Versuch, die Schriftrolle herzustellen, ist")
say("fehlgeschlagen, weil du nicht alle notwendigen")
say("Materialien bei dir tr輍st.")
say("")
end
elseif 2==s then
return
end
end
when 20016.chat."Schmiede-Handbuch herstellen" begin
say_title("Schmied:")
say("Hast du von einem Stein geh顤t, den man Stein")
say("Schmieds nennt? Solche Steine entstehen in")
say("jahrelanger Arbeit am Amboss und kosten viel")
say("Schwei� und Blut. Wenn du mir einen solchen Stein")
say("und eine Segenschriftrolle bringst, werde ich")
say("dir ein Handbuch herstellen, mit Informationen")
say("zum Schmiedehandwerk, die in meiner Familie seit")
say("Generationen weitergegeben wurden.")
say("Dieses Schmiede-Handbuch funktioniert wie eine")
say("Schriftrolle des Drachen, aber die Erfolgsrate")
say("ist h鐬er.")
say("")
wait()
say_title("Schmied:")
say("Um es herzustellen, ben飆igt man einen Stein des")
say("Schmieds.")
say_item("Stein des Schmieds", 71025, "")
say("")
wait()
say_title("Schmied:")
say("Zus酹zlich ben飆igt man eine Segenschriftrolle.")
say_item("Segenschriftrolle", 25040, "")
say("")
wait()
say_title("Schmied:")
say("Hast du alle ben飆igten Gegenst鄚de?")
say("Soll ich dir jetzt ein Handbuch herstellen, das")
say("mein generationenlang getestetes Wissen")
say("enth鄟t?")
say("")
local s=select("Ja", "Nein")
if pc.count_item(71025)>0 and pc.count_item(25040)>0 then
pc.remove_item(71026, 1)
pc.remove_item(25040, 1)
pc.give_item2(71032)
say_title("龍神的祝福書製作成功!")
say("有玄鐵很容易製作")
say("龍神的祝福書 成功了~ 哈哈哈")
say("")
end
elseif pc.count_item(71025)==0
say_title("Schmied:")
say("Ich kann dir das Schmiede-Handbuch nicht")
say("herstellen, weil du nicht alle notwendigen")
say("Materialien bei dir tr輍st.")
say("")
end
elseif pc.count_item(25040)==0
say_title("Schmied:")
say("Ich kann dir das Schmiede-Handbuch nicht")
say("herstellen, weil du nicht alle notwendigen")
say("Materialien bei dir tr輍st.")
say("")
end
elseif 2==s
return
end
end
end
05/15/2011 09:24 derkiler#2345
hi leute...
ich ben飆ige eure hilfe bei dieser Quest:


quest reittiere begin
state start begin
when 71114.use begin
pc.mount(20110)
horse.ride()
end
when 71120.use begin
pc.mount(20113)
horse.ride()
end
when 71118.use begin
pc.mount(20112)
horse.ride()
end
when 71116.use begin
pc.mount(20111)
horse.ride()
end
end
end

Soweit so gut, aber wie kann ich machen das z.B. durch erneutes benutzen des Siegel man absitzt/absteigt (unmount..) ? Wei� das jemand?
05/15/2011 09:42 TOPzocker#2346
Die einzigste L飉ung wo mir grade einf鄟lt, 4 andere Siegel rein das wenn du z.B. 71114 benutzt das siegel entfernt wird du ein neues bekommst wo du absteigen kannst un wenn du das benutzt du das alte also 71114 siegel wieder bekommst
05/15/2011 10:03 .iXream.#2347
Quote:
quest give_basic_weapon begin
state start begin
when login begin
if pc.getqf("basic_weapon") == 0 then
pc.setqf("basic_weapon", 1)
if pc.job==0 then
pc.give_item2("19",1)
pc.give_item2("3009",1)
pc.give_item2("11209",1)
pc.give_item2("12209",1)
elseif pc.job==1 then
pc.give_item2("1009",1)
pc.give_item2("2009",1)
pc.give_item2("11409",1)
pc.give_item2("12349",1)
elseif pc.job==2 then
pc.give_item2("19",1)
pc.give_item2("11609",1)
pc.give_item2("12489",1)
elseif pc.job==3 then
pc.give_item2("7009",1)
pc.give_item2("5009",1)
pc.give_item2("11809",1)
pc.give_item2("12629",1)
end

if pc.countitem(item) == 0 and pc.weapon != item then
pc.give_item2(item)
pc.give_item2("27003",200)
pc.give_item2("27003",200)
pc.give_item2("27003",200)
pc.give_item2("27003",200)
pc.give_item2("27003",200)
pc.give_item2("27006",200)
pc.give_item2("27006",200)
pc.give_item2("27006",200)
pc.give_item2("27006",200)
pc.give_item2("27006",200)
pc.give_item2("50052",1")
pc.set_skill_level(131, 10)
horse.set_level(11)
pc.give_item2("17009",1)
pc.give_item2("16009",1)
pc.give_item2("15009",1)
pc.give_item2("14009",1)
pc.give_item2("13009",1)
end
end
end
end
end
Wo liegt dieser schei� Fehler ?!?
05/15/2011 10:29 TOPzocker#2348
PHP Code:
quest give_basic_weapon begin
    state start begin
        when login begin
            
if pc.getqf("basic_weapon") == 0 then
                pc
.setqf("basic_weapon", 1)
                
                if 
pc.job==0 then
                    pc
.give_item2(19,1)
                    
pc.give_item2(3009,1)
                    
pc.give_item2(11209,1)
                    
pc.give_item2(12209,1)
                    
horse.set_level(11)
                    
pc.give_item2("17009",1)
                    
pc.give_item2("16009",1)
                    
pc.give_item2("15009",1)
                    
pc.give_item2("14009",1)
                    
pc.give_item2("13009",1)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.set_skill_level(131, 10)
                elseif 
pc.job==1 then
                    pc
.give_item2(1009)
                    
pc.give_item2(2009)
                    
pc.give_item2(11409)
                    
pc.give_item2(12349)
                    
horse.set_level(11)
                    
pc.give_item2("17009",1)
                    
pc.give_item2("16009",1)
                    
pc.give_item2("15009",1)
                    
pc.give_item2("14009",1)
                    
pc.give_item2("13009",1)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.set_skill_level(131, 10)
                elseif 
pc.job==2 then
                    pc
.give_item2(19)
                    
pc.give_item2(11609)
                    
pc.give_item2(12489)
                    
horse.set_level(11)
                    
pc.give_item2("17009",1)
                    
pc.give_item2("16009",1)
                    
pc.give_item2("15009",1)
                    
pc.give_item2("14009",1)
                    
pc.give_item2("13009",1)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.set_skill_level(131, 10)
                elseif 
pc.job==3 then
                    pc
.give_item2(7009)
                    
pc.give_item2(5009)
                    
pc.give_item2(11809)
                    
pc.give_item2(12629)
                    
horse.set_level(11)
                    
pc.give_item2("17009",1)
                    
pc.give_item2("16009",1)
                    
pc.give_item2("15009",1)
                    
pc.give_item2("14009",1)
                    
pc.give_item2("13009",1)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27003",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.give_item2("27006",200)
                    
pc.set_skill_level(131, 10)
                
end
            end
        end
    end
end 
so d�rfte sie funktionieren
05/15/2011 10:29 √π.#2349
@TOPzocker, zwischen den elseif's kommen keine ends
@derkiller
@XtReMe.
05/15/2011 11:17 derkiler#2350
klappt nicht ;( jetzt sitzt er nicht ml mehr auf
05/15/2011 11:28 .Delta#2351
paar ends haben gefehlt ;)
PHP Code:
quest reittiere begin
    state start begin
        when 71114.
use begin
            
if not pc.is_mount() then
                pc
.mount(20110)
                
horse.ride()
            else
                
pc.unmount()
                
end
            end
        when 71120.
use begin
            
if not pc.is_mount() then
                pc
.mount(20113)
                
horse.ride()
            else
                
pc.unmount()
            
end
        end
        when 71118.
use begin
            
if not pc.is_mount() then
                pc
.mount(20112)
                
horse.ride()
            else
                
pc.unmount()
            
end
        end
        when 71116.
use begin
            
if not pc.is_mount() then
                pc
.mount(20111)
                
horse.ride()
            else
                
pc.unmount()
            
end
        end
    end
end 
05/15/2011 11:52 √π.#2352
Quote:
Originally Posted by .Delta View Post
paar ends haben gefehlt ;)
PHP Code:
quest reittiere begin
    state start begin
        when 71114.
use begin
            
if not pc.is_mount() then
                pc
.mount(20110)
                
horse.ride()
            else
                
pc.unmount()
                
end
            end
        when 71120.
use begin
            
if not pc.is_mount() then
                pc
.mount(20113)
                
horse.ride()
            else
                
pc.unmount()
            
end
        end
        when 71118.
use begin
            
if not pc.is_mount() then
                pc
.mount(20112)
                
horse.ride()
            else
                
pc.unmount()
            
end
        end
        when 71116.
use begin
            
if not pc.is_mount() then
                pc
.mount(20111)
                
horse.ride()
            else
                
pc.unmount()
            
end
        end
    end
end 
Ups ja stimmt :D Kommt davon wenn mans net einr�ckt^^
05/15/2011 15:04 Pαıп#2353
PHP Code:
quest zgstrank begin
    state start begin
        when 29960.
use begin
            
if pc.getqf("zsgpott") == 1 then
                syschat
("Dieser Effekt wirkt bereits!")
            else
                
pc.remove_item(29960,1)
                
timer("zsgpott",60*30)
                
pc.setqf("zsgpott",1)
                
affect.add_collect(apply.CAST_SPEED, 20, 60*30)
                
chat("Du f�hlst dich schneller und st酺ker...")
                
chat("F�r 30minuten hast du 20% mehr Zaubergeschwindigkeit!")
            
end
        end
        when zsgpott
.timer begin
            syschat
("Der Effekt verliert seine wirkung...")
        
end
    end
end 
gibt core dump
05/15/2011 17:59 Retrograd#2354
k霵ntet ihr bitte einen guide mit den fehlermeldungen und den l飉ungen dazu machen das w酺e ech nett
05/15/2011 19:27 derkiler#2355
bin grad am versuchen diese 2 Quests zu vereinen...

quest drachenraum begin
state start begin
when 20092.chat."Der Drachenraum" begin
say(""..mob_name(20092)..":")
say("")
say("... Du ben飆igst eine Drachenrolle")
say("um in den Drachenraum zu gelangen!")
say("Aber seid gewarnt...")
say("Im Drachenraum haust der ber�chtige Wasser-Drache.")
say("")
say_reward("Du wirst nach einer Drachenrolle durchsucht...")
wait()
say("")
say("")
if pc.count_item(60004)>1 then
say(""..mob_name(20092).."")
say("Du wirst nun teleportiert!")
say_reward("Aber sei vorsichtig...")
wait()
notice_all("Der Spieler ".. pc.get_name() .." versucht den Wasserdrache zu t飆en!");
pc.remove_item(60004, 1)
pc.warp(177900,1220400)
else
say_title("Du besitzt keine Drachenrolle.")
say("")
say(""..mob_name(20092)..":")
say("Es tut mir leid, der Zutritt ist dir verweigert.")
say_reward("Drachenrolle kann in der Grotte gedroppt werden")
return
end
end
end
end

und diese

when 2493.kill() begin
pc.setqf("drachenraum", get_time() + 120)
d.notice("In 2 Minuten wirst du zur�ck teleportiert")
if pc.setqf("next_time", 0) then
d.jump_all(277, 174)


kann mir jmd. helfen?