[SERVICE] Die Questkontrolle

Page 570 of 845 « First 70470520560568569 570 571572580620670 Last »
07/12/2013 19:41 .LuckyStrike#8536
Quote:
Originally Posted by .Lowbob View Post
PHP Code:
quest pvm_quest begin
    state start begin
        when login or levelup wit pc.get_level() >= 85 begin
            set_state(information)
        end
    end
    state information begin
        when letter begin
            send letter("Töte Bosse")
        end
        when button or info begin
            say_title("Töte Bosse")
            say("Hallo Abenteurer,")
            say("Du hast, wie es aussieht, nun die Stärke")
            say("ein paar Bosse zu Töten, um deine Stärke zu")
            say("beweisen. Töte 5x den Wasserdrachen, und du")
            say("wirst kräftig belohnt.")
            say_reward("Möchtest du die herrausforderung annehmen?")
            local s = select("Ja", "Nein")
            if s == 2 then
                        say("Okay, schade.")
                        clear_letter()
                        set_state (aufgeben)
            else
                say("Viel Glück!")
                say_reward("Töte 5 x Wasserdrache")
                pc.setqf("state1", 0)
                q.set_counter("Wasserdrache", 5)
                set_state(kill)
                end
            end
        end
    end
        
        state kill begin
            when letter begin
                send_letter("Töte Bosse")
            end
            
            when info or button begin
                say_title("Töte Bosse")
                say_reward("Du hast "..pc.getqf("state1").." von 5 Wasserdrachenn getötet.")
            end
            
            when 2493.kill begin
                local count1 = pc.getqf("state1") + 1
                if count <= 5 then
                    pc.setqf("state1", count1)
                    q.set_counter("Wasserdrache", count1)
                end
                if count1 == 5 then
                set_state(fertig)
                end
            end
        end
            
            state fertig begin
                when letter begin
                    send_letter("Töte Bosse Abgeschlossen")
                end
                
                when info or button begin
                    say_title("Aufgabe abgeschlossen!")
                    say("Du hast 5 x Wasserdrache getötet!")
                    say("Welche Belohung möchtest du wählen?")
                    local s=select("10% gegen Monster","5% Durchbohren")
                    if s== 1 then
                        say_reward("Du has 10% Stärke gegen Monster bekommen.")
                        affect.add_collect(apply.ATT_BONUS_TO_MONSTER,5,60*60*24*365*60) -----¡V60¦~
                    else
                        say_reward("Du hast 5% Durchbohrender Treffer Bonus erhalten.")
                        affect.add_collect(apply.PENETRATE_PCT,5,60*60*24*365*60) -----¡V60¦~
                    end
                end
            end
            
            state aufgeben begin
            end
        end
    end
end 

