[SERVICE] Die Questkontrolle

09/20/2013 11:00 .HNSY#9016
PHP Code:
quest dragon_attack begin
    state start begin
        when 8031.kill with pc
.get_map_index() == 96 begin
            timer
("get_next", 5)
        
end
        when get_next
.timer begin
            d
.clear_regen()
            
d.new_jump_all(96, 3498900+120,3498900+616)
            
d.new_jump_all(96, 34989+120,34989+616)
            
d.regen_file("data/dungeon/dragon/dragon1.txt")
            
d.setf("monster1", 55)
        
end
        when 2235.kill with pc
.in_dungeon() and d.getf("monster1") > 0 begin
            d
.setf("monster1", d.getf("monster1") - 1)
            if 
d.getf("monster1") == 0 then
                d
.notice("Es sind Metinsteine erschienen.")
                
d.notice("Zerstört sie!")
                
d.clear_regen()
                
d.regen_file("data/dungeon/dragon/dragon_metin1.txt")
                
d.setf("metins1", 2)
            
end
        end
        when 11507.kill with pc
.in_dungeon() and d.getf("metins1") > 0 begin
            d
.setf("metins1", d.getf("metins1") - 1)
            if 
d.getf("metins1") == 0 then
                d
.notice("Ihr habt alle Metinsteine zerstört.!")
                
d.notice("Geht nun weiter. Aber habt acht!")
                
d.notice("Auf dem Weg werden noch mehr dieser Monster lauern.")
                
d.clear_regen()
                
d.regen_file("data/dungeon/dragon/dragon2.txt")
                
d.setf("monster2", 100)
            
end
        end
        when 2235.kill with pc
.in_dungeon() and d.getf("monster2") > 0 begin
            d
.setf("monster2", d.getf("monster2") - 1)
            if 
d.getf("monster2") == 0 then
                d
.notice("Der Flammenkönig ist an der kaputten Brücke erschienen.")
                
d.notice("Wie es scheint hat er damit etwas zu tun,")
                
d.notice("die Brücken kaputt sind! Erledigt ihn!")
                
d.spawn_mob(2206, 266, 523)
            
end
        end
        when 2206.kill with pc
.in_dungeon() begin
            d
.notice("Gut gemacht. Aber wie es scheint ist nicht nur er")
            
d.notice("an dem Schuld was hier passiert. Sucht weiter nach der Ursache!")
            
d.setf("flammenkoenig", 0)
            
d.clear_regen()
            
d.regen_file("data/dungeon/dragon/dragon3.txt")
            
d.setf("monster3", 115)
        
end
        when 2235.kill with pc
.in_dungeon() and d.getf("monster3") > 0 begin
            d
.setf("monster3", d.getf("monster3") - 1)
            if 
d.getf("monster3") == 0 then
                d
.notice("Am Ende des Weges ist etwas !")
                
d.notice("Schaut nach was da los ist!")
                
d.clear_regen()
                
d.spawn_mob(2207, 339, 278)
                
d.setf("flammenkoenig2", 1)
            
end
        end
        when 2207.kill with pc
.in_dungeon() and d.getf("flammenkoenig2") == 1 begin
            d
.notice("2 Flammenkönige!?")
            
d.notice("Hier stimmt definitiv etwas nicht.")
            
d.notice("Jedoch haben wir bei diesem einige Informationen")
            
d.notice("Über ein weiteres Gebiet bekommen.")
            
d.notice("Dort sollen noch stärkere Gegner sein.")
            
d.notice("Also macht euch bereit in 20 Sekunden bringe ich euch")
            
d.notice("dorthin. Viel Glück!")
            
d.setf("flammenkoenig2", 0)
            
timer("get_next2", 20)
        
end
        when get_next2
.timer begin
            d
.clear_regen()
            
d.new_jump_all(92, 15000000+32,15000000+234)
            
d.new_jump_all(92, 150000+32,150000+234)
            
d.regen_file("data/dungeon/dragon/dragon4.txt")
            
d.setf("monster4", 30)
        
end
        when 2404.kill with pc
.in_dungeon() and d.getf("monster4") > 0 begin
            d
.setf("monster4", d.getf("monster4") - 1)
            if 
