[SERVICE] Die Questkontrolle

05/31/2012 21:30 DarkNessWorld2#5881
Quote:
Originally Posted by DarkNessWorld2 View Post
PHP Code:
quest 200_kill_quest  begin
    state start begin
        when login 
or levelup with pc.get_level() >=200  begin
            set_state
(information)
        
end    
    end

    state information begin
        when letter begin
            local v 
find_npc_by_vnum(9003)
            if 
!= 0 then
                target
.vid("__TARGET__"v"Quest")
            
end
            send_letter
("200 Kill Quest")
        
end

        when button 
or info begin
            say_title
("200 Kill Quest")
            
say("")
            
say("Hallo wie die Gemischtwarenhaendlerin schon sagte ")
            
say("Ihre Items sind weg! mache dich auf den weg schnell ")
            
say("sons wird es das letzte sein was sie tuhn kann")
            
say("Bitte helfe ihr.")
            
say("Die Daten wo du hin reisen musst:")
            
say("In die Labyrinth Map!")
            
say("Schnell beile dich.")
            
say("")
        
end

        when __TARGET__
.target.click or
            
9003.chat."200 Kill Quest" begin
            target
.delete("__TARGET__")
            
say("Gemischtwarenhaendlerin:")
            ---                                                   
l
            say
("Hallo")
            
say("Ich habe ein Problem!")
            
say("Mir wurden meine Perle fuer bestimmte Rezepte")
            
say("geklaut!")
            
say("Kanns du sie mir wieder holen?")
            
say("Das waere nett du wirs auch belohnt.")
            
say("")    
            
set_state(go_to_disciple)
            
pc.setqf("collect_count",0)
            