Danke, aber immer noch der selbe Fehler...
07/12/2013 19:44 Scarified#8537
#PUSH
Quote:
Da kommt
Quote:
syntax error : [string "start"]:13: unexpected symbol near 'when'
pet_city.quest:284:Error occured on compile pet_city.quest
07/12/2013 19:59 .Lowbob#8538
Quote:
Originally Posted by .LuckyStrike View Post
Danke, aber immer noch der selbe Fehler...
PHP Code:
quest pvm_quest begin
    state start begin
        when login or levelup wit pc.get_level() >= 85 begin
            set_state(information)
        end
    end
    state information begin
        when letter begin
            send_letter("Töte Bosse")
        end
        when button or info begin
            say_title("Töte Bosse")
            say("Hallo Abenteurer,")
            say("Du hast, wie es aussieht, nun die Stärke")
            say("ein paar Bosse zu Töten, um deine Stärke zu")
            say("beweisen. Töte 5x den Wasserdrachen, und du")
            say("wirst kräftig belohnt.")
            say_reward("Möchtest du die herrausforderung annehmen?")
            local s = select("Ja", "Nein")
            if s == 2 then
                        say("Okay, schade.")
                        clear_letter()
                        set_state (aufgeben)
            else
                say("Viel Glück!")
                say_reward("Töte 5 x Wasserdrache")
                pc.setqf("state1", 0)
                q.set_counter("Wasserdrache", 5)
                set_state(kill)
                end
            end
        end
    end
        
        state kill begin
            when letter begin
                send_letter("Töte Bosse")
            end
            
            when info or button begin
                say_title("Töte Bosse")
                say_reward("Du hast "..pc.getqf("state1").." von 5 Wasserdrachenn getötet.")
            end
            
            when 2493.kill begin
                local count1 = pc.getqf("state1") + 1
                if count <= 5 then
                    pc.setqf("state1", count1)
                    q.set_counter("Wasserdrache", count1)
                end
                if count1 == 5 then
                set_state(fertig)
                end
            end
        end
            
            state fertig begin
                when letter begin
                    send_letter("Töte Bosse Abgeschlossen")
                end
                
                when info or button begin
                    say_title("Aufgabe abgeschlossen!")
                    say("Du hast 5 x Wasserdrache getötet!")
                    say("Welche Belohung möchtest du wählen?")
                    local s=select("10% gegen Monster","5% Durchbohren")
                    if s== 1 then
                        say_reward("Du has 10% Stärke gegen Monster bekommen.")
                        affect.add_collect(apply.ATT_BONUS_TO_MONSTER,5,60*60*24*365*60) -----¡V60¦~
                    else
                        say_reward("Du hast 5% Durchbohrender Treffer Bonus erhalten.")
                        affect.add_collect(apply.PENETRATE_PCT,5,60*60*24*365*60) -----¡V60¦~
                    end
                end
            end
            
            state aufgeben begin
            end
        end
    end
end 
07/12/2013 20:11 .LuckyStrike#8539
Quote:
Originally Posted by .Lowbob View Post
PHP Code:
quest pvm_quest begin
    state start begin
        when login or levelup wit pc.get_level() >= 85 begin
            set_state(information)
        end
    end
    state information begin
        when letter begin
            send_letter("Töte Bosse")
        end
        when button or info begin
            say_title("Töte Bosse")
            say("Hallo Abenteurer,")
            say("Du hast, wie es aussieht, nun die Stärke")
            say("ein paar Bosse zu Töten, um deine Stärke zu")
            say("beweisen. Töte 5x den Wasserdrachen, und du")
            say("wirst kräftig belohnt.")
            say_reward("Möchtest du die herrausforderung annehmen?")
            local s = select("Ja", "Nein")
            if s == 2 then
                        say("Okay, schade.")
                        clear_letter()
                        set_state (aufgeben)
            else
                say("Viel Glück!")
                say_reward("Töte 5 x Wasserdrache")
                pc.setqf("state1", 0)
                q.set_counter("Wasserdrache", 5)
                set_state(kill)
                end
            end
        end
    end
        
        state kill begin
            when letter begin
                send_letter("Töte Bosse")
            end
            
            when info or button begin
                say_title("Töte Bosse")
                say_reward("Du hast "..pc.getqf("state1").." von 5 Wasserdrachenn getötet.")
            end
            
            when 2493.kill begin
                local count1 = pc.getqf("state1") + 1
                if count <= 5 then
                    pc.setqf("state1", count1)
                    q.set_counter("Wasserdrache", count1)
                end
                if count1 == 5 then
                set_state(fertig)
                end
            end
        end
            
            state fertig begin
                when letter begin
                    send_letter("Töte Bosse Abgeschlossen")
                end
                
                when info or button begin
                    say_title("Aufgabe abgeschlossen!")
                    say("Du hast 5 x Wasserdrache getötet!")
                    say("Welche Belohung möchtest du wählen?")
                    local s=select("10% gegen Monster","5% Durchbohren")
                    if s== 1 then
                        say_reward("Du has 10% Stärke gegen Monster bekommen.")
                        affect.add_collect(apply.ATT_BONUS_TO_MONSTER,5,60*60*24*365*60) -----¡V60¦~
                    else
                        say_reward("Du hast 5% Durchbohrender Treffer Bonus erhalten.")
                        affect.add_collect(apply.PENETRATE_PCT,5,60*60*24*365*60) -----¡V60¦~
                    end
                end
            end
            
            state aufgeben begin
            end
        end
    end
end 