d.getf("monster4") == 0 then
                d
.kill_all()
                
d.notice("Seitwann stecken die Setaou mit den Flammenwesen")
                
d.notice("unter einer Decke?")
                
d.notice("Es sind wütende Schreie zu höhren.")
                
d.notice("sucht die Ursache dafür!")
                
d.spawn_mob(2491, 74, 117)
                
d.setf("general1", 1)
            
end
        end
        when 2491.kill with pc
.in_dungeon() and d.getf("general1") == 1 begin
            d
.notice("Sogar die Hauptmänner drehen total durch.")
            
d.notice("Was ist nur mit ihnen los?")
            
d.notice("Hier muss wirklich etwas faul sein!")
            
d.notice("Es sind schon wieder eine Menge Setaou erschienen!")
            
d.notice("Also gebt euer Bestes!")
            
d.setf("general1", 0)
            
d.clear_regen()
            
d.regen_file("data/dungeon/dragon/dragon4.txt")
            
d.setf("monster5", 30)
        
end
        when 2404.kill with pc
.in_dungeon() and d.getf("monster5") > 0 begin
            d
.setf("monster5", d.getf("monster5") - 1)
            if 
d.getf("monster5") == 0 then
                d
.kill_all()
                
d.notice("Wieder diese Schreie !?")
                
d.notice("Sucht wieder einmal danach!")
                
d.spawn_mob(2494, 74, 22)
                
d.setf("general2", 1)
            
end
        end
        when 2494.kill with pc
.in_dungeon() and d.getf("general2") == 1 begin
            d
.notice("Das kann so nicht weitergehen.")
            
d.notice("Was ist nur mit ihnen los?")
            
d.notice("Der Hauptmann sagte etwas von einem Drachen!?")
            
d.notice("Ihr müsst nach einem Drachen suchen!")
            
d.notice("Viel Glück!")
            
d.setf("general2", 0)
            
d.clear_regen()
            
d.setf("drache1", 1)
            
d.spawn_mob(2291, 212, 71)
        
end
        when 2291.kill with pc
.in_dungeon() and d.getf("drache1") == 1 begin
            d
.notice("Ihr habt es geschafft den Drachen zu bezwingen.")
            
d.notice("Aber es ist noch nicht zuende!")
            
d.notice("Es gibt noch einen Weiteren Drachen.")
            
d.notice("In einer Minute werd ich euch dorthin bringen!")
            
d.notice("Viel Glück!")
            
d.setf("drache1", 0)
            
d.clear_regen()
            
timer("get_next3", 60)
        
end
        when get_next3
.timer begin
            d
.clear_regen()
            
d.new_jump_all(94, 76000000+205,76000000+125)
            
d.new_jump_all(94, 760000+205,760000+125)
            
d.spawn_mob(204, 126, 70)
            
d.setf("drache2", 1)
        
end
        when 2700.kill with pc
.in_dungeon() and d.getf("drache2") == 1 begin
            d
.notice("Ihr habt es geschafft beide Drachen zu bezwingen.")
            
d.notice("Ihr seid erstklassig!")
            
d.notice("Die Schätze der Drachen sollten Lohn genug sein!")
            
d.setf("drache2", 0)
            
notice_all("".. pc.get_name() .." hat die Dracheninvasion gemeistert!")
            
timer("exit", 30)
        
end
        when 
exit.timer begin
            warp_all_to_village
( pc.get_map_index() , 1 )
        
end
    end
end 
Nachdem der Flammenkönig (2206) gekillt worden ist, passiert nichts... oder müssen die anderen Monster davor gekillt werden? Erst King dann die Monster.. schon versucht, klappt nicht.

Bitte um Hilfe, gibt e*g als Belohnung! :)
09/20/2013 11:16 WhiteAngelx3#9017
Sorry
09/20/2013 12:30 alterregtihrauf#9018
Hallo, Com
bräuchte hilfe bezüglich des Anti Exp Rings. Ich habe die quest eingefügt
Quote:
quest anti begin
state start begin
when 72501.use begin
if pc.getqf("antiexp") == 0 then
pc.setqf("antiexp", 1)
chat("Anti Exp Ring Aktiviert. Du bekommst keine Exp mehr!")
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 3)
elseif pc.getqf("antiexp") == 1 then
pc.setqf("antiexp", 0)
chat("Anti Exp Ring Deaktiviert. Du bekommst wieder Exp!")
end
end

