[SERVICE] Die Questkontrolle

09/12/2016 19:13 [SA]xAmnezia#12406
Quote:
Originally Posted by Mytho2 View Post
PHP Code:
quest pvp_quest2 begin    
    state start begin    
        when login 
or levelup with pc.get_level() == 180 and pc.getqf("level") == 0 begin
            say
("Gratuliere!")
            
say("Du hast das Level 180 erreicht!")
            
say("Töte Spieler um Itemshop Coins zu erhalten!")
            
say("Hier siehst du die Belohnungen, die du erhalten kannst!")
            
say_reward("50 Spieler getötet = 300 Coins")
            
say_reward("100 Spieler getötet = 500 Coins")
            
say_reward("250 Spieler getötet = 500 Coins, Besonderes Kostüm")
            
say_reward("500 Spieler getötet = 750 Coins, Besonderes Kostüm")
            
say_reward("1000 Spieler getötet = 1000 Coins, Besonderes Kostüm")
            
pc.setqf("level"1)
        
end
        when kill with npc
.is_pc() begin
            
if get_time() < pc.getqf("kill_time"then 
                chat
("Die 2 Minuten sind noch nicht vergangen.")
                
chat("Du erhielst keinen Punkt!")
                return
            
end    
            chat
("Du hast einen Punkt erhalten Gratuliere! Du hast derzeit ")
            
chat("Du musst zwei Minuten warten um den nächsten Punkt zu erhalten!")
            
chat("Derzeit besitz du "..pc.getqf("kill_punkte").." Punkt(e)")
            
pc.setqf("kill_punkte"pc.getqf("kill_punkte")+1)
            
pc.setqf("kill_time"get_time() + 60*2
            if 
pc.getqf("kill_punkte") == 50 then
                pc
.give_item2(800143)
                
notice_all("pc.get_name().." hat soeben die erste PvP-Quest abgeschlossen!")
                notice_all("
Er hat 50 Spieler getötet!")
            elseif pc.getqf("
kill_punkte") == 100 then
                pc.give_item2(80015, 1)
                notice_all("
pc.get_name().." hat soeben die zweite PvP-Quest abgeschlossen!")
                
notice_all("Er hat 100 Spieler getötet!")
            elseif 
pc.getqf("kill_punkte") == 250 then
                pc
.give_item2(800151)
                
pc.give_item2(100011)
                
notice_all("pc.get_name().." hat soeben die dritte PvP-Quest abgeschlossen!")
                notice_all("
Er hat 250 Spieler getötet!")
            elseif pc.getqf("
kill_punkte") == 500 then
                pc.give_item2(80015, 1)
                pc.give_item2(80017, 1)
                pc.give_item2(80017, 1)
                pc.give_item2(10002, 2)
                notice_all("
pc.get_name().." hat soeben die vierte PvP-Quest abgeschlossen!")
                
notice_all("Er hat 500 Spieler getötet!")
            elseif 
pc.getqf("kill_punkte") == 1000 then
                pc
.give_item2(800171)
                
pc.give_item2(100031)
                
notice_all("pc.get_name().." hat soeben die fünfte PvP-Quest abgeschlossen!")
                notice_all("
Er hat 1000 Spieler getötet und ist einer der stärksten Spieler!")
            end
        end
    end
end 
Error occured on compile maxim/pvp_quest2.quest ist die fehlermeldung.
Syssr:
Erstmal Syserr fixen, meld dich mal in Skype :p
09/12/2016 20:34 Mytho2#12407
Quote:
Originally Posted by [SA]xAmnezia View Post
Erstmal Syserr fixen, meld dich mal in Skype :p
Er hat mir schnell und gut geholfen.:)
kompetenter typ
09/13/2016 20:53 ronny2de#12408
Bei mir gibt es keine PVP Quest ich brauch hilfe egal ob ich alle quest drußen oder gelöscht habe es kommt immer der Fehler
09/13/2016 21:12 [SA]xAmnezia#12409
Quote:
Originally Posted by ronny2de View Post
Bei mir gibt es keine PVP Quest ich brauch hilfe egal ob ich alle quest drußen oder gelöscht habe es kommt immer der Fehler
Meld dich in Skype ich fixe es dir.

Lg
09/16/2016 00:48 Guron#12410
Quote:
Originally Posted by TommyH99 View Post
Hi kann mir bitte einer sagen was mit der Quest nicht stimmt?
Type steht auf 18, es kommt keine Fehlermeldung aber der Stein lässt sich nicht anklicken.

Code:
quest regenbogen begin
    state start begin
            when 50512.use  begin
                
                say_title("Regenbogenstein:")
                say("Du möchtest also deine Skills ")
                say("Perfektionieren?")
                
                if pc.job ==0 then
                say("Wähle deine Lehre aus")
                
                local s=select("Körper","Mental")
                
                if s==1 then
                pc.set_skill_group(1)
                pc.set_skill_level(1 ,59)
                pc.set_skill_level(2 ,59)
                pc.set_skill_level(3 ,59)
                pc.set_skill_level(4 ,59)
                pc.set_skill_level(5 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                if s==2 then               
                pc.set_skill_group(2)
                pc.set_skill_level(16 ,59)
                pc.set_skill_level(17 ,59)
                pc.set_skill_level(18 ,59)
                pc.set_skill_level(19 ,59)
                pc.set_skill_level(20 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                elseif pc.job ==1 then
                say("Wähle deine Lehre aus")
                
                local s=select("Nahkampf","Fernkampf")
                
                if s==1 then               
                pc.set_skill_group(3)
                pc.set_skill_level(31 ,59)
                pc.set_skill_level(32 ,59)
                pc.set_skill_level(33 ,59)
                pc.set_skill_level(34 ,59)
                pc.set_skill_level(35 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                if s==2 then
                pc.set_skill_group(4)
                pc.set_skill_level(46 ,59)
                pc.set_skill_level(47 ,59)
                pc.set_skill_level(48 ,59)
                pc.set_skill_level(49 ,59)
                pc.set_skill_level(50 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                elseif pc.job ==2 then
                say("Wähle deine Lehre aus")
                local s=select("Magie","Waffe")
                
                if s==1 then
                pc.set_skill_group(5)
                pc.set_skill_level(76 ,59)
                pc.set_skill_level(77 ,59)
                pc.set_skill_level(78 ,59)
                pc.set_skill_level(79 ,59)
                pc.set_skill_level(80 ,59)
                pc.set_skill_level(81, 59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                if s==2 then
                --Waffe
                pc.set_skill_group(6)
                pc.set_skill_level(61 ,59)
                pc.set_skill_level(62 ,59)
                pc.set_skill_level(63 ,59)
                pc.set_skill_level(64 ,59)
                pc.set_skill_level(65 ,59)
                pc.set_skill_level(66 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                elseif pc.job ==3 then
                say("Wähle deine Lehre aus")
                local s=select("Heilung","Drache")
                
                if s==1 then
                pc.set_skill_group(7)
                pc.set_skill_level(106 ,59)
                pc.set_skill_level(107 ,59)
                pc.set_skill_level(108 ,59)
                pc.set_skill_level(109 ,59)
                pc.set_skill_level(110 ,59)
                pc.set_skill_level(111 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
                
                if s==2 then
                pc.set_skill_group(8)
                pc.set_skill_level(91 ,59)
                pc.set_skill_level(92 ,59)
                pc.set_skill_level(93 ,59)
                pc.set_skill_level(94 ,59)
                pc.set_skill_level(95 ,59)
                pc.set_skill_level(96 ,59)
                pc.set_skill_level(124 ,50)
                pc.set_skill_level(131 ,50)
                pc.set_skill_level(121 ,50)
                pc.set_skill_level(129 ,50)
                pc.set_skill_level(126 ,50)
                pc.set_skill_level(127 ,50)
                pc.set_skill_level(128 ,50)
                pc.set_skill_level(137 ,20)
                pc.set_skill_level(138 ,20)
                pc.set_skill_level(139 ,20)
                pc.set_skill_level(140 ,20)
                pc.set_skill_level(125 ,59)
	            pc.set_skill_level(130 ,59)				
                say("Alle deine Skills sind nun Perfekt! Viel Spaß")
                end
            end
        end
    end
end
Bitte keine Antwort von [SA]xAmnezia da er echt keine Hilfe ist. Danke.

War auf meiner ToDo Liste fürs lernen, bitte schön :)


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

Funktioniert ohne Probleme, habe es auf meinen Server getestet. Selbstverständlich musst du vorher einen Klasse ausgewählt haben, bevor du den Stein benutzt.
09/16/2016 03:08 Ide.#12411
Quote:
Originally Posted by Guron View Post
War auf meiner ToDo Liste fürs lernen, bitte schön :)


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

Funktioniert ohne Probleme, habe es auf meinen Server getestet. Selbstverständlich musst du vorher einen Klasse ausgewählt haben, bevor du den Stein benutzt.
Wenn du es zum Lernen genommen hast, möchte ich erwähnen, dass man deine Quest noch kürzen kann. :p
09/16/2016 11:57 Guron#12412
Quote:
Originally Posted by Ide. View Post
Wenn du es zum Lernen genommen hast, möchte ich erwähnen, dass man deine Quest noch kürzen kann. :p
Echt jetzt? Könntest du mir ne PN schreiben oder hier einen Ansatz vorschreiben? Hab mir gestern echt die Finger wund geschrieben :D
09/16/2016 12:32 Ide.#12413
Quote:
Originally Posted by Guron View Post
Echt jetzt? Könntest du mir ne PN schreiben oder hier einen Ansatz vorschreiben? Hab mir gestern echt die Finger wund geschrieben :D
Bitte schön:

PHP Code:
quest perfect_skills begin
    state start begin
        when 50512.
use begin
            say_title
("Regenbogenstein")
            
say("")
            
say("Möchtest du alle Skills auf")
            
say("Perfekter-Meister setzen?")
            
say("")
            
say_reward("Du musst eine Lehre ausgewählt haben!")
            
say("")
            
local choose select (" Ja""Nein")
            if 
choose == 2 then return end
            
if choose == 1 then
                
if pc.get_skill_group() > 0 then
                    
for _,v in pairs(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()]) do
                        
pc.set_skill_level(v40)
                    
end
                    pc
.remove_item(50512)
                    
syschat("Glückwunsch, deine Fertigkeiten wurden perfektioniert.")
                
end
                
if pc.get_skill_group() == 0 then
                    say_title
("Regenbogenstein")
                    
say("")
                    
say("Bevor du deine Fertigkeiten perfektionieren")
                    
say("kannst, musst du eine Lehre ausgewählt haben.")
                    
say("")
                
end
            end
        end
    end
end 
Der ausschlaggebende Punkt in der Quest ist folgender Abschnitt, damit solltest du dich mal auseinandersetzen:

PHP Code:
                    for _,v in pairs(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()]) do
                        
pc.set_skill_level(v40)
                    
end 
Du benötigst die Questfunktion "pairs"...
09/16/2016 12:43 Guron#12414
Quote:
Originally Posted by Ide. View Post
Bitte schön:

PHP Code:
quest perfect_skills begin
    state start begin
        when 50512.
use begin
            say_title
("Regenbogenstein")
            
say("")
            
say("Möchtest du alle Skills auf")
            
say("Perfekter-Meister setzen?")
            
say("")
            
say_reward("Du musst eine Lehre ausgewählt haben!")
            
say("")
            
local choose select (" Ja""Nein")
            if 
choose == 2 then return end
            
if choose == 1 then
                
if pc.get_skill_group() > 0 then
                    
for _,v in pairs(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()]) do
                        
pc.set_skill_level(v40)
                    
end
                    pc
.remove_item(50512)
                    
syschat("Glückwunsch, deine Fertigkeiten wurden perfektioniert.")
                
end
                
if pc.get_skill_group() == 0 then
                    say_title
("Regenbogenstein")
                    
say("")
                    
say("Bevor du deine Fertigkeiten perfektionieren")
                    
say("kannst, musst du eine Lehre ausgewählt haben.")
                    
say("")
                
end
            end
        end
    end
end 
Der ausschlaggebende Punkt in der Quest ist folgender Abschnitt, damit solltest du dich mal auseinandersetzen:

PHP Code:
                    for _,v in pairs(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()]) do
                        
pc.set_skill_level(v40)
                    
end 
Du benötigst die Questfunktion "pairs"...
Besten dank, versuche das gewusel dort mal zu verstehen :D
09/24/2016 00:50 PL4tiinum#12415
PHP Code:
quest desert_battle begin
    state start begin
        when 20352.chat
."Wüstenschlacht" begin
        
        
if pc.get_level()>=75 then
            
if game.get_event_flag("deserton") == 0 then
                say
("Die Wüstenschlacht findet derzeit nicht statt.")
                return
            elseif 
game.get_event_flag("deserton") == 2 then
                say
("Die Wüstenschlacht befindet sich in der Endphase du kannst nicht beitreten.")
                return
            
end
            say
("Die Schlacht in der Wüste ist im vollen gange,")
            
say("möchtest du beitreten oder Informationen erhalten?")
            
local info select("Auf in die Wüste""Informationen""Abbrechen")
            
            if 
info == 3 then
                
return
            elseif 
info == 2 then
                say
("Das Ziel der Wüstenschlacht ist es als erstes reich 500")
                
say("Gegner aus den anderen Reichen zu besiegen.")
                
say("")
                
say("Das Reich, welches gewinnt erhält am schluss eine Belohnung")
                
say("in Form einiger Metinsteine")
                
local teilnehmen select("Teilnehmen""Abbrechen")
                    if 
teilnehmen == 2 then
                        
return
                    elseif 
teilnehmen == 1 then
                        
if pc.get_empire() == 1 then
                            pc
.warp(217800627200)
                        elseif 
pc.get_empire() == 2 then
                            pc
.warp(221900502700)
                        elseif 
pc.get_empire() == 3 then
                            pc
.warp(344000502500)
                        else
                            
say("Bei deinem Reich gab es einen Fehler!")
                        
end
                    end
            
elseif info == 1 then
                    
if pc.get_empire() == 1 then
                            pc
.warp(217800627200)
                    elseif 
pc.get_empire() == 2 then
                            pc
.warp(221900502700)
                    elseif 
pc.get_empire() == 3 then
                            pc
.warp(344000502500)
                    else
                            
say("Bei deinem Reich gab es einen Fehler!")
                    
end
            end
        
else
            
say("Du bist noch nicht Level 75")
            return
        
end
        end
        
        when kill with npc
.get_empire() != pc.get_empire() and npc.is_pc() and pc.get_map_index() == and game.get_event_flag("turnieron") == 1 begin --X durch die ID der Map ersetzen
            
if game.get_event_flag("turnier"..pc.get_empire().."punkte") == 0 then
                game
.set_event_flag("turnier"..pc.get_empire().."punkte"1)
            else
                
game.set_event_flag("turnier"..pc.get_empire().."punkte"game.get_event_flag("turnier"..pc.get_empire().."punkte")+1)
            
end
            
if game.get_event_flag("turnier"..pc.get_empire().."punkte") >= 500 then
                game
.set_event_flag("reich"..pc.get_empire().."status"1)
                if 
pc.get_empire() == 1 then
                    notice_all
("Das Rote Reich hat in der Wüste dominiert.")
                elseif 
pc.get_empire() == 2 then
                    notice_all
("Das Gelbe Reich hat in der Wüste dominiert.")
                elseif 
pc.get_empire() == 2 then
                    notice_all
("Das Blaue Reich hat in der Wüste dominiert.")
                
end
                game
.set_event_flag("deserton"2)
            
end
        end
        when game
.get_event_flag("deserton") == 2 begin
            notice_all
("Das Turnier geht nun in die Endphase.")
            
notice_all("Für das Siegerreich spawnen nun Metins")
            
notice_all("in der Mitte der Wüste.")
            
regen_in_map(183"locale /germany/map/desert_war/regen_metins.txt")
            
say_in_map(183"Ihr habt nun 30 Minuten Zeit die Metins in der Wüste")
            
say_in_map(183"zu finden und zu zerstören. Viel Spass!")
            
timer("cooldown"60*30)
        
end
        when login 
or levelup or button or info or unmount or mount or kill with game.get_event_flag("turnieron") == and pc.get_map_index() == 183 begin
            
if game.get_event_flag("reich"..pc.get_empire().."status") == 1 then
                
return
            elseif 
pc.is_gm() then
                
return
            else
                if 
pc.get_empire == 1 then
                    pc
.warp(474200954400)
                elseif 
pc.get_empire == 2 then
                    pc
.warp(63200166100)
                elseif 
pc.get_empire == 3 then
                    pc
.warp(960100268700)
                else
                    
say("Du konntest auf grund deines Reiches nicht zurückteleportiert werden.")
                    
say("Bitte Teleportier dich selber zurück")
                
end
            end
        end
        when login 
or levelup or button or info or unmount or mount or kill with game.get_event_flag("turnieron") == and pc.get_map_index() == 183 and pc.get_level<75 begin
            
if pc.get_empire == 1 then
                pc
.warp(474200954400)
            elseif 
pc.get_empire == 2 then
                pc
.warp(63200166100)
            elseif 
pc.get_empire == 3 then
                pc
.warp(960100268700)
            
end
        end
        when 
"cooldown".timer begin
            cleartimer
("cooldown")
            
game.set_event_flag("deserton"0)
            
game.set_event_flag("turnier1punkte"0)
            
game.set_event_flag("turnier2punkte"0)
            
game.set_event_flag("turnier3punkte"0)
            
game.set_event_flag("reich1status"0)
            
game.set_event_flag("reich2status"0)
            
game.set_event_flag("reich3status"0)
            
notice_all("Die Wüstenschlacht hat ein Ende gefunden.")
            
wait()
            
warp_all_to_village(1831)
            
kill_all_in_map(183)
        
end
        
        when 20352.chat
."Wüstenschlacht-Einstellungen" with pc.is_gm() begin
            say
("Was möchtest du machen?")
            
local what select("Wüstenschlacht starten""Wüstenschlacht Beenden""Abbrechen")
            
            if 
what == 3 then
                
return
            elseif 
what == 2 then
                game
.set_event_flag("deserton"0)
                
game.set_event_flag("turnier1punkte"0)
                
game.set_event_flag("turnier2punkte"0)
                
game.set_event_flag("turnier3punkte"0)
                
game.set_event_flag("reich1status"0)
                
game.set_event_flag("reich2status"0)
                
game.set_event_flag("reich3status"0)
                
notice_all("Die Wüstenschlacht hat ein Ende gefunden.")
            elseif 
what == 1 then
                game
.set_event_flag("deserton"1)
                
notice_all("Die Wüstenschlacht wurde von "..pc.get_name.." gestartet.")
                
notice_all("Begebt euch zum Schlachtenverwalter.")
            
end
        end
            
    end 
WHEN : game.get_event_flag
Quest/desert_battle.quest:74:when doesn't have begin-end clause. (()
Error occured on compile Quest/desert_battle.quest
09/24/2016 01:22 zazadi#12416
Quote:
Originally Posted by PL4tiinum View Post
PHP Code:
quest desert_battle begin
    state start begin
        when 20352.chat
."Wüstenschlacht" begin
        
        
if pc.get_level()>=75 then
            
if game.get_event_flag("deserton") == 0 then
                say
("Die Wüstenschlacht findet derzeit nicht statt.")
                return
            elseif 
game.get_event_flag("deserton") == 2 then
                say
("Die Wüstenschlacht befindet sich in der Endphase du kannst nicht beitreten.")
                return
            
end
            say
("Die Schlacht in der Wüste ist im vollen gange,")
            
say("möchtest du beitreten oder Informationen erhalten?")
            
local info select("Auf in die Wüste""Informationen""Abbrechen")
            
            if 
info == 3 then
                
return
            elseif 
info == 2 then
                say
("Das Ziel der Wüstenschlacht ist es als erstes reich 500")
                
say("Gegner aus den anderen Reichen zu besiegen.")
                
say("")
                
say("Das Reich, welches gewinnt erhält am schluss eine Belohnung")
                
say("in Form einiger Metinsteine")
                
local teilnehmen select("Teilnehmen""Abbrechen")
                    if 
teilnehmen == 2 then
                        
return
                    elseif 
teilnehmen == 1 then
                        
if pc.get_empire() == 1 then
                            pc
.warp(217800627200)
                        elseif 
pc.get_empire() == 2 then
                            pc
.warp(221900502700)
                        elseif 
pc.get_empire() == 3 then
                            pc
.warp(344000502500)
                        else
                            
say("Bei deinem Reich gab es einen Fehler!")
                        
end
                    end
            
elseif info == 1 then
                    
if pc.get_empire() == 1 then
                            pc
.warp(217800627200)
                    elseif 
pc.get_empire() == 2 then
                            pc
.warp(221900502700)
                    elseif 
pc.get_empire() == 3 then
                            pc
.warp(344000502500)
                    else
                            
say("Bei deinem Reich gab es einen Fehler!")
                    
end
            end
        
else
            
say("Du bist noch nicht Level 75")
            return
        
end
        end
        
        when kill with npc
.get_empire() != pc.get_empire() and npc.is_pc() and pc.get_map_index() == and game.get_event_flag("turnieron") == 1 begin --X durch die ID der Map ersetzen
            
if game.get_event_flag("turnier"..pc.get_empire().."punkte") == 0 then
                game
.set_event_flag("turnier"..pc.get_empire().."punkte"1)
            else
                
game.set_event_flag("turnier"..pc.get_empire().."punkte"game.get_event_flag("turnier"..pc.get_empire().."punkte")+1)
            
end
            
if game.get_event_flag("turnier"..pc.get_empire().."punkte") >= 500 then
                game
.set_event_flag("reich"..pc.get_empire().."status"1)
                if 
pc.get_empire() == 1 then
                    notice_all
("Das Rote Reich hat in der Wüste dominiert.")
                elseif 
pc.get_empire() == 2 then
                    notice_all
("Das Gelbe Reich hat in der Wüste dominiert.")
                elseif 
pc.get_empire() == 2 then
                    notice_all
("Das Blaue Reich hat in der Wüste dominiert.")
                
end
                game
.set_event_flag("deserton"2)
            
end
        end
        when game
.get_event_flag("deserton") == 2 begin
            notice_all
("Das Turnier geht nun in die Endphase.")
            
notice_all("Für das Siegerreich spawnen nun Metins")
            
notice_all("in der Mitte der Wüste.")
            
regen_in_map(183"locale /germany/map/desert_war/regen_metins.txt")
            
say_in_map(183"Ihr habt nun 30 Minuten Zeit die Metins in der Wüste")
            
say_in_map(183"zu finden und zu zerstören. Viel Spass!")
            
timer("cooldown"60*30)
        
end
        when login 
or levelup or button or info or unmount or mount or kill with game.get_event_flag("turnieron") == and pc.get_map_index() == 183 begin
            
if game.get_event_flag("reich"..pc.get_empire().."status") == 1 then
                
return
            elseif 
pc.is_gm() then
                
return
            else
                if 
pc.get_empire == 1 then
                    pc
.warp(474200954400)
                elseif 
pc.get_empire == 2 then
                    pc
.warp(63200166100)
                elseif 
pc.get_empire == 3 then
                    pc
.warp(960100268700)
                else
                    
say("Du konntest auf grund deines Reiches nicht zurückteleportiert werden.")
                    
say("Bitte Teleportier dich selber zurück")
                
end
            end
        end
        when login 
or levelup or button or info or unmount or mount or kill with game.get_event_flag("turnieron") == and pc.get_map_index() == 183 and pc.get_level<75 begin
            
if pc.get_empire == 1 then
                pc
.warp(474200954400)
            elseif 
pc.get_empire == 2 then
                pc
.warp(63200166100)
            elseif 
pc.get_empire == 3 then
                pc
.warp(960100268700)
            
end
        end
        when 
"cooldown".timer begin
            cleartimer
("cooldown")
            
game.set_event_flag("deserton"0)
            
game.set_event_flag("turnier1punkte"0)
            
game.set_event_flag("turnier2punkte"0)
            
game.set_event_flag("turnier3punkte"0)
            
game.set_event_flag("reich1status"0)
            
game.set_event_flag("reich2status"0)
            
game.set_event_flag("reich3status"0)
            
notice_all("Die Wüstenschlacht hat ein Ende gefunden.")
            
wait()
            
warp_all_to_village(1831)
            
kill_all_in_map(183)
        
end
        
        when 20352.chat
."Wüstenschlacht-Einstellungen" with pc.is_gm() begin
            say
("Was möchtest du machen?")
            
local what select("Wüstenschlacht starten""Wüstenschlacht Beenden""Abbrechen")
            
            if 
what == 3 then
                
return
            elseif 
what == 2 then
                game
.set_event_flag("deserton"0)
                
game.set_event_flag("turnier1punkte"0)
                
game.set_event_flag("turnier2punkte"0)
                
game.set_event_flag("turnier3punkte"0)
                
game.set_event_flag("reich1status"0)
                
game.set_event_flag("reich2status"0)
                
game.set_event_flag("reich3status"0)
                
notice_all("Die Wüstenschlacht hat ein Ende gefunden.")
            elseif 
what == 1 then
                game
.set_event_flag("deserton"1)
                
notice_all("Die Wüstenschlacht wurde von "..pc.get_name.." gestartet.")
                
notice_all("Begebt euch zum Schlachtenverwalter.")
            
end
        end
            
    end 
WHEN : game.get_event_flag
Quest/desert_battle.quest:74:when doesn't have begin-end clause. (()
Error occured on compile Quest/desert_battle.quest
Am Schluss fehlt ein "end"
09/24/2016 16:33 PL4tiinum#12417
danke aber jz kommt leider das. ^^

Quest/desert_battle.quest:145:syntax error : [string "startnpc . get_empire ( ) ~= pc . get_empire ( ) and npc . is_p..."]:17: unexpected symbol near `when'
Error occured on compile Quest/desert_battle.quest
09/24/2016 18:38 Mytho2#12418

Putty:Error occured on compile maxim/ring123.quest
Syssr sagt nichts.
Bitte um schnelle Hilfe:)
09/24/2016 18:57 zazadi#12419
Quote:
Originally Posted by Mytho2 View Post

Putty:Error occured on compile maxim/ring123.quest
Syssr sagt nichts.
Bitte um schnelle Hilfe:)
Am schluss ist ein "end" zu viel
09/24/2016 19:22 Mytho2#12420
Quote:
Originally Posted by Core ツ View Post
Am schluss ist ein "end" zu viel
Danke, aber das funktioniert immer noch nicht