Immer noch.. xD
07/12/2013 20:14 ProfessorEnte#8540
Quote:
Originally Posted by Scarified View Post
#PUSH
Hat es ein besonderen Grund, dass du die Sachen nicht durch die entsprechenden Sachen ersetzt, die gefragt sind in deiner Quest?

Als Beispiel:
...
PHP Code:
                    pc.change_money(ZAHL) 
                    pc.give_exp2(ZAHL) 
                    pc.give_item2(ITEMID, 1) 
...

Mfg,
ProfessorEnte

Quote:
Originally Posted by .LuckyStrike View Post
Immer noch.. xD
Bittesehr, ohne Error:

PHP Code:
quest pvm_quest begin
    state start begin
        when login or levelup with pc.get_level() >= 85 begin
            set_state(information)
        end
    end
    state information begin
        when letter begin
            send_letter("Töte Bosse")
        end
        when button or info begin
            say_title("Töte Bosse")
            say("Hallo Abenteurer,")
            say("Du hast, wie es aussieht, nun die Stärke")
            say("ein paar Bosse zu Töten, um deine Stärke zu")
            say("beweisen. Töte 5x den Wasserdrachen, und du")
            say("wirst kräftig belohnt.")
            say_reward("Möchtest du die herrausforderung annehmen?")
            local s = select("Ja", "Nein")
            if s == 2 then
                say("Okay, schade.")
                clear_letter()
                set_state (aufgeben)
            else
                say("Viel Glück!")
                say_reward("Töte 5 x Wasserdrache")
                pc.setqf("state1", 0)
                q.set_counter("Wasserdrache", 5)
                set_state(kill)
            end
        end
    end
        
    state kill begin
        when letter begin
            send_letter("Töte Bosse")
        end
        
        when info or button begin
            say_title("Töte Bosse")
            say_reward("Du hast "..pc.getqf("state1").." von 5 Wasserdrachenn getötet.")
        end
        
        when 2493.kill begin
            local count1 = pc.getqf("state1") + 1
            if count <= 5 then
                pc.setqf("state1", count1)
                q.set_counter("Wasserdrache", count1)
            end
            if count1 == 5 then
            set_state(fertig)
            end
        end
    end
            
    state fertig begin
        when letter begin
            send_letter("Töte Bosse Abgeschlossen")
        end
        
        when info or button begin
            say_title("Aufgabe abgeschlossen!")
            say("Du hast 5 x Wasserdrache getötet!")
            say("Welche Belohung möchtest du wählen?")
            local s=select("10% gegen Monster","5% Durchbohren")
            if s== 1 then
                say_reward("Du has 10% Stärke gegen Monster bekommen.")
                affect.add_collect(apply.ATT_BONUS_TO_MONSTER,5,60*60*24*365*60) -----¡V60¦~
            else
                say_reward("Du hast 5% Durchbohrender Treffer Bonus erhalten.")
                affect.add_collect(apply.PENETRATE_PCT,5,60*60*24*365*60) -----¡V60¦~
            end
        end
    end
            
    state aufgeben begin
    end
end 
Mfg,
ProfessorEnte
07/12/2013 20:22 Scarified#8541
Quote:
Hat es ein besonderen Grund, dass du die Sachen nicht durch die entsprechenden Sachen ersetzt, die gefragt sind in deiner Quest?
Ja weil ich erstmal die Quest zum laufen bringen will und ich noch nicht mal weiß was ich genau als Belohnung geben will
07/12/2013 20:49 ProfessorEnte#8542
Quote:
Originally Posted by Scarified View Post
Ja weil ich erstmal die Quest zum laufen bringen will und ich noch nicht mal weiß was ich genau als Belohnung geben will
Sorry aber diese Quest ist der Horror.
Du hast die nur zusammenkopiert oder? :D

Hab mal den groeßten Teil verbessert, einige end Fehler und ein zwei Klammern fehlten glaube.

Du kannst außerdem nicht 100x den gleichen state machen wie z.b.:
go_to_disciple

bei set_state(go_to_disciple) weiß es doch garnicht zu welchem state es jetzt eigentlich hineiern soll.

Das musst du selber mal verbessern, das ist mir zuviel Arbeit und Hirnkrebs.
Ich glaube nicht das die Quest so funktioniert wie du sie geschrieben hast, die solltest du nochmal gruendlich ueberarbeiten. :P