when erfahrung.timer with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung1", 3)
pc.setqf("antiexp", 1)
end

when erfahrung1.timer with pc.getqf("antiexp") == 1 begin
local ep = pc.get_exp()
pc.give_exp2(-ep)
timer("erfahrung", 3)
pc.setqf("antiexp", 1)
end
end
end
und type auf 18 gestellt, wenn ich ihn ingame aktiviere kriege ich trotzdem exp also ich bekomme ganz normal exp, woran liegt das? bin noch ein anfänger nicht wundern..
*sehe gerade das ich die quest falsch eingefügt habe wie kann ich das als php-code hier einfügen?
09/20/2013 12:48 .Inya#9019
Quote:
Originally Posted by R3alHNSY@LKTH2 View Post
PHP Code:
quest dragon_attack begin
    state start begin
        when 8031.kill with pc
.get_map_index() == 96 begin
            timer
("get_next", 5)
        
end
        when get_next
.timer begin
            d
.clear_regen()
            
d.new_jump_all(96, 3498900+120,3498900+616)
            
d.new_jump_all(96, 34989+120,34989+616)
            
d.regen_file("data/dungeon/dragon/dragon1.txt")
            
d.setf("monster1", 55)
        
end
        when 2235.kill with pc
.in_dungeon() and d.getf("monster1") > 0 begin
            d
.setf("monster1", d.getf("monster1") - 1)
            if 
d.getf("monster1") == 0 then
                d
.notice("Es sind Metinsteine erschienen.")
                
d.notice("Zerstört sie!")
                
d.clear_regen()
                
d.regen_file("data/dungeon/dragon/dragon_metin1.txt")
                
d.setf("metins1", 2)
            
end
        end
        when 11507.kill with pc
.in_dungeon() and d.getf("metins1") > 0 begin
            d
.setf("metins1", d.getf("metins1") - 1)
            if 
d.getf("metins1") == 0 then
                d
.notice("Ihr habt alle Metinsteine zerstört.!")
                
d.notice("Geht nun weiter. Aber habt acht!")
                
d.notice("Auf dem Weg werden noch mehr dieser Monster lauern.")
                
d.clear_regen()
                
d.regen_file("data/dungeon/dragon/dragon2.txt")
                
d.setf("monster2", 100)
            
end
        end
        when 2235.kill with pc
.in_dungeon() and d.getf("monster2") > 0 begin
            d
.setf("monster2", d.getf("monster2") - 1)
            if 
d.getf("monster2") == 0 then
                d
.notice("Der Flammenkönig ist an der kaputten Brücke erschienen.")
                
d.notice("Wie es scheint hat er damit etwas zu tun,")
                
d.notice("die Brücken kaputt sind! Erledigt ihn!")
                
d.spawn_mob(2206, 266, 523)
            
end
        end
        when 2206.kill with pc
.in_dungeon() begin
            d
.notice("Gut gemacht. Aber wie es scheint ist nicht nur er")
            
d.notice("an dem Schuld was hier passiert. Sucht weiter nach der Ursache!")
            
d.setf("flammenkoenig", 0)
            
d.clear_regen()
            
d.regen_file("data/dungeon/dragon/dragon3.txt")
            
d.setf("monster3", 115)
        
end
        when 2235.kill with pc
.in_dungeon() and d.getf("monster3") > 0 begin
            d
.setf("monster3", d.getf("monster3") - 1)
            if 
d.getf("monster3") == 0 then
                d
.notice("Am Ende des Weges ist etwas !")
                
d.notice("Schaut nach was da los ist!")
                
d.clear_regen()
                
d.spawn_mob(2207, 339, 278)
                
d.setf("flammenkoenig2", 1)
            
end
        end
        when 2207.kill with pc
.in_dungeon() and d.getf("flammenkoenig2") == 1 begin
            d
.notice("2 Flammenkönige!?")
            
d.notice("Hier stimmt definitiv etwas nicht.")
            
d.notice("Jedoch haben wir bei diesem einige Informationen")
            