pc.setqf("drink_drug",0
        
end
    end

    state go_to_disciple begin
        when letter begin
            send_letter
("Auftrag von Gemischtwarenhaendlerin")

        
end
        when button 
or info begin
            say_title
("200 Kill Quest")
            ---                                                   
l
            say
("")
            
say("Gemischtwarenhaendlerin gab euch den Auftrag")
            
say("Möchtes du ihn annehmen?"
            
local s select("Ja""Nein")
            if 
s==1 then
            say
("Sie möchte das du:")
            
say("25 Hellgruene Perlen sammelst!")
            
say("Die Perle bekommt ihr von den Zombie Hunden.")
            
say("Viel Glueck!")
            
say("")
            
say_item_vnum(99004)
            
say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
            
say("")
        
end
            
if s==2 then
            clearmapsignal
()
            
complete_quest()
                return 
            
end 
        when 71035.
use begin --?g?b?H?
            if 
pc.getqf("drink_drug")==1 then
                say
("")
                
say("Bessere Droppchance!")
                
say("")

                return
            
end
            
if pc.count_item(99004)==0 then
                say
("")
                
say("Du hast keine!")
                
say("Lauf los und besorg mir welche!")
                
say("")
                return
            
end
            item
.remove()    
            
pc.setqf("drink_drug",1)
        
end


        when 2602.kill begin
            
if pc.count_item(99004)<25-pc.getqf("collect_count"then
                pc
.give_item2(990041)
            
end
        end

        when 9003.chat
."Quest" with pc.count_item(99004) >0   begin
                say
("Einen Moment!")
                ---                                                   
l
                say
("Ich werde die Perle")
                
say("schnell mal ueberpruefen.")
                
say("Hoffentlich klappt alles!")
                
say("")
                
pc.remove_item(990041)
                
wait()

                
local pass_percent
                
if pc.getqf("drink_drug")==0 then
                    pass_percent
=87420
                
else        
                    
pass_percent=87420
                end

                local s
number(1,100)
            if 
s<= pass_percent  then
               
if pc.getqf("collect_count")< 24 then     --5*?H?
                        local index 
=pc.getqf("collect_count")+
                        pc
.setqf("collect_count",index)     --???o?@*?? +1
                        say
("Gemischtwarenhaendlerin:")
                        
say("Perfekt! Diese Perle ist in Ordnung")
                        
say("Du hast bis jetzt ".." "..25-pc.getqf("collect_count").. " abgegeben!")
                        
say("Bring mir die restlichen!")
                        
say("")
                        
pc.setqf("drink_drug",0)     --?H??l??
                        return
                    
end
                    say
("Gemischtwarenhaendlerin:")
                    
say("Yuhu! Du hast mir")
                    
say("alles gebracht!")
                    
say("Dafuer werde ich dich wie versprochen")
                    
say("belohnen!")
                    
say("")
                    
say_reward("Du bekommst ein Orangen Smaragt!")
                    
say_reward("Du bekommst ein Blauer Smaragt!")
                    
say_reward("Du bekommst ein Roter Smaragt!")
                    
say_reward("Du bekommst 100000000 Yang!")
                    
say_reward("Du bekommst 100000000 Erfahrung!")
                    
pc.setqf("collect_count",0)
                    
pc.setqf("drink_drug",0)
                    
clear_letter()
                    
set_state(__complete)

                    
pc.give_item2(87420)
                    
pc.give_item2(87421)
                    
pc.give_item2(87422)
                    
pc.change_money(100000000)
                    
pc.give_exp2(100000000)
                    
set_quest_state("levelup","run")


                    return
                else                                
                
say("Gemischtwarenhaendlerin:")
                
say("Diese Perle ist von schlechter Qualitaet!")
                
say("Es kann nicht verwendet werden.")
                
say("Hole mir eine neue!")
                
say("")
                
pc.setqf("drink_drug",0)     --?H??l??
                return
                
end
    end
end


        
    state __complete begin
    end
end 
da is ein fehler drin schätze mit den ends bitte korregieren
problem weiterhin bestehend
05/31/2012 21:36 ©by Noa#5882
Quote:
Originally Posted by KingAura619 View Post
ne immer noch ein fehler
man sollte doch den Rüstungshändler ansprechen oder?
PHP Code:
quest Rustungshandler begin
    state start begin
        when 9002.chat
."Krieger Rüstungen" begin
            npc
.open_shop(101)
                 
say("Hier kannst du deine Rüstung für Krieger kaufen")
        
end
        when 9002.chat
."Sura Rüstungen" begin
            npc
.open_shop(107)
                 
say("Hier kannst du deine Rüstungen für Suras kaufen")
        
end
        when 9002.chat
."Ninja Rüstungen" begin
            npc
.open_shop(103)
                 
say("Hier kannst du deine Rüstungen für Ninjas kaufen")
        
end
        when 9002.chat
."Schamanen Rüstungen" begin
            npc
.open_shop(105)
                 
say("Hier kannst du deine Rüstungen für Schamanen kaufen")
        
end
        when 9002.chat
."Ausrüstung" begin
            npc
.open_shop(110)
                 
say("Hier kannst du dein Ausrüstung kaufen")
        
end
    end
end 
05/31/2012 22:12 Satyon#5883
Huhu, ich bekomme einfach diese Quest nich zum laufen, was mach ich falsch?

PHP Code:
quest geisterbaumlord begin
    state start begin
            when 30175.chat
."Der Lord" begin
            say_title
("Die Welt")
            
say("Hallo "..pc.get_name()..".")
            
say("Du benötigst Geheimnisvolles Graut")
            
say("Komm wieder wenn du das Item gefunden")
            
say("hast.")
            
say(" ;)")
        
when 30175.chat."Der Lord" if pc.count_item(30036)>=1 then
                say_title
("Die Welt")
                
say("Hallo "..pc.get_name()..".")
                
say("Ich habe keinen Namen, jedoch die Leute")
                
say("nennen mich den 'Wächter der Welten'.")
                
say("Ich kann Dir helfen, eine neue, noch nicht")
                
say("entdeckte Welt zu betreten, in der Du eine")
                
say("Aufgabe erfuellen musst.")
                
say(".")
                
say(".")
                
say(".")
                
say(".")
                
say_reward("Soll ich fortfahren?")
        
local a select = ("Ja, fortfahren!""Nein, nicht fortfahren!")
            if 
== 2 then 
                
return
            elseif 
== 1 then
                say_title
("Die Welt")
                
say("Also, "..pc.get_name()..",")
                
say("falls du diese Welt wirklich betreten")
                
say("moechtest, muss ich dich warnen.")
                
say("Dort lauern viele Monster und boesartige")
                
say("Kreaturen, die nur darauf warten, jemanden")
                
say("wie Dich als Nachspeise zu haben.")
                
say()
                
say_reward("Moechtest du die Dunkle Welt nun betreten?")
        
local b select = ("Ja, betreten!""Nein, ich habe Angst!")
            if 
== 2 then
                
return
            
end
            
if not party.is_party() then
                say
("Du brauchst eine Gruppe!")
                
say_reward("Kommt bitte wieder, wenn du eine Gruppe hast")
                return
                
end    
            
if party.get_near_count() <= and not pc.is_gm() then
                say
("Ihr seid leider zu wenige")
                
say("Ihr werdet versagen...")
                
say_reward("Deine Gruppe braucht mindestens 3 Mitglieder!")
                return
                
end
            
if not party.is_leader() then
                say
("Nur der Anführer der Gruppe kann entscheiden,")
                
say("wann und ob ihr aufbrechen wollt.")
                return
                
end
            timer
("hinein",20)
            
party.syschat("Es geht in 20 Sekunden los!")
            
party.syschat("Bereitet euch vor!")
                
end
            when hinein
.timer begin
                d
.join(12222001222200)
                
d.set_regen_file("/locale/germany/map/z_run_p1_3_by_kill_moves/regen.txt")
                
d.setf("level",0)
                
d.setf("c1",0)
                
end
            d
.notice("ihr betretet nun das Reich des Geisterbaum-Lords")
            
d.notice("vernichtet ihn")
            
d.setf("level",1)
                
end
                when 2307.kill begin
            timer
("hinein2",60)
            
party.syschat("Es geht in 60 wieder nach Hause ;)")
            
party.syschat("Bereitet euch vor!")
                
end
            when hinein2
.timer begin
                    d
.jump_all(95511008888800)
                
end
            end
        end
    end 
05/31/2012 22:56 Mijago#5884
habe Jetzt nur die End's richtig gemacht ..
PHP Code:
quest geisterbaumlord begin
    state start begin
        when 30175.chat
."Der Lord" begin
            say_title
("Die Welt")
            
say("Hallo "..pc.get_name()..".")
            
say("Du benötigst Geheimnisvolles Graut")
            
say("Komm wieder wenn du das Item gefunden")
            
say("hast.")
            
say(" ;)")
        
end
        when 30175.chat
."Der Lord" if pc.count_item(30036)>=1 then
            say_title
("Die Welt")
            
say("Hallo "..pc.get_name()..".")
            
say("Ich habe keinen Namen, jedoch die Leute")
            
say("nennen mich den 'Wächter der Welten'.")
            
say("Ich kann Dir helfen, eine neue, noch nicht")
            
say("entdeckte Welt zu betreten, in der Du eine")
            
say("Aufgabe erfuellen musst.")
            
say(".")
            
say(".")
            
say(".")
            
say(".")
            
say_reward("Soll ich fortfahren?")
            
local a select = ("Ja, fortfahren!""Nein, nicht fortfahren!")
            if 
== 2 then
                
return
            elseif 
== 1 then
                say_title
("Die Welt")
                
say("Also, "..pc.get_name()..",")
                
say("falls du diese Welt wirklich betreten")
                
say("moechtest, muss ich dich warnen.")
                
say("Dort lauern viele Monster und boesartige")
                
say("Kreaturen, die nur darauf warten, jemanden")
                
say("wie Dich als Nachspeise zu haben.")
                
say()
                
say_reward("Moechtest du die Dunkle Welt nun betreten?")
                
local b select = ("Ja, betreten!""Nein, ich habe Angst!")
                if 
== 2 then
                    
return
                
end
                
if not party.is_party() then
                    say
("Du brauchst eine Gruppe!")
                    
say_reward("Kommt bitte wieder, wenn du eine Gruppe hast")
                    return
                
end
                
if party.get_near_count() <= and not pc.is_gm() then
                    say
("Ihr seid leider zu wenige")
                    
say("Ihr werdet versagen...")
                    
say_reward("Deine Gruppe braucht mindestens 3 Mitglieder!")
                    return
                
end
                
if not party.is_leader() then
                    say
("Nur der Anführer der Gruppe kann entscheiden,")
                    
say("wann und ob ihr aufbrechen wollt.")
                    return
                
end
                timer
("hinein",20)
                
party.syschat("Es geht in 20 Sekunden los!")
                
party.syschat("Bereitet euch vor!")
            
end
            when hinein
.timer begin
                d
.join(12222001222200)
                
d.set_regen_file("/locale/germany/map/z_run_p1_3_by_kill_moves/regen.txt")
                
d.setf("level",0)
                
d.setf("c1",0)
            
end
            d
.notice("ihr betretet nun das Reich des Geisterbaum-Lords")
            
d.notice("vernichtet ihn")
            
d.setf("level",1)
        
end
        when 2307.kill begin
            timer
("hinein2",60)
            
party.syschat("Es geht in 60 wieder nach Hause ;)")
            
party.syschat("Bereitet euch vor!")
        
end
        when hinein2
.timer begin
            d
.jump_all(95511008888800)
        
end
    end
end 
05/31/2012 23:06 Satyon#5885
Quote:
Originally Posted by Mijago View Post
habe Jetzt nur die End's richtig gemacht ..
PHP Code:
quest geisterbaumlord begin
    state start begin
        when 30175.chat
."Der Lord" begin
            say_title
("Die Welt")
            
say("Hallo "..pc.get_name()..".")
            
say("Du benötigst Geheimnisvolles Graut")
            
say("Komm wieder wenn du das Item gefunden")
            
say("hast.")
            
say(" ;)")
        
end
        when 30175.chat
."Der Lord" if pc.count_item(30036)>=1 then
            say_title
("Die Welt")
            
say("Hallo "..pc.get_name()..".")
            
say("Ich habe keinen Namen, jedoch die Leute")
            
say("nennen mich den 'Wächter der Welten'.")
            
say("Ich kann Dir helfen, eine neue, noch nicht")
            
say("entdeckte Welt zu betreten, in der Du eine")
            
say("Aufgabe erfuellen musst.")
            
say(".")
            
say(".")
            
say(".")
            
say(".")
            
say_reward("Soll ich fortfahren?")
            
local a select = ("Ja, fortfahren!""Nein, nicht fortfahren!")
            if 
== 2 then
                
return
            elseif 
== 1 then
                say_title
("Die Welt")
                
say("Also, "..pc.get_name()..",")
                
say("falls du diese Welt wirklich betreten")
                
say("moechtest, muss ich dich warnen.")
                
say("Dort lauern viele Monster und boesartige")
                
say("Kreaturen, die nur darauf warten, jemanden")
                
say("wie Dich als Nachspeise zu haben.")
                
say()
                
say_reward("Moechtest du die Dunkle Welt nun betreten?")
                
local b select = ("Ja, betreten!""Nein, ich habe Angst!")
                if 
== 2 then
                    
return
                
end
                
if not party.is_party() then
                    say
("Du brauchst eine Gruppe!")
                    
say_reward("Kommt bitte wieder, wenn du eine Gruppe hast")
                    return
                
end
                
if party.get_near_count() <= and not pc.is_gm() then
                    say
("Ihr seid leider zu wenige")
                    
say("Ihr werdet versagen...")
                    
say_reward("Deine Gruppe braucht mindestens 3 Mitglieder!")
                    return
                
end
                
if not party.is_leader() then
                    say
("Nur der Anführer der Gruppe kann entscheiden,")
                    
say("wann und ob ihr aufbrechen wollt.")
                    return
                
end
                timer
("hinein",20)
                
party.syschat("Es geht in 20 Sekunden los!")
                
party.syschat("Bereitet euch vor!")
            
end
            when hinein
.timer begin
                d
.join(12222001222200)
                
d.set_regen_file("/locale/germany/map/z_run_p1_3_by_kill_moves/regen.txt")
                
d.setf("level",0)
                
d.setf("c1",0)
            
end
            d
.notice("ihr betretet nun das Reich des Geisterbaum-Lords")
            
d.notice("vernichtet ihn")
            
d.setf("level",1)
        
end
        when 2307.kill begin
            timer
("hinein2",60)
            
party.syschat("Es geht in 60 wieder nach Hause ;)")
            
party.syschat("Bereitet euch vor!")
        
end
        when hinein2
.timer begin
            d
.jump_all(95511008888800)
        
end
    end
end 
Die quest taucht leider immernoch nich bei dem NPC auf :(
06/01/2012 06:38 DarkNessWorld2#5886
Quote:
Originally Posted by DarkNessWorld2 View Post
PHP Code:
quest 200_kill_quest  begin
    state start begin
        when login 
or levelup with pc.get_level() >=200  begin
            set_state
(information)
        
end    
    end

    state information begin
        when letter begin
            local v 
find_npc_by_vnum(9003)
            if 
!= 0 then
                target
.vid("__TARGET__"v"Quest")
            
end
            send_letter
("200 Kill Quest")
        
end

        when button 
or info begin
            say_title
("200 Kill Quest")
            
say("")
            
say("Hallo wie die Gemischtwarenhaendlerin schon sagte ")
            
say("Ihre Items sind weg! mache dich auf den weg schnell ")
            
say("sons wird es das letzte sein was sie tuhn kann")
            
say("Bitte helfe ihr.")
            
say("Die Daten wo du hin reisen musst:")
            
say("In die Labyrinth Map!")
            
say("Schnell beile dich.")
            
say("")
        
end

        when __TARGET__
.target.click or
            
9003.chat."200 Kill Quest" begin
            target
.delete("__TARGET__")
            
say("Gemischtwarenhaendlerin:")
            ---                                                   
l
            say
("Hallo")
            
say("Ich habe ein Problem!")
            
say("Mir wurden meine Perle fuer bestimmte Rezepte")
            
say("geklaut!")
            
say("Kanns du sie mir wieder holen?")
            
say("Das waere nett du wirs auch belohnt.")
            
say("")    
            
set_state(go_to_disciple)
            
pc.setqf("collect_count",0)
            
pc.setqf("drink_drug",0
        
end
    end

    state go_to_disciple begin
        when letter begin
            send_letter
("Auftrag von Gemischtwarenhaendlerin")

        
end
        when button 
or info begin
            say_title
("200 Kill Quest")
            ---                                                   
l
            say
("")
            
say("Gemischtwarenhaendlerin gab euch den Auftrag")
            
say("Möchtes du ihn annehmen?"
            
local s select("Ja""Nein")
            if 
s==1 then
            say
("Sie möchte das du:")
            
say("25 Hellgruene Perlen sammelst!")
            
say("Die Perle bekommt ihr von den Zombie Hunden.")
            
say("Viel Glueck!")
            
say("")
            
say_item_vnum(99004)
            
say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
            
say("")
        
end
            
if s==2 then
            clearmapsignal
()
            
complete_quest()
                return 
            
end 
        when 71035.
use begin --?g?b?H?
            if 
pc.getqf("drink_drug")==1 then
                say
("")
                
say("Bessere Droppchance!")
                
say("")

                return
            
end
            
if pc.count_item(99004)==0 then
                say
("")
                
say("Du hast keine!")
                
say("Lauf los und besorg mir welche!")
                
say("")
                return
            
end
            item
.remove()    
            
pc.setqf("drink_drug",1)
        
end


        when 2602.kill begin
            
if pc.count_item(99004)<25-pc.getqf("collect_count"then
                pc
.give_item2(990041)
            
end
        end

        when 9003.chat
."Quest" with pc.count_item(99004) >0   begin
                say
("Einen Moment!")
                ---                                                   
l
                say
("Ich werde die Perle")
                
say("schnell mal ueberpruefen.")
                
say("Hoffentlich klappt alles!")
                
say("")
                
pc.remove_item(990041)
                
wait()

                
local pass_percent
                
if pc.getqf("drink_drug")==0 then
                    pass_percent
=87420
                
else        
                    
pass_percent=87420
                end

                local s
number(1,100)
            if 
s<= pass_percent  then
               
if pc.getqf("collect_count")< 24 then     --5*?H?
                        local index 
=pc.getqf("collect_count")+
                        pc
.setqf("collect_count",index)     --???o?@*?? +1
                        say
("Gemischtwarenhaendlerin:")
                        
say("Perfekt! Diese Perle ist in Ordnung")
                        
say("Du hast bis jetzt ".." "..25-pc.getqf("collect_count").. " abgegeben!")
                        
say("Bring mir die restlichen!")
                        
say("")
                        
pc.setqf("drink_drug",0)     --?H??l??
                        return
                    
end
                    say
("Gemischtwarenhaendlerin:")
                    
say("Yuhu! Du hast mir")
                    
say("alles gebracht!")
                    
say("Dafuer werde ich dich wie versprochen")
                    
say("belohnen!")
                    
say("")
                    
say_reward("Du bekommst ein Orangen Smaragt!")
                    
say_reward("Du bekommst ein Blauer Smaragt!")
                    
say_reward("Du bekommst ein Roter Smaragt!")
                    
say_reward("Du bekommst 100000000 Yang!")
                    
say_reward("Du bekommst 100000000 Erfahrung!")
                    
pc.setqf("collect_count",0)
                    
pc.setqf("drink_drug",0)
                    
clear_letter()
                    
set_state(__complete)

                    
pc.give_item2(87420)
                    
pc.give_item2(87421)
                    
pc.give_item2(87422)
                    
pc.change_money(100000000)
                    
pc.give_exp2(100000000)
                    
set_quest_state("levelup","run")


                    return
                else                                
                
say("Gemischtwarenhaendlerin:")
                
say("Diese Perle ist von schlechter Qualitaet!")
                
say("Es kann nicht verwendet werden.")
                
say("Hole mir eine neue!")
                
say("")
                
pc.setqf("drink_drug",0)     --?H??l??
                return
                
end
    end
end


        
    state __complete begin
    end
end 
da is ein fehler drin schätze mit den ends bitte korregieren
Quote:
problem weiterhin bestehend
HALLO HILFE PLS
06/01/2012 10:20 brachmann#5887
HI DarkNessWorld2 als erstes würde ich dir raten die Quest etwas übersichtlicher zu gestalten!
dann nochmal meine frage wo hast du sie hier?
ich hab einen fehler entdeckt in deinem ersten abschnitt

Quote:
when button or info begin
say_title("200 Kill Quest")
--- l
say("")
say("Gemischtwarenhaendlerin gab euch den Auftrag")
say("Möchtes du ihn annehmen?"
local s = select("Ja", "Nein")
if s==2 then
clearmapsignal()
complete_quest()
return
end
if s==1 then
say("Sie möchte das du:")
say("25 Hellgruene Perlen sammelst!")
say("Die Perle bekommt ihr von den Zombie Hunden.")
say("Viel Glueck!")
say("")
say_item_vnum(99004)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
if s==2 then
clearmapsignal()
complete_quest()
return
end
end
es fehle ein end wenn du die quest übersihtlicher schreibst fallen dir die fehler selber auf Gruß Hainz

Quote:
Originally Posted by Kriegergeist^^ View Post
Tag auch,

Habe kleine Quest (über 500 Zeilen ;)) geschrieben.
Aber sie will nicht so wie ich will.
Hier erst mal die Quest:
Wen ich bei "local a" "Ich möchte mir etwas Wunschen!" auswähle, schließt sich einfach das Fenster.
Wäre echt nett, wen einer mal rüber gucken würde und den Fehler behebt :handsdown:

MfG
Kriegergeist^^
Hi du hast mehrere "end" fehler! nach jedem if das du öffnenst würde ich dir raten das if nach return zu beenden! so wird sie auch übersichtlicher ;)
06/01/2012 14:23 [SA]Sibba / Christian#5888
Quote:
PHP Code:
quest exp begin 
    state start begin 
        when 101.kill begin 
            pc
.give_exp(100
            
chat("Test chat"
        
end 
    end 
end 
Probier es mal so

LG
Quote:
meine quest sollte funktionieren, ich hab lediglich nru eine if schleife benutzt
Ja ^^ nur soweit ich weiß gibt es kein pc.give_exp2() sondern nur pc.give_exp()^^ und ich denke ein if hier zu machen ist nicht die rätsels lösung
06/01/2012 14:38 Sp0ngeb0b ist cool#5889
1. Ne Schleife besitzt kein Ende --> Schleife = Wiederholung einer Funktion
--> man nennt es ganz bestimmt nicht "If schleife", da dies keine Schleife ist :facepalm:
2. es gibt pc.give_exp2()

3. die if abfrage ist unnötig & macht die Quest unfunktionstüchtig
--> If = falls/wenn :facepalm:
4. verwende mal statt when 101.kill begin
PHP Code:
when kill begin
if npc.get_race() == 101 then
pc
.give_exp2(100)
end
end 
06/01/2012 16:07 ~NwD~#5890
mit lvl 55 kriegt man keine questrolle, auch nicht nach nem relog

PHP Code:
quest FluchYakra begin     
    state start begin
        when login with pc
.get_level() >= 55 begin  
            send_letter
("Der Fluch der Familie Yakra")
            
set_state(weiter)
        
end
    end
        
    state weiter begin    
        when button 
or info begin
            say
("Fluch")
            
say("Es herrscht ein Fluch in unserer Familie.")
            
say("Wenn du uns helfen würdest wäre dies wirklich")
            
say("sehr nett.")
            
say("")
            
local helfen select ("Ja""Nein")
            if 
helfen == 2 then
                
return
            elseif 
helfen == 1 then
                say_title
("Super!")
                
say("In unserer Familie herrscht ein Fluch des Backenzahns.")
                
say("Was? Du weisst nicht wie das gemeint ist? Also..")
                
say("Unsere Backenzähne existieren nur eine bestimmte Zeit")
                
say("lang. Wir brauchen alle 3 Jahre ein implantat. Besuche den")
                
say("Biologen so schnell wie möglich!")
                
local v find_npc_by_vnum(20084)
                
target.vid("bio"v"finde den Biologen")
                
set_state(biologe)
            
end
        end
    end
        
    state biologe begin
        when 20084.chat begin
            target
.delete("bio")
            
say_title("Biologe")
            
say("Hi Abenteurer, was kann ich für dich tun?")
            
local tun select ("Fluch der Familie Yakra""Nichts")
            if 
tun == 2 then
                
return
            elseif 
tun == 1 then
                say_title
("Aha")
                
say("Die familie Yakra schickt dich?")
                
say("Ah es geht doch bestimmt um ihren Backenzahnfluch")
                
say("Also pc.get_name(), hör zu. Ich kann diese Implantate")
                
say("erstellen in dem ich Ork-Backenzähne verarbeite und")
                
say("poliere etc.")
                
say("Begebe dich ins Orktal und besorge mir 10 Ork-Backenzähne.")
                
set_state(zahn)
            
end
        end
    end
        
    state zahn begin
        when 20084.chat begin
            say_title
("Biologe")
            
say("Hi Abenteurer, was kann ich für dich tun?")
            
local tun select ("Fluch der Familie Yakra""Nichts")
            if 
tun == 2 then
                
return
            elseif 
tun == and pc.count_item(30139) < 10 then
                say_title
("Backenzahn")
                
say("So mal sehen ob du genug Backenzähne hast.")
                
say("Leider hast du nochnicht genug Backenzähne")
                
say("gesammelt. Kom wieder wenn du genug hast !")
                return
            elseif 
tun == and pc.count_item(30139) >= 10 then
                say_title
("Super!")
                
say("Du hast alle Zähne gesammelt.")
                
say("Hier deine Belohnung")
                
say_red("10.000.000 Yang")
                
say_red("Dauerhaft 5 Krit und 5 B")
                
pc.remove_item(3013910)
                
pc.give_gold(10000000)
                
set_state(__COMPLETE__)
            
end
        end
    end
    state __COMPLETE__ begin
    end
end 
06/01/2012 17:22 Ielinque#5891
Huhu ;) Ich bin da um für euch quests zu schreiben , einfach mich in skype bzw hier in epvp anschreiben und genauere details geben was genau die quest machen soll. Dauer 1h-24h
Ein kleines dankeschön wäre nett =D

#edit

Bzw. schreibt eure quest rein und ich versuche sie zu bearbeitem bzw zu koriegieren :D
06/01/2012 18:07 Kriegergeist^^#5892
Tag auch,

Habe kleine Quest (über 500 Zeilen ;)) geschrieben.
Aber sie will nicht so wie ich will.
Hier erst mal die Quest:
HTML Code:
quest wish_fountain begin
	state start begin		
		when 23003.click begin
		setbgimage('fortune_fountain_bg.tga')
			say_title("Am Wunschbrunnen")
			say_black("")
			say_black("Das ist der Legendäre Wunschbrunnen von Negaria!")
			say_black("Er bergt noch viele Geheimnisse in sich, die")
			say_black("wir Menschen nicht verstehen können.")
			say_reward("Was möchtest du am Wunschbrunnen machen?")
		local a = select("Verfallenes Schild lesen!","Ich möchte mir etwas Wunschen!","Abbrechen")
		if a == 3 then
			return
		elseif a == 1 then
		setbgimage('fortune_fountain_bg.tga')
			say_title("Verfallenes Schild")
			say_black("")
			say_black("Dieser Brunnen ist sehr alt, aber voller Magie!")
			say_black("Wen man Yang in den Brunnen wirft, gibt es")
			say_black("nach einer Zeit, eine kleine Chance etwas zu")
			say_black("bekommen, oder man wird von Monstern angegriffen.")
			say_black(". . . .")
			say_black("")
			say_title("".. pc.get_name() ..":")
			say_black("Wie Schade, der Rest des Schildes ist")
			say_black("nicht mehr lessbar.")
			say_black("Ich muss es wohl ausprobieren, um mehr")
			say_black("darüber zu erfahren.")
			return
		elseif a == 2 then
		if get_time() < pc.getqf("neuerwunsch") and pc.getqf("wunschan") == 0 then		
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Oh Gott, bist du überheblich.")
			say_black("Du kannst dir nur alle 6 Stunden was vom")
			say_black("Wunschbrunnen wünschen.")
			say_black("Habe noch etwas Gedult!")
			return
		elseif get_time() < pc.getqf("neuerwunsch") and get_time() < pc.getqf("wunschwarten") and pc.getqf("wunschan") >= 1 then	
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du guckst im Wunschbrunnen nach, ob dein Wunsch")
			say_black("in erfüllung gegangen ist.")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
			say_black("Es ist noch nichts Passiert.")
			say_black("Komm später wieder!")
			return
		elseif pc.getqf("wunschan") == 1 then	
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du guckst im Wunschbrunnen nach, ob dein Wunsch")
			say_black("in erfüllung gegangen ist.")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
			say_black("Es ist etwas passiert!")
			wait()
			pc.setqf("wunschan", 0)
		local wunschbelohnung1 = number(1, 100)
		if wunschbelohnung1 >= 1 and wunschbelohnung1 < 40 then
			chat("Dein Geld ist im Brunnen verloren gegangen!")
		elseif wunschbelohnung1 >= 41 and wunschbelohnung1 <= 50 then
			chat("Dein Geld hat sich im Brunnen verdoppelt!")
			pc.give_item2("80011", 1)
		elseif wunschbelohnung1 >= 51 and wunschbelohnung1 <= 75 then
			chat("Du hast Pech, es kommen Monster aus dem Brunnen!")
		local wunschbelohnung1mob = number(1, 5)
		if wunschbelohnung1mob == 1 then
			mob.spawn(101)
		elseif wunschbelohnung1mob == 2 then
			mob.spawn(101)
			mob.spawn(101)
		elseif wunschbelohnung1mob == 3 then
			mob.spawn(101)
			mob.spawn(101)
			mob.spawn(101)
		elseif wunschbelohnung1mob == 4 then
			mob.spawn(101)
			mob.spawn(101)
			mob.spawn(101)
			mob.spawn(101)
		elseif wunschbelohnung1mob == 5 then
			mob.spawn(101)
			mob.spawn(101)
			mob.spawn(101)
			mob.spawn(101)
			mob.spawn(101)
		elseif wunschbelohnung1 >= 76 and wunschbelohnung1 <= 95 then
			chat("Du hast Rangpunkte aus dem Brunnen bekommen.")
		local wunschbelohnung1rang = number(1, 5)
		if wunschbelohnung1rang == 1 then
			pc.change_alignment(5000)
		elseif wunschbelohnung1rang == 2 then
			pc.change_alignment(10000)
		elseif wunschbelohnung1rang == 3 then
			pc.change_alignment(15000)
		elseif wunschbelohnung1rang == 4 then
			pc.change_alignment(20000)
		elseif wunschbelohnung1rang == 5 then
			pc.change_alignment(25000)
		elseif wunschbelohnung1 >= 96 and wunschbelohnung1 <= 100 then
			chat("Du hast ein Item aus dem Brunnen bekommen.")
		local wunschbelohnung1item = number(1, 5)
		if wunschbelohnung1item == 1 then
			pc.give_item2("10", 1)
		elseif wunschbelohnung1item == 2 then
			pc.give_item2("11", 1)
		elseif wunschbelohnung1item == 3 then
			pc.give_item2("12", 1)
		elseif wunschbelohnung1item == 4 then
			pc.give_item2("13", 1)
		elseif wunschbelohnung1item == 5 then
			pc.give_item2("14", 1)
		end
		elseif pc.getqf("wunschan") == 2 then
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du guckst im Wunschbrunnen nach, ob dein Wunsch")
			say_black("in erfüllung gegangen ist.")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
			say_black("Es ist etwas passiert!")
			wait()
			pc.setqf("wunschan", 0)
		local wunschbelohnung2 = number(1, 100)
		if wunschbelohnung2 >= 1 and wunschbelohnung2 < 40 then
			chat("Dein Geld ist im Brunnen verloren gegangen!")
		elseif wunschbelohnung2 >= 41 and wunschbelohnung2 <= 50 then
			chat("Dein Geld hat sich im Brunnen verdoppelt!")
			pc.give_item2("80011", 2)
		elseif wunschbelohnung2 >= 51 and wunschbelohnung2 <= 75 then
			chat("Du hast Pech, es kommen Monster aus dem Brunnen!")
		local wunschbelohnung2mob = number(1, 5)
		if wunschbelohnung2mob == 1 then
			mob.spawn(102)
		elseif wunschbelohnung2mob == 2 then
			mob.spawn(102)
			mob.spawn(102)
		elseif wunschbelohnung2mob == 3 then
			mob.spawn(102)
			mob.spawn(102)
			mob.spawn(102)
		elseif wunschbelohnung2mob == 4 then
			mob.spawn(102)
			mob.spawn(102)
			mob.spawn(102)
			mob.spawn(102)
		elseif wunschbelohnung2mob == 5 then
			mob.spawn(102)
			mob.spawn(102)
			mob.spawn(102)
			mob.spawn(102)
			mob.spawn(102)
		elseif wunschbelohnung2 >= 76 and wunschbelohnung2 <= 95 then
			chat("Du hast Rangpunkte aus dem Brunnen bekommen.")
		local wunschbelohnung2rang = number(1, 5)
		if wunschbelohnung2rang == 1 then
			pc.change_alignment(10000)
		elseif wunschbelohnung2rang == 2 then
			pc.change_alignment(16000)
		elseif wunschbelohnung2rang == 3 then
			pc.change_alignment(22000)
		elseif wunschbelohnung2rang == 4 then
			pc.change_alignment(28000)
		elseif wunschbelohnung2rang == 5 then
			pc.change_alignment(35000)
		elseif wunschbelohnung2 >= 96 and wunschbelohnung2 <= 100 then
			chat("Du hast ein Item aus dem Brunnen bekommen.")
		local wunschbelohnung2item = number(1, 5)
		if wunschbelohnung2item == 1 then
			pc.give_item2("20", 1)
		elseif wunschbelohnung2item == 2 then
			pc.give_item2("21", 1)
		elseif wunschbelohnung2item == 3 then
			pc.give_item2("22", 1)
		elseif wunschbelohnung2item == 4 then
			pc.give_item2("23", 1)
		elseif wunschbelohnung2item == 5 then
			pc.give_item2("24", 1)
		end
		elseif pc.getqf("wunschan") == 3 then	
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du guckst im Wunschbrunnen nach, ob dein Wunsch")
			say_black("in erfüllung gegangen ist.")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
			say_black("Es ist etwas passiert!")
			wait()
			pc.setqf("wunschan", 0)
		local wunschbelohnung3 = number(1, 100)
		if wunschbelohnung3 >= 1 and wunschbelohnung3 < 40 then
			chat("Dein Geld ist im Brunnen verloren gegangen!")
		elseif wunschbelohnung3 >= 41 and wunschbelohnung3 <= 50 then
			chat("Dein Geld hat sich im Brunnen verdoppelt!")
			pc.give_item2("80012", 1)
		elseif wunschbelohnung3 >= 51 and wunschbelohnung3 <= 75 then
			chat("Du hast Pech, es kommen Monster aus dem Brunnen!")
		local wunschbelohnung3mob = number(1, 5)
		if wunschbelohnung3mob == 1 then
			mob.spawn(103)
		elseif wunschbelohnung3mob == 2 then
			mob.spawn(103)
			mob.spawn(103)
		elseif wunschbelohnung3mob == 3 then
			mob.spawn(103)
			mob.spawn(103)
			mob.spawn(103)
		elseif wunschbelohnung3mob == 4 then
			mob.spawn(103)
			mob.spawn(103)
			mob.spawn(103)
			mob.spawn(103)
		elseif wunschbelohnung3mob == 5 then
			mob.spawn(103)
			mob.spawn(103)
			mob.spawn(103)
			mob.spawn(103)
			mob.spawn(103)
		elseif wunschbelohnung3 >= 76 and wunschbelohnung3 <= 95 then
			chat("Du hast Rangpunkte aus dem Brunnen bekommen.")
		local wunschbelohnung3rang = number(1, 5)
		if wunschbelohnung3rang == 1 then
			pc.change_alignment(20000)
		elseif wunschbelohnung3rang == 2 then
			pc.change_alignment(25000)
		elseif wunschbelohnung3rang == 3 then
			pc.change_alignment(30000)
		elseif wunschbelohnung3rang == 4 then
			pc.change_alignment(35000)
		elseif wunschbelohnung3rang == 5 then
			pc.change_alignment(40000)
		elseif wunschbelohnung3 >= 96 and wunschbelohnung3 <= 100 then
			chat("Du hast ein Item aus dem Brunnen bekommen.")
		local wunschbelohnung3item = number(1, 5)
		if wunschbelohnung3item == 1 then
			pc.give_item2("30", 1)
		elseif wunschbelohnung3item == 2 then
			pc.give_item2("31", 1)
		elseif wunschbelohnung3item == 3 then
			pc.give_item2("32", 1)
		elseif wunschbelohnung3item == 4 then
			pc.give_item2("33", 1)
		elseif wunschbelohnung3item == 5 then
			pc.give_item2("34", 1)
		end
		elseif pc.getqf("wunschan") == 4 then	
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du guckst im Wunschbrunnen nach, ob dein Wunsch")
			say_black("in erfüllung gegangen ist.")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
			say_black("Es ist etwas passiert!")
			wait()
			pc.setqf("wunschan", 0)
		local wunschbelohnung4 = number(1, 100)
		if wunschbelohnung4 >= 1 and wunschbelohnung4 < 40 then
			chat("Dein Geld ist im Brunnen verloren gegangen!")
		elseif wunschbelohnung4 >= 41 and wunschbelohnung4 <= 50 then
			chat("Dein Geld hat sich im Brunnen verdoppelt!")
			pc.give_item2("80012", 2)
		elseif wunschbelohnung4 >= 51 and wunschbelohnung4 <= 75 then
			chat("Du hast Pech, es kommen Monster aus dem Brunnen!")
		local wunschbelohnung4mob = number(1, 5)
		if wunschbelohnung4mob == 1 then
			mob.spawn(104)
		elseif wunschbelohnung4mob == 2 then
			mob.spawn(104)
			mob.spawn(104)
		elseif wunschbelohnung4mob == 3 then
			mob.spawn(104)
			mob.spawn(104)
			mob.spawn(104)
		elseif wunschbelohnung4mob == 4 then
			mob.spawn(104)
			mob.spawn(104)
			mob.spawn(104)
			mob.spawn(104)
		elseif wunschbelohnung4mob == 5 then
			mob.spawn(104)
			mob.spawn(104)
			mob.spawn(104)
			mob.spawn(104)
			mob.spawn(104)
		elseif wunschbelohnung4 >= 76 and wunschbelohnung4 <= 95 then
			chat("Du hast Rangpunkte aus dem Brunnen bekommen.")
		local wunschbelohnung4rang = number(1, 5)
		if wunschbelohnung4rang == 1 then
			pc.change_alignment(15000)
		elseif wunschbelohnung4rang == 2 then
			pc.change_alignment(20000)
		elseif wunschbelohnung4rang == 3 then
			pc.change_alignment(30000)
		elseif wunschbelohnung4rang == 4 then
			pc.change_alignment(40000)
		elseif wunschbelohnung4rang == 5 then
			pc.change_alignment(50000)
		elseif wunschbelohnung4 >= 96 and wunschbelohnung4 <= 100 then
			chat("Du hast ein Item aus dem Brunnen bekommen.")
		local wunschbelohnung4item = number(1, 5)
		if wunschbelohnung4item == 1 then
			pc.give_item2("40", 1)
		elseif wunschbelohnung4item == 2 then
			pc.give_item2("41", 1)
		elseif wunschbelohnung4item == 3 then
			pc.give_item2("42", 1)
		elseif wunschbelohnung4item == 4 then
			pc.give_item2("43", 1)
		elseif wunschbelohnung4item == 5 then
			pc.give_item2("44", 1)
		end
		else
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du willst dir was vom Wunschbrunnen wünschen?")
			say_black("Wirf zunächst etwas Yang in den Brunnen und")
			say_black("schließe deine Auchen für paar Sekunden!")
			say_black("")
			say_reward("Wie viel Yang möchtest du in den Brunnen werfen?")
		local b = select("50.000.000 Yang","100.000.000 Yang","250.000.000 Yang","500.000.000 Yang","Abbrechen")
		if b == 5 then
			return
		elseif b == 1 then
		if pc.get_gold() <= 49999999 then
		setbgimage('fortune_fountain_bg.tga')
			say_title("".. pc.get_name() .."")
			say_black("")
			say_black("Wie schade, ich habe nicht genügent Yang")
			say_black("bei mir.")
			say_black("Dann muss ich das wan anders Probieren.")
			return
		else
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du schließt deine Augen für paar Sekunden!")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
		local wunschwarten1 = number(1, 5)
		if wunschwarten1 == 1 then
			say_black("Du musst in 1 Stunde wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschan", 1)
			pc.setqf("wunschwarten", get_time() + 60*60*1)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.change_gold(-50000000)
			return
		elseif wunschwarten1 == 2 then
			say_black("Du musst in 2 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*2)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 1)
			pc.change_gold(-50000000)
			return
		elseif wunschwarten1 == 3 then
			say_black("Du musst in 3 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*3)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 1)
			pc.change_gold(-50000000)
			return
		elseif wunschwarten1 == 4 then
			say_black("Du musst in 4 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*4)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 1)
			pc.change_gold(-50000000)
			return
		elseif wunschwarten1 == 5 then
			say_black("Du musst in 5 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*5)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 1)
			pc.change_gold(-50000000)
			return
		elseif b == 2 then
		if pc.get_gold() <= 99999999 then
		setbgimage('fortune_fountain_bg.tga')
			say_title("".. pc.get_name() .."")
			say_black("")
			say_black("Wie schade, ich habe nicht genügent Yang")
			say_black("bei mir.")
			say_black("Dann muss ich das wan anders Probieren.")
			return
		else
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du schließt deine Augen für paar Sekunden!")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
		local wunschwarten2 = number(1, 5)
		if wunschwarten2 == 1 then
			say_black("Du musst in 1 Stunde wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*1)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 2)
			pc.change_gold(-100000000)
			return
		elseif wunschwarten2 == 2 then
			say_black("Du musst in 2 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*2)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 2)
			pc.change_gold(-100000000)
			return
		elseif wunschwarten2 == 3 then
			say_black("Du musst in 3 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*3)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 2)
			pc.change_gold(-100000000)
			return
		elseif wunschwarten2 == 4 then
			say_black("Du musst in 4 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*4)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 2)
			pc.change_gold(-100000000)
			return
		elseif wunschwarten2 == 5 then
			say_black("Du musst in 5 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*5)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 2)
			pc.change_gold(-100000000)
			return
		elseif b == 3 then
		if pc.get_gold() <= 249999999 then
		setbgimage('fortune_fountain_bg.tga')
			say_title("".. pc.get_name() .."")
			say_black("")
			say_black("Wie schade, ich habe nicht genügent Yang")
			say_black("bei mir.")
			say_black("Dann muss ich das wan anders Probieren.")
			return
		else
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du schließt deine Augen für paar Sekunden!")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
		local wunschwarten3 = number(1, 5)
		if wunschwarten3 == 1 then
			say_black("Du musst in 1 Stunde wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*1)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 3)
			pc.change_gold(-250000000)
			return
		elseif wunschwarten3 == 2 then
			say_black("Du musst in 2 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*2)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 3)
			pc.change_gold(-250000000)
			return
		elseif wunschwarten3 == 3 then
			say_black("Du musst in 3 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*3)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 3)
			pc.change_gold(-250000000)
			return
		elseif wunschwarten3 == 4 then
			say_black("Du musst in 4 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*4)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 3)
			pc.change_gold(-250000000)
			return
		elseif wunschwarten3 == 5 then
			say_black("Du musst in 5 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*5)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 3)
			pc.change_gold(-250000000)
			return
		elseif b == 4 then
		if pc.get_gold() <= 499999999 then
		setbgimage('fortune_fountain_bg.tga')
			say_title("".. pc.get_name() .."")
			say_black("")
			say_black("Wie schade, ich habe nicht genügent Yang")
			say_black("bei mir.")
			say_black("Dann muss ich das wan anders Probieren.")
			return
		else
		setbgimage('fortune_fountain_bg.tga')
			say_title("Der Wunsch")
			say_black("")
			say_black("Du schließt deine Augen für paar Sekunden!")
			say_black("[DELAY value;500]. . . . .[/DELAY]")
		local wunschwarten4 = number(1, 5)
		if wunschwarten4 == 1 then
			say_black("Du musst in 1 Stunde wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*1)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 4)
			pc.change_gold(-500000000)
			return
		elseif wunschwarten4 == 2 then
			say_black("Du musst in 2 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*2)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 4)
			pc.change_gold(-500000000)
			return
		elseif wunschwarten4 == 3 then
			say_black("Du musst in 3 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*3)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 4)
			pc.change_gold(-500000000)
			return
		elseif wunschwarten4 == 4 then
			say_black("Du musst in 4 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*4)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 4)
			pc.change_gold(-500000000)
			return
		elseif wunschwarten4 == 5 then
			say_black("Du musst in 5 Stunden wieder kommen, um")
			say_black("nach deinen Wunsch zu gucken!")
			pc.setqf("wunschwarten", get_time() + 60*60*5)
			pc.setqf("neuerwunsch", get_time() + 60*60*6)
			pc.setqf("wunschan", 4)
			pc.change_gold(-500000000)
			return
									end
									end
									end
								end
								end
								end
							end
							end
							end
						end
						end
						end
					end
					end
					end
				end
				end
				end
			end
			end
			end
		end
		end
		end
	end
end
Wen ich bei "local a" "Ich möchte mir etwas Wunschen!" auswähle, schließt sich einfach das Fenster. Ich glaube ich habe paar ends falsch gesetzt.
Wäre echt nett, wen einer mal rüber gucken würde und den Fehler behebt :handsdown:

MfG
Kriegergeist^^
06/01/2012 18:20 Ielinque#5893
Kommt da ein fehler bei Virtual Box beziehungsweise Virtual Pc?
06/01/2012 18:23 Kriegergeist^^#5894
es kommt kein fehler beim ausführen bei make
Bloß wen ich "Ich möchte mir etwas Wunschen!" auswähle, schließt sich das Fenster

MfG
Kriegergeist^^
06/01/2012 18:27 Ielinque#5895
Hast du nicht am ende zu viele "END"´s gemacht?
Bzw. mit welchem questschreiber haste das geschrieben?