Nun hier der verbesserte Teil, denk dran ich hab nur die end fehler ausgemerzt. An den Funktionen und den state Fehlern hab ich nichts geandert. Es wird also mit Sicherheit noch immer ein Error ausgegeben beim compilen.

Quest:

Viel Glueck!

Mfg,
ProfessorEnte
07/12/2013 21:11 .LuckyStrike#8543
Jow, schon wieder ne Quest :D

PHP Code:
quest pvp_quest begin 
    state start begin 
        when login or levelup with pc.get_level() >= 85 begin 
            set_state(player_kill1) 
        end 
    end 
    
    state player_kill1 begin 
        when letter begin 
            send_letter("PvP Quest") 
        end 
        
        when button or info begin 
            say("Du hast Level 85 erreicht, nun musst du dich beweisen")
            say("indem du 100 Spieler aus einen anderen Rech tötest.")
            say_reward("Töte 100 Spieler aus einen anderen Reich.")
            say("")
            pc.setqf("state", 100)
            q.set_counter("Kills", 100)
            set_state(kill)
        end
    end
    
    state kill begin
        when letter begin
            send_letter("PvP Quest")
        end
        
        when button or info begin
            say_title("Status:")
            say_reward("Du hast "..pc.getqf("state").." von 100 getötet.")
            say("")
        end
        
        when kill begin
            if npc.is_pc() and npc.empire != pc.empire then
                                local count = pc.getqf("state") - 1
                                if count <= 100 then
                                        pc.setqf("state", -count)
                                end
                                if count == 0 then
                                        say("Sehr schön, du hast dich bewiesen und")
                                        say("100 Spieler aus einen anderen Reich getötet.")
                                        say("")
                                        say("Für deine Anstrengungen sollst du nun auch
                                        say("natürlich belohnt werden.")
                                        say_reward("Wähle den Preis:")
                                        local s = select("1.000TP","20% Habmenschen")
                                        if s == 1 then
                                            affect.add_collect(apply.MAX_HP,1000,60*60*24*365*60)
                                            notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                                            notice_all("und somit die PvP Quest Abgeschlossen.")
                                        end
                                        if s == 2 then
                                            affect.add_collect(apply.ATTBONUS_HUMAN,20,60*60*24*365*60)
                                            notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                                            notice_all("und somit die PvP Quest Abgeschlossen.")
                                        end
                                end
            end
        end
            
            clear_letter()
            set_state(__COMPLETE__)
    end
    
    state __COMPLETE__
    end
end 


LG :D
07/12/2013 21:14 Scarified#8544
Ich bin nicht der größte Quester, geschweige denn würde ich mich nie Quester nennen. :b
Ich habs halt mal probiert wie du schon sagtest einfach die Quests aneinander kopiert und dachte es funktioniert. :D

Aber danke für deine Hilfe. :)
07/12/2013 21:21 ProfessorEnte#8545
Quote:
Originally Posted by .LuckyStrike View Post
Jow, schon wieder ne Quest :D