d.notice("Über ein weiteres Gebiet bekommen.")
            
d.notice("Dort sollen noch stärkere Gegner sein.")
            
d.notice("Also macht euch bereit in 20 Sekunden bringe ich euch")
            
d.notice("dorthin. Viel Glück!")
            
d.setf("flammenkoenig2", 0)
            
timer("get_next2", 20)
        
end
        when get_next2
.timer begin
            d
.clear_regen()
            
d.new_jump_all(92, 15000000+32,15000000+234)
            
d.new_jump_all(92, 150000+32,150000+234)
            
d.regen_file("data/dungeon/dragon/dragon4.txt")
            
d.setf("monster4", 30)
        
end
        when 2404.kill with pc
.in_dungeon() and d.getf("monster4") > 0 begin
            d
.setf("monster4", d.getf("monster4") - 1)
            if 
d.getf("monster4") == 0 then
                d
.kill_all()
                
d.notice("Seitwann stecken die Setaou mit den Flammenwesen")
                
d.notice("unter einer Decke?")
                
d.notice("Es sind wütende Schreie zu höhren.")
                
d.notice("sucht die Ursache dafür!")
                
d.spawn_mob(2491, 74, 117)
                
d.setf("general1", 1)
            
end
        end
        when 2491.kill with pc
.in_dungeon() and d.getf("general1") == 1 begin
            d
.notice("Sogar die Hauptmänner drehen total durch.")
            
d.notice("Was ist nur mit ihnen los?")
            
d.notice("Hier muss wirklich etwas faul sein!")
            
d.notice("Es sind schon wieder eine Menge Setaou erschienen!")
            
d.notice("Also gebt euer Bestes!")
            
d.setf("general1", 0)
            
d.clear_regen()
            
d.regen_file("data/dungeon/dragon/dragon4.txt")
            
d.setf("monster5", 30)
        
end
        when 2404.kill with pc
.in_dungeon() and d.getf("monster5") > 0 begin
            d
.setf("monster5", d.getf("monster5") - 1)
            if 
d.getf("monster5") == 0 then
                d
.kill_all()
                
d.notice("Wieder diese Schreie !?")
                
d.notice("Sucht wieder einmal danach!")
                
d.spawn_mob(2494, 74, 22)
                
d.setf("general2", 1)
            
end
        end
        when 2494.kill with pc
.in_dungeon() and d.getf("general2") == 1 begin
            d
.notice("Das kann so nicht weitergehen.")
            
d.notice("Was ist nur mit ihnen los?")
            
d.notice("Der Hauptmann sagte etwas von einem Drachen!?")
            
d.notice("Ihr müsst nach einem Drachen suchen!")
            
d.notice("Viel Glück!")
            
d.setf("general2", 0)
            
d.clear_regen()
            
d.setf("drache1", 1)
            
d.spawn_mob(2291, 212, 71)
        
end
        when 2291.kill with pc
.in_dungeon() and d.getf("drache1") == 1 begin
            d
.notice("Ihr habt es geschafft den Drachen zu bezwingen.")
            
d.notice("Aber es ist noch nicht zuende!")
            
d.notice("Es gibt noch einen Weiteren Drachen.")
            
d.notice("In einer Minute werd ich euch dorthin bringen!")
            
d.notice("Viel Glück!")
            
d.setf("drache1", 0)
            
d.clear_regen()
            
timer("get_next3", 60)
        
end
        when get_next3
.timer begin
            d
.clear_regen()
            
d.new_jump_all(94, 76000000+205,76000000+125)
            
d.new_jump_all(94, 760000+205,760000+125)
            
d.spawn_mob(204, 126, 70)
            
d.setf("drache2", 1)
        
end
        when 2700.kill with pc
.in_dungeon() and d.getf("drache2") == 1 begin
            d
.notice("Ihr habt es geschafft beide Drachen zu bezwingen.")
            
d.notice("Ihr seid erstklassig!")
            
d.notice("Die Schätze der Drachen sollten Lohn genug sein!")
            
d.setf("drache2", 0)
            
notice_all("".. pc.get_name() .." hat die Dracheninvasion gemeistert!")
            
timer("exit", 30)
        
end
        when 
exit.timer begin
            warp_all_to_village
