[SERVICE] Die Questkontrolle

Page 418 of 845

418

07/10/2012 02:16 TheMad#6256

server sagt fehler -.-

PHP Code:


			
quest gmhelpitem begin 
    state start begin
      when 60003.use with pc.is_gm() begin               
             local main_set = select("Info Ansagen", "GM Charakter", "Event Management", "Rates Einstellen", "Abbrechen")
             if main_set == 5 then
                return
             end
             if main_set == 1 then    
             local g = select ("GM Online" , "GM Offline" , "Server Reboot" , "Link+Vote" , "Arbeit" , "Abbrechen")
             if g == 1 then
                 command ("n "..pc.get_name() .." steht euch f�r Fragen und Probleme zur Verf�gung!")
                 return
             end     
             if g == 2 then
                 command ("n ".. pc.get_name() .." geht erstmal Offline und w�nscht euch allen noch viel Spa�!")
                 return
             end          
            if g == 3 then
            notice_all ("Server Reboot: Alle Auslogen Der Server wird Rebootet !")
            notice_all ("Server Reboot: Um keine Items zu Verlieren schnellstm�glich Ausloggen !")
                           return
             end
             if g == 4 then
                 notice_all ("Unsere Homepage Lautet ...........")
                 notice_all ("Bitte t�glich Voten")
                 return
             end
             if g == 5 then
                 notice_all ("Serverwartung alle Auslogen !!!")
                 notice_all ("Es wird im Froum bekannt gegeben wenn der Server wieder Online ist !!!")
                 return
             end

             if g == 6 then
                 return
             end
          end        
          
        if main_set == 2 then
        say("")
        say("Hier sind einige Sachen f�r dein GM Charakter:")
        say("")
                local g = select("Sub-Skills","Pferdlevel 21", "High EQ", "GM-Schwert", "Abbrechen")
                  
             if g == 1 then
                 command("setsk 122 2")
                command("setsk 121 59")
                command("setsk 124 59")
                command("setsk 125 59")
                command("setsk 126 59")
                command("setsk 127 59")
                command("setsk 128 59")
                command("setsk 129 59")
                command("setsk 130 59")
                command("setsk 131 59")
                 return
             end          
            if g == 2 then
                command("horse_level "..pc.get_name() .." 21")
                command("i 50053")
                return
             end
             if g == 3 then
                command("i 117209")
                command("i 116209")
                command("i 92009")
                command("i 91009")
                command("i 15269")
                command("i 114209")
                command("i 42019")
                command("i 44019")
                command("i 46019")
                command("i 48019")
                command("i 71110")
                command("i 10009")
                command("i 10019")
                command("i 10029")
                command("i 10039")
                command("i 10049")
                command("i 10059")
                command("i 10069")
                command("i 10079")
                return
             end
             
            if g == 4 then 
                command("i 11989")
                command("i 11990")
                command("i 9040")
                return
           end
           if g == 5 then
            return
            end
            end
            
                if main_set == 4 then
    say("")
    say("Hier kann man alle Raten gleichzeitig eistellen:")
    say("Nat�rlich sind dann alle Raten gleich hoch eingestellt!)
            local i = select ("Alles 100", "Alles 250", "Alles 500", "Alles 1000", "Abbrechen")
                    if i == 1 then
                        command("priv_empire 0 4:exp 100 24")
                        command("priv_empire 0 2:gold_drop 100 24")
                        command("priv_empire 0 1:item_drop 100 24")
                        return
                        end
                    if i == 2 then
                        command("priv_empire 0 4:exp 250 24")
                        command("priv_empire 0 2:gold_drop 250 24")
                        command("priv_empire 0 1:item_drop 250 24")
                        return
                        end
                    if i == 3 then
                        command("priv_empire 0 4:exp 500 24")
                        command("priv_empire 0 2:gold_drop 500 24")
                        command("priv_empire 0 1:item_drop 500 24")
                        return
                        end
                    if i == 4 then
                        command("priv_empire 0 4:exp 1000 24")
                        command("priv_empire 0 2:gold_drop 1000 24")
                        command("priv_empire 0 1:item_drop 1000 24")
                        return
                        end
                    if i == 5 then
                        say("Gut dann eben nicht!")
                        return
                        end
                        end                    

    
            if main_set == 3 then    
            
            
            local e = select("Tag / Nacht", "Weihnachts Events", "Rates einstellen", "Abbrechen")
                if e == 1 then
                    say_title("GM Helfer:")
                    say("")
                    say("Du moechtest also zwischen Tag und")
                    say("Nacht wechseln ?")
                    
                        local f = select ("Tag" , "Nacht", "Abbrechen")
                            if f == 1 then
                                command ("x 2")
                            elseif f == 2 then
                                command ("x 1")
                            elseif f == 3 then
                                return
                        end                                    
                        
                elseif e == 2 then
                    say_title("GM Helfer:")
                    say("")
                    say("Du moechtest also die Weihnachts Events Starten?")
                            
                        local f = select ("Weihnachtsbaum", "Schnee", "Weihnachtsmusik", "Weihnachtsevent starten (Alles)", "Weihnachtsevent stoppen (Alles)", "Abbrechen")
                        
                        
                        if f == 1 then
                        
                            local g = select ("Weihnachtsbaum aufstellen" , "Weihnachtsbaum wegraeumen", "Abbrechen")
                                    if g == 1 then
                                        command ("e xmas_tree 1")
                                        notice_all ("Bei Weihnachtlicher Stimmung darf")
                                        notice_all ("ein Weihnachtsbaum nicht fehlen!")
                                        notice_all ("Das Eternal-Loyalty Team hat diesen geschmueckt")
                                        notice_all ("und in der Mitte Berg Sohans aufgestellt!")
                                        notice_all ("Frohes Fest!")
                                        
                                        say_title("GM Helfer:")
                                        say("")
                                        say("Es ist geschafft!")
                                        say("Der Weihnachtsbaum steht!")
                                        say("")
                                    elseif g == 2 then
                                        command ("e xmas_tree 0")
                                        notice_all ("Weihnachten neigt sich langsam")
                                        notice_all ("dem Ende! Der Weihnachtsbaum wird")
                                        notice_all ("nun nichtmehr benoetigt")
                                        notice_all ("und wir haben ihn deshalb abgebaut.")
                                        
                                        say_title("Seon-Hae:")
                                        say("")
                                        say("Es ist geschafft!")
                                        say("Der Weihnachtsbaum ist weg!")
                                        say("")
                                                                        
                                    elseif g == 3 then
                                        return
                                    end
                            
                        elseif f == 2 then
                            local h = select ("Schnee an" , "Schnee aus", "Abbrechen")
                                    if h == 1 then
                                        command("e xmas_snow 1")
                                    elseif h == 2 then
                                        command ("e xmas_snow 0")
                                    elseif h == 3 then
                                        return
                                    end
                                    
                        elseif f == 3 then
                            local i = select ("Musik abspielen", "Musik stoppen", "Abbrechen")
                                    if i == 1 then
                                        command("e xmas_song 1")
                                    elseif i == 2 then
                                        command("e xmas_song 0")
                                    elseif i == 3 then
                                        return
                                    end
                        elseif f == 4 then
                            say("Willst du wirklich alles aktivieren?")
                            say("Also Nachtmodus, den Weihnachtsbaum,")
                            say("Schnee und die Weihnachtsmusik?")
                            say("")
                            local g_sub = select ("Ja", "Nein")
                                if g_sub == 1 then
                                    command("e xmas_tree 1")
                                    command("e xmas_song 1")
                                    command("e xmas_boom 1")
                                    command("e xmas_snow 1")
                                    say("Alles aktiviert!")
                                elseif g_sub == 2 then
                                    return
                                end
                        elseif f == 5 then
                                say("Willst du wirklich alles deaktivieren?")
                                say("Also Nachtmodus, den Weihnachtsbaum,")
                                say("Schnee und die Weihnachtsmusik?")
                                say("")
                        local g_desub = select ("Ja", "Nein")
                            if g_desub == 1 then
                                command("e xmas_tree 0")
                                command("e xmas_song 0")
                                command("e xmas_boom 0")
                                command("e xmas_snow 0")
                                say("Alles deaktiviert!")
                            elseif g_desub == 2 then
                                return
                        end
                                    
                        elseif f == 6 then
                            return
                        end
                                    
                elseif e == 3 then
                    say_title("GM Helfer:")
                    say("")
                    say("Du moechtest also die Rates einstellen??")
                    say("")
                    say_title("W�hle die zu einstellende Rate")
                        local rateset = select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen")
                        if rateset == 1 then
                            say_title("Seon-Hae:")
                            say("")
                            say("Wie hoch soll die EXP-Rate werden?")
                                local w =select ("150","250","500","1000","Abbrechen") 
                                    if w == 1 then
                                        command("priv_empire 0 4:exp 150 9999")
                                    elseif w == 2 then
                                        command("priv_empire 0 4:exp 250 9999")
                                    elseif w == 3 then
                                        command("priv_empire 0 4:exp 500 9999")
                                    elseif w == 4 then
                                        command("priv_empire 0 4:exp 1000 9999")
                                    elseif w == 5 then
                                        return
                                    end
                            
                        elseif rateset == 2 then
                            say_title("GM Helfer:")
                            say("")
                            say("Wie hoch soll die Yangdrop-Rate werden?")
                                local x =select ("100","200","500","1000","Abbrechen") 
                                    if x == 1 then
                                        command("priv_empire 0 2:gold_drop 100 9999")
                                    elseif x == 2 then
                                        command("priv_empire 0 2:gold_drop 200 9999")
                                    elseif x == 3 then
                                        command("priv_empire 0 2:gold_drop 500 9999")
                                    elseif x == 4 then
                                        command("priv_empire 0 2:gold_drop 1000 9999")
                                    elseif x == 5 then
                                        return
                                    end
                        elseif rateset == 3 then
                            say_title("GM Helfer:")
                            say("")
                            say("Wie hoch soll die MaxYang-Drop-Rate werden?")
                                local y =select ("100","200","500","1000","Abbrechen") 
                                    if y == 1 then
                                        command("priv_empire 0 3:gold10_drop 100 9999")
                                    elseif y == 2 then
                                        command("priv_empire 0 3:gold10_drop 200 9999")
                                    elseif y == 3 then
                                        command("priv_empire 0 3:gold10_drop 500 9999")
                                    elseif y == 4 then
                                        command("priv_empire 0 3:gold10_drop 1000 9999")
                                    elseif y == 5 then
                                        return
                                    end
                        elseif rateset == 4 then
                            say_title("GM Helfer:")
                            say("")
                            say("Wie hoch soll die Gegenstandsdrop-Rate werden?")
                            local z =select ("100","200","500","1000","Abbrechen") 
                                    if z == 1 then
                                        command("priv_empire 0 1:item_drop 100 9999")
                                    elseif z == 2 then
                                        command("priv_empire 0 1:item_drop 200 9999")
                                    elseif z == 3 then
                                        command("priv_empire 0 1:item_drop 500 9999")
                                    elseif z == 4 then
                                        command("priv_empire 0 1:item_drop 1000 9999")
                                    elseif z == 5 then
                                        return
                                    end
                        elseif rateset == 5 then
                            return
                        end
                    
                elseif e == 4 then
                    return                
                end
        end    
    end    
    

end

07/10/2012 08:59 buja12#6257

Quote:

Originally Posted by TheMad

server sagt fehler -.-

PHP Code:

quest gmhelpitem begin state start begin when 60003.use with pc.is_gm() begin local main_set = select("Info Ansagen", "GM Charakter", "Event Management", "Rates Einstellen", "Abbrechen") if main_set == 5 then return end if main_set == 1 then local g = select ("GM Online" , "GM Offline" , "Server Reboot" , "Link+Vote" , "Arbeit" , "Abbrechen") if g == 1 then command ("n "..pc.get_name() .." steht euch f�r Fragen und Probleme zur Verf�gung!") return end if g == 2 then command ("n ".. pc.get_name() .." geht erstmal Offline und w�nscht euch allen noch viel Spa�!") return end if g == 3 then notice_all ("Server Reboot: Alle Auslogen Der Server wird Rebootet !") notice_all ("Server Reboot: Um keine Items zu Verlieren schnellstm�glich Ausloggen !") return end if g == 4 then notice_all ("Unsere Homepage Lautet ...........") notice_all ("Bitte t�glich Voten") return end if g == 5 then notice_all ("Serverwartung alle Auslogen !!!") notice_all ("Es wird im Froum bekannt gegeben wenn der Server wieder Online ist !!!") return end if g == 6 then return end end if main_set == 2 then say("") say("Hier sind einige Sachen f�r dein GM Charakter:") say("") local g = select("Sub-Skills","Pferdlevel 21", "High EQ", "GM-Schwert", "Abbrechen") if g == 1 then command("setsk 122 2") command("setsk 121 59") command("setsk 124 59") command("setsk 125 59") command("setsk 126 59") command("setsk 127 59") command("setsk 128 59") command("setsk 129 59") command("setsk 130 59") command("setsk 131 59") return end if g == 2 then command("horse_level "..pc.get_name() .." 21") command("i 50053") return end if g == 3 then command("i 117209") command("i 116209") command("i 92009") command("i 91009") command("i 15269") command("i 114209") command("i 42019") command("i 44019") command("i 46019") command("i 48019") command("i 71110") command("i 10009") command("i 10019") command("i 10029") command("i 10039") command("i 10049") command("i 10059") command("i 10069") command("i 10079") return end if g == 4 then command("i 11989") command("i 11990") command("i 9040") return end if g == 5 then return end end if main_set == 4 then say("") say("Hier kann man alle Raten gleichzeitig eistellen:") say("Nat�rlich sind dann alle Raten gleich hoch eingestellt!) local i = select ("Alles 100", "Alles 250", "Alles 500", "Alles 1000", "Abbrechen") if i == 1 then command("priv_empire 0 4:exp 100 24") command("priv_empire 0 2:gold_drop 100 24") command("priv_empire 0 1:item_drop 100 24") return end if i == 2 then command("priv_empire 0 4:exp 250 24") command("priv_empire 0 2:gold_drop 250 24") command("priv_empire 0 1:item_drop 250 24") return end if i == 3 then command("priv_empire 0 4:exp 500 24") command("priv_empire 0 2:gold_drop 500 24") command("priv_empire 0 1:item_drop 500 24") return end if i == 4 then command("priv_empire 0 4:exp 1000 24") command("priv_empire 0 2:gold_drop 1000 24") command("priv_empire 0 1:item_drop 1000 24") return end if i == 5 then say("Gut dann eben nicht!") return end end if main_set == 3 then local e = select("Tag / Nacht", "Weihnachts Events", "Rates einstellen", "Abbrechen") if e == 1 then say_title("GM Helfer:") say("") say("Du moechtest also zwischen Tag und") say("Nacht wechseln ?") local f = select ("Tag" , "Nacht", "Abbrechen") if f == 1 then command ("x 2") elseif f == 2 then command ("x 1") elseif f == 3 then return end elseif e == 2 then say_title("GM Helfer:") say("") say("Du moechtest also die Weihnachts Events Starten?") local f = select ("Weihnachtsbaum", "Schnee", "Weihnachtsmusik", "Weihnachtsevent starten (Alles)", "Weihnachtsevent stoppen (Alles)", "Abbrechen") if f == 1 then local g = select ("Weihnachtsbaum aufstellen" , "Weihnachtsbaum wegraeumen", "Abbrechen") if g == 1 then command ("e xmas_tree 1") notice_all ("Bei Weihnachtlicher Stimmung darf") notice_all ("ein Weihnachtsbaum nicht fehlen!") notice_all ("Das Eternal-Loyalty Team hat diesen geschmueckt") notice_all ("und in der Mitte Berg Sohans aufgestellt!") notice_all ("Frohes Fest!") say_title("GM Helfer:") say("") say("Es ist geschafft!") say("Der Weihnachtsbaum steht!") say("") elseif g == 2 then command ("e xmas_tree 0") notice_all ("Weihnachten neigt sich langsam") notice_all ("dem Ende! Der Weihnachtsbaum wird") notice_all ("nun nichtmehr benoetigt") notice_all ("und wir haben ihn deshalb abgebaut.") say_title("Seon-Hae:") say("") say("Es ist geschafft!") say("Der Weihnachtsbaum ist weg!") say("") elseif g == 3 then return end elseif f == 2 then local h = select ("Schnee an" , "Schnee aus", "Abbrechen") if h == 1 then command("e xmas_snow 1") elseif h == 2 then command ("e xmas_snow 0") elseif h == 3 then return end elseif f == 3 then local i = select ("Musik abspielen", "Musik stoppen", "Abbrechen") if i == 1 then command("e xmas_song 1") elseif i == 2 then command("e xmas_song 0") elseif i == 3 then return end elseif f == 4 then say("Willst du wirklich alles aktivieren?") say("Also Nachtmodus, den Weihnachtsbaum,") say("Schnee und die Weihnachtsmusik?") say("") local g_sub = select ("Ja", "Nein") if g_sub == 1 then command("e xmas_tree 1") command("e xmas_song 1") command("e xmas_boom 1") command("e xmas_snow 1") say("Alles aktiviert!") elseif g_sub == 2 then return end elseif f == 5 then say("Willst du wirklich alles deaktivieren?") say("Also Nachtmodus, den Weihnachtsbaum,") say("Schnee und die Weihnachtsmusik?") say("") local g_desub = select ("Ja", "Nein") if g_desub == 1 then command("e xmas_tree 0") command("e xmas_song 0") command("e xmas_boom 0") command("e xmas_snow 0") say("Alles deaktiviert!") elseif g_desub == 2 then return end elseif f == 6 then return end elseif e == 3 then say_title("GM Helfer:") say("") say("Du moechtest also die Rates einstellen??") say("") say_title("W�hle die zu einstellende Rate") local rateset = select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen") if rateset == 1 then say_title("Seon-Hae:") say("") say("Wie hoch soll die EXP-Rate werden?") local w =select ("150","250","500","1000","Abbrechen") if w == 1 then command("priv_empire 0 4:exp 150 9999") elseif w == 2 then command("priv_empire 0 4:exp 250 9999") elseif w == 3 then command("priv_empire 0 4:exp 500 9999") elseif w == 4 then command("priv_empire 0 4:exp 1000 9999") elseif w == 5 then return end elseif rateset == 2 then say_title("GM Helfer:") say("") say("Wie hoch soll die Yangdrop-Rate werden?") local x =select ("100","200","500","1000","Abbrechen") if x == 1 then command("priv_empire 0 2:gold_drop 100 9999") elseif x == 2 then command("priv_empire 0 2:gold_drop 200 9999") elseif x == 3 then command("priv_empire 0 2:gold_drop 500 9999") elseif x == 4 then command("priv_empire 0 2:gold_drop 1000 9999") elseif x == 5 then return end elseif rateset == 3 then say_title("GM Helfer:") say("") say("Wie hoch soll die MaxYang-Drop-Rate werden?") local y =select ("100","200","500","1000","Abbrechen") if y == 1 then command("priv_empire 0 3:gold10_drop 100 9999") elseif y == 2 then command("priv_empire 0 3:gold10_drop 200 9999") elseif y == 3 then command("priv_empire 0 3:gold10_drop 500 9999") elseif y == 4 then command("priv_empire 0 3:gold10_drop 1000 9999") elseif y == 5 then return end elseif rateset == 4 then say_title("GM Helfer:") say("") say("Wie hoch soll die Gegenstandsdrop-Rate werden?") local z =select ("100","200","500","1000","Abbrechen") if z == 1 then command("priv_empire 0 1:item_drop 100 9999") elseif z == 2 then command("priv_empire 0 1:item_drop 200 9999") elseif z == 3 then command("priv_empire 0 1:item_drop 500 9999") elseif z == 4 then command("priv_empire 0 1:item_drop 1000 9999") elseif z == 5 then return end elseif rateset == 5 then return end elseif e == 4 then return end end end end

Wenn ich sowas lese.. "Server sagt fehler" man machn screen davon oder poste den fehler dann kann dir besser und schneller geholfen werden!

07/10/2012 12:16 NigrumCaelum#6258

Quote:
Originally Posted by NigrumCaelum
Hey Community!
Ich bin heute auf die 2011 Sf von Daroo(Mega-Edit) umgestiegen und habe nun folgendes Problem:
Wenn ich die Reittiere rufe erhalte ich diein der Quest angegebenen Effekte, ABER wenn ich dann das Reittier wieder zur�ckrufe werden die Effekte nciht auf ihren Normalwert zur�ckgesetzt, also eig schon nur erst nach einem Relog...
Hier die Quest:
Code:
quest mount_boar begin 
    state start begin 
		when 71114.use with pc.is_mount() begin 
			pc.unmount()
			affect.remove_collect()
		end
	
        when 71114.use begin
			pc.mount(20110,9999)
			affect.add_collect(apply.ATT_GRADE_BONUS, 100, 9999)
			affect.add_collect(apply.DEF_GRADE_BONUS, 100, 9999)
			affect.add_collect(apply.MOV_SPEED,25,60*60*24*365*60)
			chat("Der rasende Keiler ist dir nun gehorsam! Solange du auf")
			chat("ihm reitest erh�lst du folgende Boni: +100 DMG; +100 DEF!")
        end 
	end
end

^this
Bitte kann mir jmd helfen! D:

07/10/2012 12:21 MetinLegende#6259

Du musst bei affect.removr_collect auch eintragen was er removen soll also die Bonis die er auch gibt

07/10/2012 16:41 TheMad#6260

Quote:

Originally Posted by buja12

Wenn ich sowas lese.. "Server sagt fehler" man machn screen davon oder poste den fehler dann kann dir besser und schneller geholfen werden!

Hast recht, sry^^ war wohl etwas... zu fr�h?
Naja, hier der Fehler:

PHP Code:


			
Error occured on compile gmhelpitem.quest

07/10/2012 18:28 MetinLegende#6261

Code:

quest gmhelpitem begin 
    state start begin
      when 60003.use with pc.is_gm() begin               
             local main_set = select("Info Ansagen", "GM Charakter", "Event Management", "Rates Einstellen", "Abbrechen")
             if main_set == 5 then
                return
             end
             if main_set == 1 then    
             local g = select ("GM Online" , "GM Offline" , "Server Reboot" , "Link+Vote" , "Arbeit" , "Abbrechen")
             if g == 1 then
                 command ("n "..pc.get_name() .." steht euch f�r Fragen und Probleme zur Verf�gung!")
                 return
             end     
             if g == 2 then
                 command ("n ".. pc.get_name() .." geht erstmal Offline und w�nscht euch allen noch viel Spa�!")
                 return
             end          
            if g == 3 then
            notice_all ("Server Reboot: Alle Auslogen Der Server wird Rebootet !")
            notice_all ("Server Reboot: Um keine Items zu Verlieren schnellstm�glich Ausloggen !")
                           return
             end
             if g == 4 then
                 notice_all ("Unsere Homepage Lautet ...........")
                 notice_all ("Bitte t�glich Voten")
                 return
             end
             if g == 5 then
                 notice_all ("Serverwartung alle Auslogen !!!")
                 notice_all ("Es wird im Froum bekannt gegeben wenn der Server wieder Online ist !!!")
                 return
             end

             if g == 6 then
                 return
             end
          end        
          
        if main_set == 2 then
        say("")
        say("Hier sind einige Sachen f�r dein GM Charakter:")
        say("")
                local g = select("Sub-Skills","Pferdlevel 21", "High EQ", "GM-Schwert", "Abbrechen")
                  
             if g == 1 then
                 command("setsk 122 2")
                command("setsk 121 59")
                command("setsk 124 59")
                command("setsk 125 59")
                command("setsk 126 59")
                command("setsk 127 59")
                command("setsk 128 59")
                command("setsk 129 59")
                command("setsk 130 59")
                command("setsk 131 59")
                 return
             end          
            if g == 2 then
                command("horse_level "..pc.get_name() .." 21")
                command("i 50053")
                return
             end
             if g == 3 then
                command("i 117209")
                command("i 116209")
                command("i 92009")
                command("i 91009")
                command("i 15269")
                command("i 114209")
                command("i 42019")
                command("i 44019")
                command("i 46019")
                command("i 48019")
                command("i 71110")
                command("i 10009")
                command("i 10019")
                command("i 10029")
                command("i 10039")
                command("i 10049")
                command("i 10059")
                command("i 10069")
                command("i 10079")
                return
             end
             
            if g == 4 then 
                command("i 11989")
                command("i 11990")
                command("i 9040")
                return
           end
           if g == 5 then
            return
            end
            end
            
                if main_set == 4 then
    say("")
    say("Hier kann man alle Raten gleichzeitig eistellen:")
    say("Nat�rlich sind dann alle Raten gleich hoch eingestellt!")
            local i = select ("Alles 100", "Alles 250", "Alles 500", Alles 1000", "Abbrechen")
                    if i == 1 then
                        command("priv_empire 0 4:exp 100 24")
                        command("priv_empire 0 2:gold_drop 100 24")
                        command("priv_empire 0 1:item_drop 100 24")
                        return
                        end
                    if i == 2 then
                        command("priv_empire 0 4:exp 250 24")
                        command("priv_empire 0 2:gold_drop 250 24")
                        command("priv_empire 0 1:item_drop 250 24")
                        return
                        end
                    if i == 3 then
                        command("priv_empire 0 4:exp 500 24")
                        command("priv_empire 0 2:gold_drop 500 24")
                        command("priv_empire 0 1:item_drop 500 24")
                        return
                        end
                    if i == 4 then
                        command("priv_empire 0 4:exp 1000 24")
                        command("priv_empire 0 2:gold_drop 1000 24")
                        command("priv_empire 0 1:item_drop 1000 24")
                        return
                        end
                    if i == 5 then
                        say("Gut dann eben nicht!")
                        return
                        end
                        end                    

    
            if main_set == 3 then    
            
            
            local e = select("Tag / Nacht", "Weihnachts Events", "Rates einstellen", "Abbrechen")
                if e == 1 then
                    say_title("GM Helfer:")
                    say("")
                    say("Du moechtest also zwischen Tag und")
                    say("Nacht wechseln ?")
                    
                        local f = select ("Tag" , "Nacht", "Abbrechen")
                            if f == 1 then
                                command ("x 2")
                            elseif f == 2 then
                                command ("x 1")
                            elseif f == 3 then
                                return
                        end                                    
                        
                elseif e == 2 then
                    say_title("GM Helfer:")
                    say("")
                    say("Du moechtest also die Weihnachts Events Starten?")
                            
                        local f = select ("Weihnachtsbaum", "Schnee", "Weihnachtsmusik", "Weihnachtsevent starten (Alles)", "Weihnachtsevent stoppen (Alles)", "Abbrechen")
                        
                        
                        if f == 1 then
                        
                            local g = select ("Weihnachtsbaum aufstellen" , "Weihnachtsbaum wegraeumen", "Abbrechen")
                                    if g == 1 then
                                        command ("e xmas_tree 1")
                                        notice_all ("Bei Weihnachtlicher Stimmung darf")
                                        notice_all ("ein Weihnachtsbaum nicht fehlen!")
                                        notice_all ("Das Eternal-Loyalty Team hat diesen geschmueckt")
                                        notice_all ("und in der Mitte Berg Sohans aufgestellt!")
                                        notice_all ("Frohes Fest!")
                                        
                                        say_title("GM Helfer:")
                                        say("")
                                        say("Es ist geschafft!")
                                        say("Der Weihnachtsbaum steht!")
                                        say("")
                                    elseif g == 2 then
                                        command ("e xmas_tree 0")
                                        notice_all ("Weihnachten neigt sich langsam")
                                        notice_all ("dem Ende! Der Weihnachtsbaum wird")
                                        notice_all ("nun nichtmehr benoetigt")
                                        notice_all ("und wir haben ihn deshalb abgebaut.")
                                        
                                        say_title("Seon-Hae:")
                                        say("")
                                        say("Es ist geschafft!")
                                        say("Der Weihnachtsbaum ist weg!")
                                        say("")
                                                                        
                                    elseif g == 3 then
                                        return
                                    end
                            
                        elseif f == 2 then
                            local h = select ("Schnee an" , "Schnee aus", "Abbrechen")
                                    if h == 1 then
                                        command("e xmas_snow 1")
                                    elseif h == 2 then
                                        command ("e xmas_snow 0")
                                    elseif h == 3 then
                                        return
                                    end
                                    
                        elseif f == 3 then
                            local i = select ("Musik abspielen", "Musik stoppen", "Abbrechen")
                                    if i == 1 then
                                        command("e xmas_song 1")
                                    elseif i == 2 then
                                        command("e xmas_song 0")
                                    elseif i == 3 then
                                        return
                                    end
                        elseif f == 4 then
                            say("Willst du wirklich alles aktivieren?")
                            say("Also Nachtmodus, den Weihnachtsbaum,")
                            say("Schnee und die Weihnachtsmusik?")
                            say("")
                            local g_sub = select ("Ja", "Nein")
                                if g_sub == 1 then
                                    command("e xmas_tree 1")
                                    command("e xmas_song 1")
                                    command("e xmas_boom 1")
                                    command("e xmas_snow 1")
                                    say("Alles aktiviert!")
                                elseif g_sub == 2 then
                                    return
                                end
                        elseif f == 5 then
                                say("Willst du wirklich alles deaktivieren?")
                                say("Also Nachtmodus, den Weihnachtsbaum,")
                                say("Schnee und die Weihnachtsmusik?")
                                say("")
                        local g_desub = select ("Ja", "Nein")
                            if g_desub == 1 then
                                command("e xmas_tree 0")
                                command("e xmas_song 0")
                                command("e xmas_boom 0")
                                command("e xmas_snow 0")
                                say("Alles deaktiviert!")
                            elseif g_desub == 2 then
                                return
                        end
                                    
                        elseif f == 6 then
                            return
                        end
                                    
                elseif e == 3 then
                    say_title("GM Helfer:")
                    say("")
                    say("Du moechtest also die Rates einstellen??")
                    say("")
                    say_title("W�hle die zu einstellende Rate")
                        local rateset = select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen")
                        if rateset == 1 then
                            say_title("Seon-Hae:")
                            say("")
                            say("Wie hoch soll die EXP-Rate werden?")
                                local w =select ("150","250","500","1000","Abbrechen") 
                                    if w == 1 then
                                        command("priv_empire 0 4:exp 150 9999")
                                    elseif w == 2 then
                                        command("priv_empire 0 4:exp 250 9999")
                                    elseif w == 3 then
                                        command("priv_empire 0 4:exp 500 9999")
                                    elseif w == 4 then
                                        command("priv_empire 0 4:exp 1000 9999")
                                    elseif w == 5 then
                                        return
                                    end
                            
                        elseif rateset == 2 then
                            say_title("GM Helfer:")
                            say("")
                            say("Wie hoch soll die Yangdrop-Rate werden?")
                                local x =select ("100","200","500","1000","Abbrechen") 
                                    if x == 1 then
                                        command("priv_empire 0 2:gold_drop 100 9999")
                                    elseif x == 2 then
                                        command("priv_empire 0 2:gold_drop 200 9999")
                                    elseif x == 3 then
                                        command("priv_empire 0 2:gold_drop 500 9999")
                                    elseif x == 4 then
                                        command("priv_empire 0 2:gold_drop 1000 9999")
                                    elseif x == 5 then
                                        return
                                    end
                        elseif rateset == 3 then
                            say_title("GM Helfer:")
                            say("")
                            say("Wie hoch soll die MaxYang-Drop-Rate werden?")
                                local y =select ("100","200","500","1000","Abbrechen") 
                                    if y == 1 then
                                        command("priv_empire 0 3:gold10_drop 100 9999")
                                    elseif y == 2 then
                                        command("priv_empire 0 3:gold10_drop 200 9999")
                                    elseif y == 3 then
                                        command("priv_empire 0 3:gold10_drop 500 9999")
                                    elseif y == 4 then
                                        command("priv_empire 0 3:gold10_drop 1000 9999")
                                    elseif y == 5 then
                                        return
                                    end
                        elseif rateset == 4 then
                            say_title("GM Helfer:")
                            say("")
                            say("Wie hoch soll die Gegenstandsdrop-Rate werden?")
                            local z =select ("100","200","500","1000","Abbrechen") 
                                    if z == 1 then
                                        command("priv_empire 0 1:item_drop 100 9999")
                                    elseif z == 2 then
                                        command("priv_empire 0 1:item_drop 200 9999")
                                    elseif z == 3 then
                                        command("priv_empire 0 1:item_drop 500 9999")
                                    elseif z == 4 then
                                        command("priv_empire 0 1:item_drop 1000 9999")
                                    elseif z == 5 then
                                        return
                                    end
                        elseif rateset == 5 then
                            return
                        end
                    
                elseif e == 4 then
                    return                
                end
        end    
    end    
    

end

Versuchs mal so

07/10/2012 18:52 TheMad#6262

Ist immer noch der selbe fehler

PHP Code:


			
Error occured on compile gmhelpitem.quest

07/10/2012 20:06 fabii109#6263

Quote:

quest boar begin
state start begin
when 71114.use begin
say_title("Keiler Siegel")
say("")
say("einen Keiler Reiten!")
say("")
say_reward("Willst du reiten?")
local main_set = select("Ich will Reiten","Abbrechen")

if main_set == 2 then
return
end

if main_set == 1 then
chat("Du hast nun einen Keiler als Reittier!")
horse.ride()
pc.mount(20110, 999999)
end
end

when 71118.use begin
say_title("Feuer Tiger Siegel")
say("")
say("einen Feuer Tiger Reiten!")
say("")
say_reward("Willst du reiten?")
local main_set = select("Ich will Reiten","Abbrechen")

if main_set == 2 then
return
end

if main_set == 1 then
horse.ride()
chat("Du hast nun einen Feuer Tiger als Reittier!")
pc.mount(20112, 999999)
end
end

when 71116.use begin
say_title("Wolf Siegel")
say("")
say("einen Wofl Reiten!")
say("")
say_reward("Willst du reiten?")
local main_set = select("Ich will Reiten","Abbrechen")

if main_set == 2 then
return
end

if main_set == 1 then
horse.ride()
chat("Du hast nun einen Wolf als Reittier!")
pc.mount(20111, 999999)
end
end
when 71120.use begin
say_title("L�wen Siegel")
say("")
say("einen L�wen Reiten!")
say("")
say_reward("Willst du reiten?")
local main_set = select("Ich will Reiten","Abbrechen")

if main_set == 2 then
return
end

if main_set == 1 then
horse.ride()
chat("Du hast nun einen L�wen als Reittier!")
pc.mount(20113, 999999)
end
end
end
end

Kann ich irgendwie machen wenn ich das Reittier siegel anklicke das KEINE QUEST erscheint sondern das ich direkt aufs reittier komme?

07/10/2012 20:59 MetinLegende#6264

Code:

quest boar begin
state start begin
when 71114.use begin
chat("Du hast nun einen Keiler als Reittier !")
pc.mount(20110, 999999)
end
when 71118.use begin
chat("Du hast nun einen Feuer Tiger als Reittier!")
pc.mount(20112, 999999)
end 
when 71116.use begin
Chat("Du hast nun einen Wolf als Reittier!")
pc.mount(20111, 999999)
end 
when 71120.use begin
chat("Du hast nun einen L�wen als Reittier!")
pc.mount(20113, 999999)
end 
end 
end

Versuchs mal so

07/10/2012 21:47 heckii123#6265

Quote:

Originally Posted by xBlix

Code:

quest boar begin
state start begin
when 71114.use begin
chat("Du hast nun einen Keiler als Reittier !")
pc.mount(20110, 999999)
end
when 71118.use begin
chat("Du hast nun einen Feuer Tiger als Reittier!")
pc.mount(20112, 999999)
end 
when 71116.use begin
Chat("Du hast nun einen Wolf als Reittier!")
pc.mount(20111, 999999)
end 
when 71120.use begin
chat("Du hast nun einen L�wen als Reittier!")
pc.mount(20113, 999999)
end 
end 
end

Versuchs mal so

Geht glaube ich nicht

In virutal box kommt der fehler

: Calls undeclared function!:
Chat
Error occured on compile Reittiere.quest

Suche eine Quest indem man ein Reittier anklickt und dann direkt auf das reittier draufkommt
!!

07/10/2012 22:32 TheMad#6266

PHP Code:


			
quest boar begin
state start begin
when 71114.use begin
chat("Du hast nun einen Keiler als Reittier !")
pc.mount(20110, 999999)
end
when 71118.use begin
chat("Du hast nun einen Feuer Tiger als Reittier!")
pc.mount(20112, 999999)
end 
when 71116.use begin
chat("Du hast nun einen Wolf als Reittier!")
pc.mount(20111, 999999)
end 
when 71120.use begin
chat("Du hast nun einen L�wen als Reittier!")
pc.mount(20113, 999999)
end 
end 
end

versuch es so, ich denke es war nur der schreibfehler, das Chat einmal gro� geschrieben war.
ansonsten hat xBlix dir eine sch�ne quest gegeben

07/10/2012 22:54 MetinLegende#6267

Ja Sry chat muss klein sein .. Autokorrektur vom handy

07/11/2012 16:40 heckii123#6268

Spoiler

[/QUOTE]

Wenn ich auf Level 99 Klicke Werde ich nicht level 99 .. :(

07/11/2012 19:49 Azemi6#6269

Quote:

Originally Posted by Azemi6

ich hab da 2 kleine Probleme
1.) Wenn ich beim GM-Panel auf Rates verwalten klicke schliesst sich das ganze (die Quest)^^
2.) Wie kann ich im User-Panel ganz unten einbaun das er den angegebenen NPC anspricht? Also wie wenn man Links klick auf einen NPC macht.

Gm-Panel

Spoiler

PHP Code:

quest gm_panel begin state start begin when 70001.use begin say_title("BloodStorm2 GM-panel") say("") say_reward("Willkommen im GM-panel von BS2") say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen") say("") local main_set = select("GM-Notitz","GM-Support","Rates Verwalten","Abbrechen") if main_set == 4 then say("Nagut, vielleicht beim n�chsten mal") return end if main_set == 1 then say_title("GM-Notitz") if pc.is_gm() then say("Gib eine Notiz ein, die an alle Reiche") say("gesendet wird!") local y = input() notice_all(y) end end if main_set == 2 then say("Du willst also deinen Satus ver�ffentlichen?") say("W�hle deinen Status:") local gg = select("Online","Offline","AFK","Garnichts.") if gg == 4 then return end if gg == 1 then command("n ".. pc.get_name() .." ist nun Online.") command("n ".. pc.get_name() .." meldet sich am Support an") command("n Ihr k�nnt Ihn/Sie nun bei Fragen oder Problemen kontaktieren.") end if gg == 2 then command("n ".. pc.get_name() .." meldet sich vom Support ab") command("n ".. pc.get_name() .." geht nun Offline") command("n Er/Sie w�nscht euch noch Viel Spa� auf BloodStorm2.") end if gg == 3 then command("n ".. pc.get_name() .." geht nun AFK.") command("n ".. pc.get_name() .." meldet sicht am Support vorerst ab") command("n Er/Sie Meldet sich wenn Er/Sie wieder da ist.") end if main_set == 3 then say_reward("GM:Events") say("Reichs Auswahl!") local e = select(locale.empire_names[1], locale.empire_names[2], locale.empire_names[3], locale.empire_names[0], locale.cancel) if 5 == e then return end -- ��Ұ�ɳ]�m�� 0 if 4 == e then e = 0 end say_reward("Event") say("Auswahl des Events") say(__get_empire_priv_string(e)) say("") local t = select(locale.item_drop_pct, locale.gold_drop_pct, locale.tengold_drop_pct, locale.exp_pct, locale.cancel) if 5 == t then return end say_reward("Event") local title_list = {locale.item_drop_pct, locale.gold_drop_pct, locale.tengold_drop_pct, locale.exp_pct} say(string.format("%s Status : %s ", locale.empire_names[e], title_list[t])) say("") say("W�hle die Rates") local g={100, 150, 200, 400, 800, 1000} local p = select(g[1]..'%', g[2]..'%', g[3]..'%', g[4]..'%', g[5]..'%', g[6]..'%', 'Cancel') if p == 7 then return end say_reward("W�hle die Zeit") say(string.format("%s Status : %s %d%%", locale.empire_names[e], title_list[t], g[p])) say("") say("Zeit:") local v = 0 local h = select('6 Stunden', '12 Stunden', '24 Stunden', 'Eigene Zeit', 'Cancel') if 5 == h then return elseif 4 == h then say_reward("Eigene Zeit") say(string.format("%s Status : %s %d%%", locale.empire_names[e], title_list[t], g[p])) say("") say("Geb die Zeit ein:") v=input() if v == "" then v = 0 else v=tonumber(v) end elseif 3 == h then v=24 elseif 2 == h then v=12 elseif 1 == h then v=6 end say_reward("Ok?") say(string.format("%s Status : %s %d%% (%Stunden)", locale.empire_names[e], title_list[t], g[p], v)) say("") say("Aktivieren?") local s = select("Yes","No") if 1 == s then __give_empire_priv(e, t, g[p], v*60*60) say("Aktiviert!") else say("Fail.") end end end end end end

User-Panel

Spoiler

PHP Code:

quest user begin state start begin when 60002.use begin say_title("BloodStorm2 Userpanel") say("") say_reward("Willkommen im Userpanel von BS2") say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen") say("") local main_set = select("Lager-Tool","Reich's Teleport","Shops","Team-Liste","Panel Entbuggen","Garnichts") if main_set == 6 then say("Nagut, vielleicht beim n�chsten mal") return end if main_set == 1 then say_title("Lagerverwalter:") say("Hey, ich kann auch von weit weg") say("euer Lager/Itemshop �ffnen...willst du") say("das ich das mache?") local gg = select("Lager �ffnen","Is-Lager �ffnen","Nichts �ffnen") if gg == 3 then say("Okay wie du gedenkst. Bis sp�ter!") return end if gg == 1 then say("Okey ich �ffne dir dein Lager!") say("Beachte: Du kannst dein Lager nur") say("jede 10 Sekunden aufrufen") game.open_safebox() chat("Lager ge�ffnet") end if gg == 2 then say("Okey ich �ffne dein Itemshop-Lager") say("Beachte: Du kannst dein Itemshop-Lager") say("nur jede 10 Sekunden �ffnen") game.open_mall() chat("Lager ge�ffnet") end end if main_set == 2 then say("Du willst dich also Teleportieren?") say("") local j = select("Ja","Nein") if j == 2 then return end if j == 1 then say_reward("Wo m�chtest du hin:") local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Lieber nicht.") if k == 4 then return end if k == 1 then pc.warp(469300, 964200) end if k == 2 then pc.warp(969600, 278400) end if k == 3 then pc.warp (55700, 157900) end end end if main_set == 3 then say("Du kannst die Shops auch von weitem ansprechen!") say("Jedoch kostet es dich 100.000Yang. Ich weiss,") say("dass es ist nicht wenig ist.") say("") say("Bist du einverstanden?") local j = select("Okay","Nein") if j == 2 then return end if j == 1 then say_reward("Welchen Shop willst du �ffnen?") local k = select("Gemischtwahrenh�ndlerin","Item-Shop","SteinTruhe","Lieber nicht.") if k == 4 then return end if k == 1 then npc.open_shop (3) pc.change_money(-100000) end if k == 2 then npc.open_shop (13) pc.change_money(-100000) end if k == 3 then npc.open_shop (12) pc.change_money(-100000) end end end if main_set == 4 then say_reward("Hier siehst du alle Teammitglieder") say("") say_reward("Die ServerAdmin�s [SA] :") say("[SA]Kedoja") say_reward("Die GameAdmin�s [GA] :") say("Keine") say_reward("Die SuperGameMaster�s [SGM] :") say("Keine") say_reward("Die GameMaster�s [GM] :") say("Keine") say("Keine") say_reward("Die TestGameMaster�s [TGM] :") say("Keine") say("Keine") say("Du kannst dir die Liste jederzeit erneut anschaun") return end if main_set == 5 then say_reward("Also dein Panel ist Verbuggt Hmmmmm...") say("") say_reward("Sprich mit einem X beliebigen NPC") say_reward("danach solte es gehen!") say("") say_reward("Fals es nicht Funktioniert") say_reward("kauf dir einfach ein neues.") say("") say("") say("Ach du meine G�te schaus dir an es") say("zerf�llt gleich in tausend Teile!") say("Ich nehme dein altes und gebe dir ein neues.") Ansprechen-->chat.npc(20023) <--- Ansprechen pc.remove_item(60002, 1) pc.give_item2(60002,1 ) end end end end

hoffentlich hilft mir mal einer

Will mir den niemand helfen??
Ich sitze jetz ehwig dran und packe das immer noch nicht! :(

07/12/2012 11:46 Fear *_*#6270

@Azemi6: Bei deinem 1. Problem sind ganz am ende paar Failes leider habe isch momentan keine Pc daher kann isch dir erstma nur sagen das du dort nach dem fehler schauen musst.

Zu 2. : f�ge einfach : when 9009.chat."User-Panel" begin
Anstatt dem when use dann kannst du 9009 (Fischer) ansprechen und da dann des userpanel starten kannst nat�rlich jeden anderen npc nehmen ! :D

Hoffe des hilft dir ein wenig :D

Page 418 of 845

418