PHP Code:
quest pvp_quest begin 
    state start begin 
        when login or levelup with pc.get_level() >= 85 begin 
            set_state(player_kill1) 
        end 
    end 
    
    state player_kill1 begin 
        when letter begin 
            send_letter("PvP Quest") 
        end 
        
        when button or info begin 
            say("Du hast Level 85 erreicht, nun musst du dich beweisen")
            say("indem du 100 Spieler aus einen anderen Rech tötest.")
            say_reward("Töte 100 Spieler aus einen anderen Reich.")
            say("")
            pc.setqf("state", 100)
            q.set_counter("Kills", 100)
            set_state(kill)
        end
    end
    
    state kill begin
        when letter begin
            send_letter("PvP Quest")
        end
        
        when button or info begin
            say_title("Status:")
            say_reward("Du hast "..pc.getqf("state").." von 100 getötet.")
            say("")
        end
        
        when kill begin
            if npc.is_pc() and npc.empire != pc.empire then
                                local count = pc.getqf("state") - 1
                                if count <= 100 then
                                        pc.setqf("state", -count)
                                end
                                if count == 0 then
                                        say("Sehr schön, du hast dich bewiesen und")
                                        say("100 Spieler aus einen anderen Reich getötet.")
                                        say("")
                                        say("Für deine Anstrengungen sollst du nun auch
                                        say("natürlich belohnt werden.")
                                        say_reward("Wähle den Preis:")
                                        local s = select("1.000TP","20% Habmenschen")
                                        if s == 1 then
                                            affect.add_collect(apply.MAX_HP,1000,60*60*24*365*60)
                                            notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                                            notice_all("und somit die PvP Quest Abgeschlossen.")
                                        end
                                        if s == 2 then
                                            affect.add_collect(apply.ATTBONUS_HUMAN,20,60*60*24*365*60)
                                            notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                                            notice_all("und somit die PvP Quest Abgeschlossen.")
                                        end
                                end
            end
        end
            
            clear_letter()
            set_state(__COMPLETE__)
    end
    
    state __COMPLETE__
    end
end 


LG :D
PHP Code:
quest pvp_quest begin 
    state start begin 
        when login or levelup with pc.get_level() >= 85 begin 
            set_state(player_kill1) 
        end 
    end 
    
    state player_kill1 begin 
        when letter begin 
            send_letter("PvP Quest") 
        end 
        when button or info begin 
            say("Du hast Level 85 erreicht, nun musst du dich beweisen")
            say("indem du 100 Spieler aus einen anderen Rech tötest.")
            say_reward("Töte 100 Spieler aus einen anderen Reich.")
            say("")
            pc.setqf("state", 100)
            q.set_counter("Kills", 100)
            set_state(kill)
        end
    end
    
    state kill begin
        when letter begin
            send_letter("PvP Quest")
        end
        
        when button or info begin
            say_title("Status:")
            say_reward("Du hast "..pc.getqf("state").." von 100 getötet.")
            say("")
        end
        
        when kill begin
            if npc.is_pc() and npc.empire != pc.empire then
                local count = pc.getqf("state") - 1
                if count <= 100 then
                    pc.setqf("state", -count)
                end
                if count == 0 then
                    say("Sehr schön, du hast dich bewiesen und")
                    say("100 Spieler aus einen anderen Reich getötet.")
                    say("")
                    say("Für deine Anstrengungen sollst du nun auch")
                    say("natürlich belohnt werden.")
                    say_reward("Wähle den Preis:")
                    local s = select("1.000TP","20% Habmenschen")
                    if s == 1 then
                        affect.add_collect(apply.MAX_HP,1000,60*60*24*365*60)
                        notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                        notice_all("und somit die PvP Quest Abgeschlossen.")
                    end
                    if s == 2 then
                        affect.add_collect(apply.ATTBONUS_HUMAN,20,60*60*24*365*60)
                        notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                        notice_all("und somit die PvP Quest Abgeschlossen.")
                    end
                end
            end
            clear_letter()
            set_state(__COMPLETE__)
        end
    end
    
    state __COMPLETE__ begin
    end
end 
Fehler:
begin
end
und bei say vergessen -> ")

Mfg,
ProfessorEnte
07/12/2013 21:26 .LuckyStrike#8546
Quote:
Originally Posted by ProfessorEnte View Post
PHP Code:
quest pvp_quest begin 
    state start begin 
        when login or levelup with pc.get_level() >= 85 begin 
            set_state(player_kill1) 
        end 
    end 
    
    state player_kill1 begin 
        when letter begin 
            send_letter("PvP Quest") 
        end 
        when button or info begin 
            say("Du hast Level 85 erreicht, nun musst du dich beweisen")
            say("indem du 100 Spieler aus einen anderen Rech tötest.")
            say_reward("Töte 100 Spieler aus einen anderen Reich.")
            say("")
            pc.setqf("state", 100)
            q.set_counter("Kills", 100)
            set_state(kill)
        end
    end
    
    state kill begin
        when letter begin
            send_letter("PvP Quest")
        end
        
        when button or info begin
            say_title("Status:")
            say_reward("Du hast "..pc.getqf("state").." von 100 getötet.")
            say("")
        end
        
        when kill begin
            if npc.is_pc() and npc.empire != pc.empire then
                local count = pc.getqf("state") - 1
                if count <= 100 then
                    pc.setqf("state", -count)
                end
                if count == 0 then
                    say("Sehr schön, du hast dich bewiesen und")
                    say("100 Spieler aus einen anderen Reich getötet.")
                    say("")
                    say("Für deine Anstrengungen sollst du nun auch")
                    say("natürlich belohnt werden.")
                    say_reward("Wähle den Preis:")
                    local s = select("1.000TP","20% Habmenschen")
                    if s == 1 then
                        affect.add_collect(apply.MAX_HP,1000,60*60*24*365*60)
                        notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                        notice_all("und somit die PvP Quest Abgeschlossen.")
                    end
                    if s == 2 then
                        affect.add_collect(apply.ATTBONUS_HUMAN,20,60*60*24*365*60)
                        notice_all(" "..pc.get_name().." hat soeben 100 Spieler getötet")
                        notice_all("und somit die PvP Quest Abgeschlossen.")
                    end
                end
            end
            clear_letter()
            set_state(__COMPLETE__)
        end
    end
    
    state __COMPLETE__ begin
    end
end 
Fehler:
begin
end
und bei say vergessen -> ")

Mfg,
ProfessorEnte

Wow, danke, sachen die ich glaube ich nie finden würde.
Könntest du mich vllt. in Skype adden und mir das Questen bisschen näher bringen?
07/12/2013 22:45 ◄ XxWeeDxX ►#8547
Code:
quest questlvl70 begin
    state start begin
       when levelup with pc.get_level() == 70 begin                            
           send_letter("Adelige Botschaft #1") 
            say("") 
            say("") 
            say("Es wird gemunkelt, dass sich in manchen") 
            say("gebieten Ungeheuer herum treiben auf die") 
            say("ein sehr hohes Kopfgeld ausgesetzt wurde.") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("5x Flammenkönig") 
            say_reward("Du findest ihn im Feuerland.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 5) 
            q.set_counter("Flammenkönig", 5) 
        end 
         when 2206.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 5 then 
                pc.setqf("state", count) 
                q.set_counter("Flammenkönig", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!")
                say("Das Volk von Krypton bedankt sich.")  
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                 
                clear_letter() 
                set_state(fertig) 

            end 
        end
    state fertig begin 
    end 
end
was da los :/
questlvl70.quest:1:Error occured on compile questlvl70.quest
07/12/2013 22:52 ProfessorEnte#8548
Quote:
Originally Posted by ◄ XxWeeDxX ► View Post
Code:
quest questlvl70 begin
    state start begin
       when levelup with pc.get_level() == 70 begin                            
           send_letter("Adelige Botschaft #1") 
            say("") 
            say("") 
            say("Es wird gemunkelt, dass sich in manchen") 
            say("gebieten Ungeheuer herum treiben auf die") 
            say("ein sehr hohes Kopfgeld ausgesetzt wurde.") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("5x Flammenkönig") 
            say_reward("Du findest ihn im Feuerland.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 5) 
            q.set_counter("Flammenkönig", 5) 
        end 
         when 2206.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 5 then 
                pc.setqf("state", count) 
                q.set_counter("Flammenkönig", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!")
                say("Das Volk von Krypton bedankt sich.")  
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                 
                clear_letter() 
                set_state(fertig) 

            end 
        end
    state fertig begin 
    end 
end
was da los :/
questlvl70.quest:1:Error occured on compile questlvl70.quest
Schlimmes ist da los, ein end fehlt! :o

PHP Code:
quest questlvl70 begin
    state start begin
        when levelup with pc.get_level() == 70 begin                            
            send_letter("Adelige Botschaft #1") 
            say("") 
            say("") 
            say("Es wird gemunkelt, dass sich in manchen") 
            say("gebieten Ungeheuer herum treiben auf die") 
            say("ein sehr hohes Kopfgeld ausgesetzt wurde.") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("5x Flammenkönig") 
            say_reward("Du findest ihn im Feuerland.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 5) 
            q.set_counter("Flammenkönig", 5) 
        end 
        when 2206.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 5 then 
                pc.setqf("state", count) 
                q.set_counter("Flammenkönig", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!")
                say("Das Volk von Krypton bedankt sich.")  
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                 
                clear_letter() 
                set_state(fertig) 

            end 
        end
    end
    state fertig begin 
    end 
end 
07/12/2013 22:55 ◄ XxWeeDxX ►#8549
Quote:
Originally Posted by ProfessorEnte View Post
Schlimmes ist da los, ein end fehlt! :o

PHP Code:
quest questlvl70 begin
    state start begin
        when levelup with pc.get_level() == 70 begin                            
            send_letter("Adelige Botschaft #1") 
            say("") 
            say("") 
            say("Es wird gemunkelt, dass sich in manchen") 
            say("gebieten Ungeheuer herum treiben auf die") 
            say("ein sehr hohes Kopfgeld ausgesetzt wurde.") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("5x Flammenkönig") 
            say_reward("Du findest ihn im Feuerland.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 5) 
            q.set_counter("Flammenkönig", 5) 
        end 
        when 2206.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 5 then 
                pc.setqf("state", count) 
                q.set_counter("Flammenkönig", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!")
                say("Das Volk von Krypton bedankt sich.")  
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                 
                clear_letter() 
                set_state(fertig) 

            end 
        end
    end
    state fertig begin 
    end 
end 
danke ;)

Code:
quest questkomplett begin 
    state start begin 
        when levelup with pc.get_level() == 69 begin                             
            say_title("Adelige Botschaft #1")
            say("")  
            say("")  
            say("Es wird gemunkelt, dass sich in manchen")  
            say("gebieten Ungeheuer herum treiben auf die")  
            say("ein sehr hohes Kopfgeld ausgesetzt wurde.")  
            say("Folgendes Ungeheuer wird gesucht:")  
            say_reward("5x Flammenkönig")  
            say_reward("Du findest ihn im Feuerland.")  
            say_reward("")  
            say_reward("")  
            say("")  
            pc.setqf("state", 5)  
            q.set_counter("Flammenkönig", 5)  
        end  
        when 2206.kill begin  
            local count = pc.getqf("state") - 1  
            if count <= 5 then  
                pc.setqf("state", count)  
                q.set_counter("Flammenkönig", count)  
            end  
            if count == 0 then  
                say_title("Adelige Botschaft")  
                say("")  
                say("")  
                say("Hervorragend, du hast es geschafft!") 
                say("Das Volk von Krypton bedankt sich.")   
                say("Als Dankeschön wirst du reichlich beschenkt.")  
                say_reward("[ANZAHL] [NAME DES ITEMS]") 
                pc.give_item2([ITEMID], [ANZAHL]) 
                pc.give_item2([ITEMID], [ANZAHL]) 
                clear_letter()  
                set_state(lvl75)  

            end  
        end 
    end 

    state lvl75 begin
      when levelup with pc.get_level() == 74 begin
            say_title("Adelige Botschaft #2")
            say("") 
            say("") 
            say("Nach dem letzten Auftrag hat sich nun ein") 
            say("noch stärkeres Ungeheuer an die Macht gekämpft.") 
            say("Er sollte aber für dich kein Hinderniss sein!") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("5x Dämonenkönig") 
            say_reward("Du findest ihn im Dämonenturm.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 5) 
            q.set_counter("Dämonenkönig", 5) 
        end 

         when 1091.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 5 then 
                pc.setqf("state", count) 
                q.set_counter("Dämonenkönig", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!") 
                say("Das Volk von Krypton bedankt sich.") 
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                say_reward("[ANZAHL] [NAME DES ITEMS]") 
                pc.give_item2([ITEMID], [ANZAHL]) 
                pc.give_item2([ITEMID], [ANZAHL]) 
                clear_letter() 
                set_state(lvl80) 

            end 
        end 
    end 
    state lvl80 begin
       when levelup with pc.get_level() == 79 begin
            say_title("Adelige Botschaft #3")
            say("") 
            say("") 
            say("Der Demonenkönig hat vor seinem Tod die Macht") 
            say("dem Sensenmann überreicht und für Unruhe gesorgt") 
            say("Auch hier bittet dich das Volk um Hilfe!") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("5x Sensenmann") 
            say_reward("Du findest ihn im Dämonenturm.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 5) 
            q.set_counter("Sensenmann", 5) 
        end 

         when 1093.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 5 then 
                pc.setqf("state", count) 
                q.set_counter("Sensenmann", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!") 
                say("Das Volk von Krypton bedankt sich.") 
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                say_reward("[ANZAHL] [NAME DES ITEMS]") 
                pc.give_item2([ITEMID], [ANZAHL]) 
                pc.give_item2([ITEMID], [ANZAHL]) 
                clear_letter() 
                set_state(lvl85) 

            end 
        end 
    end 

    state lvl85begin 
     when levelup with pc.get_level() == 84 begin
            say_title("Adelige Botschaft #4")
            say("") 
            say("") 
            say("Auch der Sensenmann hatte keine Chance gegen dich.") 
            say("Daher haben seine Untertanen Hilfe von weit weg") 
            say("geholt um dich aus dem Weg zu räumen!") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("3x Eishexe") 
            say_reward("Du findest sie in der Grotte.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 3) 
            q.set_counter("Eishexe", 3) 
        end 

         when 1191.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 3 then 
                pc.setqf("state", count) 
                q.set_counter("Eishexe", count) 
            end 
            if count == 0 then 
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Hervorragend, du hast es geschafft!") 
                say("Das Volk von Krypton bedankt sich.") 
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                say_reward("[ANZAHL] [NAME DES ITEMS]") 
                pc.give_item2([ITEMID], [ANZAHL]) 
                pc.give_item2([ITEMID], [ANZAHL]) 
                clear_letter() 
                set_state(lvl90) 

            end 
        end 
    end 

    state lvl90 begin
      when levelup with pc.get_level() == 89 begin
            say_title("Adelige Botschaft #5")
            say("") 
            say("") 
            say("Du hast auch die Eishexe schluss endlich besiegt!") 
            say("Da der Wasserdrache mit der Eishexe befreundet war") 
            say("musst du nun damit rechnen das er dich töten wird.") 
            say("Folgendes Ungeheuer wird gesucht:") 
            say_reward("3x Wasserdrache") 
            say_reward("Du findest ihn im Drachenraum.") 
            say_reward("") 
            say_reward("") 
            say("") 
            pc.setqf("state", 3) 
            q.set_counter("Wasserdrache", 3) 
        end 

         when 1191.kill begin 
            local count = pc.getqf("state") - 1 
            if count <= 3 then 
                pc.setqf("state", count) 
                q.set_counter("Wasserdrache", count) 
            end 
            if count == 0 then 
		notice_all (pc.get_name().." hat alle Adeligen Aufträge gemeistert!")
                notice_all (pc.get_name().." wird nun als Held anerkannt!")
                say_title("Adelige Botschaft") 
                say("") 
                say("") 
                say("Du hast es bis hier her geschafft!") 
                say("Das Volk von Krypton bedankt sich.") 
                say("Als Dankeschön wirst du reichlich beschenkt.") 
                say_reward("[ANZAHL] [NAME DES ITEMS]") 
                pc.give_item2([ITEMID], [ANZAHL]) 
                pc.give_item2([ITEMID], [ANZAHL]) 
                clear_letter() 
                set_state(fertig) 

            end 
        end 
    end 
    state fertig begin
   end  
end
brauch nochmal eure hilfe :/

syntax error : [string "start"]:14: unexpected symbol near `['
questkomplett.quest:39:Error occured on compile questkomplett.quest
07/13/2013 11:54 GoldenLegend#8550
kann mir einer sagen was ich da falsch mache bekomme den fehler öfters ma..

[Only registered and activated users can see links. Click Here To Register...]

Code:
quest nmaps begin
	state start begin
		when 20088.chat."Teleportieren" begin
		local v = select("Spinnendungeon2","50er Farmmap","80er Farmmap","100er Levelmap","Abbrechen")
		if v==1 then
			pc.warp(704100, 464100)
		end
		elseif v==2 then
			pc.warp(42383, 42383)
		end
		elseif v==3 then
			pc.warp(2600428, 2600942)
		end
		else
			return
		end
	end
end
Page 570 of 845 « First 70470520560568569 570 571572580620670 Last »