( pc.get_map_index() , 1 )
        
end
    end
end 
Nachdem der Flammenkönig (2206) gekillt worden ist, passiert nichts... oder müssen die anderen Monster davor gekillt werden? Erst King dann die Monster.. schon versucht, klappt nicht.

Bitte um Hilfe, gibt e*g als Belohnung! :)
Dann ist der Flammenkönix bereits in einer anderen Quest verwendet. Der xxx.kill befehl blockt weiter xxx.kill befehl auf der gleichen Vnum in Quests die in der locale_list weiter unten stehen

deshalb immer mit when kill begin arbeiten und dann die vnum per if abfrage rausfischen :)
09/20/2013 19:47 Akurion#9020
heyho,habe auch mal ne Quest geschrieben und der Fehler ist vlt einfacher als ich denke^^ Bin jedenfalls grade zu doof um ihn zu finden...
PHP Code:
quest dunkle_bedrohung begin
    state start begin
        when levelup with pc
.get_level() <= 50 begin
            set_state
( killmonster )
        
end
    end
    state killmonster begin
        when letter begin
            send_letter
("Die Dunkle Bedrohung!")
            
pc.setqf("state", 0)
            
q.set_counter("Verbleibend",250)
        
end
        when info 
or button begin
            say_title
("Töte 250 Orks!")
            
say_reward( "Es fehlen noch ".." "..250 - pc.getqf("state").." Orks .")
            
say("")
        
end
        when 601.kill begin
            local count 
= pc.getqf("state") + 1

            
if count <= 250 then
                pc
.setqf("state", count)
                
q.set_counter("Verbleibend", 250 - count)

                if 
count == 250 then
                    say_title
("Aufgabe abgeschlossen!")
                    
say("Alle 250 Orks wurden getötet.")
                    
say("Erhalte deine Belohnung:")
                    
say_reward("1x 50er PvM-King")
                if 
pc.job == 0 then
                pc
.give_item2(11971, 1)
                elseif 
pc.job == 1 then
                pc
.give_item2(11972, 1)
                elseif 
pc.job == 2 then
                pc
.give_item2(11973, 1)
                else
                
pc.give_item2(11974, 1)
            
end
        end
    end
end 
Folgender Fehler:
dunkle_bedrohung.quest:41:Error occured on compile dunkle_bedrohung.quest


Bitte um Hilfe komme nicht drauf O.o

Danke im Vorraus ;)

Mfg,Akurion
09/20/2013 20:04 Mijago#9021
Habe an deiner eigentlichen Quest nichts geändert, auch wenn es natl einiges zu ändern gibt :)

PHP Code:
quest dunkle_bedrohung begin
    state start begin
        when levelup with pc
.get_level() <= 50 begin
            set_state
( killmonster )
        
end
    end
    state killmonster begin
        when letter begin
            send_letter
("Die Dunkle Bedrohung!")
            
pc.setqf("state", 0)
            
q.set_counter("Verbleibend",250)
        
end
        when info 
or button begin
            say_title
("Töte 250 Orks!")
            
say_reward( "Es fehlen noch ".." "..250 - pc.getqf("state").." Orks .")
            
say("")
        
end
        when 601.kill begin
            local count 
= pc.getqf("state") + 1
            
            
if count <= 250 then
                pc
.setqf("state", count)
                
q.set_counter("Verbleibend", 250 - count)
            elseif 
count == 250 then
                say_title
("Aufgabe abgeschlossen!")
                
say("Alle 250 Orks wurden getötet.")
                
say("Erhalte deine Belohnung:")
                
say_reward("1x 50er PvM-King")
                if 
pc.job == 0 then
                    pc
.give_item2(11971, 1)
                elseif 
pc.job == 1 then
                    pc
.give_item2(11972, 1)
                elseif 
pc.job == 2 then
                    pc
.give_item2(11973, 1)
                else
                    
pc.give_item2(11974, 1)
                
end
            end
        end
    end
end 
09/21/2013 21:14 Akurion#9022
Quote:
Originally Posted by Mijago View Post
Habe an deiner eigentlichen Quest nichts geändert, auch wenn es natl einiges zu ändern gibt :)

PHP Code:
quest dunkle_bedrohung begin
    state start begin
        when levelup with pc
.get_level() <= 50 begin
            set_state
( killmonster )
        
end
    end
    state killmonster begin
        when letter begin
            send_letter
("Die Dunkle Bedrohung!")
            
pc.setqf("state", 0)
            
q.set_counter("Verbleibend",250)
        
end
        when info 
or button begin
            say_title
("Töte 250 Orks!")
            
say_reward( "Es fehlen noch ".." "..250 - pc.getqf("state").." Orks .")
            
say("")
        
end
        when 601.kill begin
            local count 
= pc.getqf("state") + 1
            
            
if count <= 250 then
                pc
.setqf("state", count)
                
q.set_counter("Verbleibend", 250 - count)
            elseif 
count == 250 then
                say_title
("Aufgabe abgeschlossen!")
                
say("Alle 250 Orks wurden getötet.")
                
say("Erhalte deine Belohnung:")
                
say_reward("1x 50er PvM-King")
                if 
pc.job == 0 then
                    pc
.give_item2(11971, 1)
                elseif 
pc.job == 1 then
                    pc
.give_item2(11972, 1)
                elseif 
pc.job == 2 then
                    pc
.give_item2(11973, 1)
                else
                    
pc.give_item2(11974, 1)
                
end
            end
        end
    end
end 
Jetzt lädt er die zwar,doch er zählt die kills nicht und daher gibts am Ende auch keine Belohnung o.O

Mfg,Akurion
09/22/2013 10:20 Yiv#9023
Müsste ohne Probleme funktionieren. Was steht in der game99 Syserr?

MfG
09/22/2013 12:21 Jоe#9024
PHP Code:
if count <= 250 then
   pc
.setqf("state", count)
   
q.set_counter("Verbleibend", 250 - count)
elseif 
count == 250 then 
-->
PHP Code:
if count < 250 then
   q
.set_counter("Verbleibend", 250 - count)
elseif 
count == 250 then 
09/22/2013 18:29 iFrost.#9025
PHP Code:
quest Geldspeicher begin
    state start begin
when 81011.
use begin
            say_title
("Geldspeicher 1")
            
say("")
            
say("Hiermit bekommst du deine 100 Mil. Yang wieder.")
            
say_reward("Falls du dein Geld auszahlen")
            
say_reward("möchtest drücke dazu auf Auszahlen.")
            
say_reward("Dieser Gegenstand ist auch handelbar!")
            
say("")
            
say_reward("Achtung: Du darfst nicht mehr als")
            
say_reward("2.000.000.000 Yang im Inventar haben.")
        
local main_set = select("Auszahlen","Abbrechen")
            if 
main_set == 2 then
            
return
            
end
            chat
("Du löst dein Speicher auf.")
            
pc . change_money ( 100000000 )
            
pc.removeitem(81011, 1)
            
end
        end
    end
end
when 81012.
use begin
            say_title
("Geldspeicher 2")
            
say("")
            
say("Hiermit bekommst du deine 250 Mil. Yang wieder.")
            
say_reward("Falls du dein Geld auszahlen")
            
say_reward("möchtest drücke dazu auf Auszahlen.")
            
say_reward("Dieser Gegenstand ist auch handelbar!")
            
say("")
            
say_reward("Achtung: Du darfst nicht mehr als")
            
say_reward("2.000.000.000 Yang im Inventar haben.")
        
local main_set = select("Auszahlen","Abbrechen")
            if 
main_set == 2 then
            
return
            
end
            chat
("Du löst dein Speicher auf.")
            
pc . change_money ( 250000000 )
            
pc.removeitem(81012, 1)
            
end
        end
    end
end
when 81013.
use begin
            say_title
("Geldspeicher 3")
            
say("")
            
say("Hiermit bekommst du deine 500 Mil. Yang wieder.")
            
say_reward("Falls du dein Geld auszahlen")
            
say_reward("möchtest drücke dazu auf Auszahlen.")
            
say_reward("Dieser Gegenstand ist auch handelbar!")
            
say("")
            
say_reward("Achtung: Du darfst nicht mehr als")
            
say_reward("2.000.000.000 Yang im Inventar haben.")
        
local main_set = select("Auszahlen","Abbrechen")
            if 
main_set == 2 then
            
return
            
end
            chat
("Du löst dein Speicher auf.")
            
pc . change_money ( 500000000 )
            
pc.removeitem(81013, 1)
            
end
        end
    end
end 
und wenn ich dann die quest reloade in putty komm dann


QUEST : Geldspeicher
STATE : start
WHEN : 81011.use
must start with 'quest'
Geldspeicher.quest:23:Error occured on compile Geldspeicher.quest

wo ist mein fehler ??
09/22/2013 18:48 Jоe#9026
Quote:
Originally Posted by D0N' View Post
quest Geldspeicher begin
state start begin
when 81011.use begin
say_title("Geldspeicher 1")
say("")
say("Hiermit bekommst du deine 100 Mil. Yang wieder.")
say_reward("Falls du dein Geld auszahlen")
say_reward("möchtest drücke dazu auf Auszahlen.")
say_reward("Dieser Gegenstand ist auch handelbar!")
say("")
say_reward("Achtung: Du darfst nicht mehr als")
say_reward("2.000.000.000 Yang im Inventar haben.")
local main_set = select("Auszahlen","Abbrechen")
if main_set == 2 then
return
end
chat("Du löst dein Speicher auf.")
pc . change_money ( 100000000 )
pc.removeitem(81011, 1)
end
end
end
end
when 81012.use begin
say_title("Geldspeicher 2")
say("")
say("Hiermit bekommst du deine 250 Mil. Yang wieder.")
say_reward("Falls du dein Geld auszahlen")
say_reward("möchtest drücke dazu auf Auszahlen.")
say_reward("Dieser Gegenstand ist auch handelbar!")
say("")
say_reward("Achtung: Du darfst nicht mehr als")
say_reward("2.000.000.000 Yang im Inventar haben.")
local main_set = select("Auszahlen","Abbrechen")
if main_set == 2 then
return
end
chat("Du löst dein Speicher auf.")
pc . change_money ( 250000000 )
pc.removeitem(81012, 1)
end
end
end
end
when 81013.use begin
say_title("Geldspeicher 3")
say("")
say("Hiermit bekommst du deine 500 Mil. Yang wieder.")
say_reward("Falls du dein Geld auszahlen")
say_reward("möchtest drücke dazu auf Auszahlen.")
say_reward("Dieser Gegenstand ist auch handelbar!")
say("")
say_reward("Achtung: Du darfst nicht mehr als")
say_reward("2.000.000.000 Yang im Inventar haben.")
local main_set = select("Auszahlen","Abbrechen")
if main_set == 2 then
return
end
chat("Du löst dein Speicher auf.")
pc . change_money ( 500000000 )
pc.removeitem(81013, 1)
end
end
end
end

und wenn ich dann die quest reloade in putty komm dann


QUEST : Geldspeicher
STATE : start
WHEN : 81011.use
must start with 'quest'
Geldspeicher.quest:23:Error occured on compile Geldspeicher.quest

wo ist mein fehler ??
Oben rot angemerkt, zu viele ends!
09/22/2013 19:52 iFrost.#9027
geht immer noch nicht kann ich dich in skype adden ? und dir das über skype an gucken ?? wenn du zeit und lust hast
09/23/2013 14:52 Dyshaxo#9028
Ist der Thread noch Aktiv?

quest starter begin
state start begin
when 9010.chat. with pc.level == 1 "Geht es dir gut?(Neulingsquest)" begin
say_title("Katarina:")
say("Na, du, alles in Ordnung? Was für ein Glück, dass du noch lebst...")
say("...")
say("Wie, du kannst dich an nichts erinnern?")
say("...")
say("Dein Kopf tut weh, meinst du?")
say("Du warst einer der wenigen überlebenden der Mission...")
say("...")
say("Die Mission, das Transportschiff des Dämonenherrschers ~Karon~ zu entern.")
say("Der Plan war es, das Schiff unter harten Beschuss zu nehmen, aber")
say("die Dekarons haben ~Karon~'s Verteidigungsmaßnahmen untersch\195\164tzt.")
say("Du solltest dich vielleicht wieder etwas in Form bringen.")
say("Ich habe hier neue Ausr\195\188stung f\195\188r dich.")
set_state(itemausgabe)
end
state itemausgabe begin
say_reward("Du bekommst das Neulingsset")
if pc.get_job() == 0
pc_giveitem2(3000)
end
elseif pc.get_job() == 1
pc_giveitem2(10)
end
elseif pc.get_job() == 2
pc_giveitem2(1000)
end
elseif pc.get_job() == 3
pc_giveitem2(7000)
end
end
end
end

Fehler: "When doesn't have begin-end clause"

Zu meiner entschuldigung - ich bin absolut komplett NEU was LUA angeht,
habe gestern Abend damit angefangen.
09/23/2013 15:01 .Inya#9029
Quote:
Originally Posted by DaisukeBanned View Post
Ist der Thread noch Aktiv?

quest starter begin
state start begin
when 9010.chat. with pc.level == 1 "Geht es dir gut?(Neulingsquest)" begin
say_title("Katarina:")
say("Na, du, alles in Ordnung? Was für ein Glück, dass du noch lebst...")
say("...")
say("Wie, du kannst dich an nichts erinnern?")
say("...")
say("Dein Kopf tut weh, meinst du?")
say("Du warst einer der wenigen überlebenden der Mission...")
say("...")
say("Die Mission, das Transportschiff des Dämonenherrschers ~Karon~ zu entern.")
say("Der Plan war es, das Schiff unter harten Beschuss zu nehmen, aber")
say("die Dekarons haben ~Karon~'s Verteidigungsmaßnahmen untersch\195\164tzt.")
say("Du solltest dich vielleicht wieder etwas in Form bringen.")
say("Ich habe hier neue Ausr\195\188stung f\195\188r dich.")
set_state(itemausgabe)
end
state itemausgabe begin
say_reward("Du bekommst das Neulingsset")
if pc.get_job() == 0
pc_giveitem2(3000)
end
elseif pc.get_job() == 1
pc_giveitem2(10)
end
elseif pc.get_job() == 2
pc_giveitem2(1000)
end
elseif pc.get_job() == 3
pc_giveitem2(7000)
end
end
end
end

Fehler: "When doesn't have begin-end clause"

Zu meiner entschuldigung - ich bin absolut komplett NEU was LUA angeht,
habe gestern Abend damit angefangen.
PHP Code:
quest starter begin
    state start begin
        when 9010.chat
."Geht es dir gut?(Neulingsquest)" with pc.level >= 1 begin
            say_title
("Katarina:")
            
say("Na, du, alles in Ordnung? Was für ein Glück, dass du noch lebst...")
            
say("...")
            
say("Wie, du kannst dich an nichts erinnern?")
            
say("...")
            
say("Dein Kopf tut weh, meinst du?")
            
say("Du warst einer der wenigen überlebenden der Mission...")
            
say("...")
            
say("Die Mission, das Transportschiff des Dämonenherrschers ~Karon~ zu entern.")
            
say("Der Plan war es, das Schiff unter harten Beschuss zu nehmen, aber")
            
say("die Dekarons haben ~Karon~'s Verteidigungsmaßnahmen untersch\195\164tzt.")
            
say("Du solltest dich vielleicht wieder etwas in Form bringen.")
            
say("Ich habe hier neue Ausr\195\188stung f\195\188r dich.")
            
set_state(itemausgabe)
        
end
        state itemausgabe begin
            when enter begin
                say_reward
("Du bekommst das Neulingsset")
                if 
pc.get_job() == 0 then
                    pc_giveitem2
(3000)
                
end
                
elseif pc.get_job() == 1 then
                    pc_giveitem2
(10)
                
end
                
elseif pc.get_job() == 2 then
                    pc_giveitem2
(1000)
                
end
                
elseif pc.get_job() == 3 then
                    pc_giveitem2
(7000)
                
end
            end
        end
    end
end 
09/23/2013 15:08 Dyshaxo#9030
Okay, das geht schnell.
Aber ich fühle mich trotzdem noch unfähig:
[Only registered and activated users can see links. Click Here To Register...]

-EDIT-
Hab n 2. end unter set_state(itemausgabe) gesetzt. Daraufhin:
Neuer Fehler: [Only registered and activated users can see links. Click Here To Register...]