GM-Panel Spackt

volume1a · 07/11/2013, 20:51

Hallo Community, und zwar habe ich folgendes Problem. Ich habe mir das Userpannel von Imbattle genommen

Link:

und habe es etwas verändert, und zwar so das er bei den Rates wenn ein GM die öffnet soll er ein PW fragen und zwar hab ich das so bearbeitet:

Vorher:

HTML Code:

-----------------------------------
-- GM Panel Quest by Imbattle V1.0
-----------------------------------
quest gm_panel begin
    state start begin
        when letter with pc.is_gm() begin
                send_letter("GM Panel by Imbattle")
        end
        when button or info begin
            say_title("Willkommen im GM Panel by Imbattle")
            say("Die meisten Inhalte dieses Panels")
            say("dürfen nur in absprache mit einem GA/SA")
            say("benutzt werden.")
            say("")
            say_reward("Bitte wähle deine Option")
            local head = select("Online Meldung", "Event Panel", "GM Set", "Abbrechen")

                if head == 1 then
                    say_title("Online Meldung")
                    say("Hier kannst du eine Meldung auswählen die du senden kannst")
                    say("wenn du den Spielern sagen möchtest das du da bist oder noch")
                    say("erreichbar bist")
                    say_reward("Bitte wähle deine Option")
                    local on = select("... ist Online", "... ist noch erreichbar", "... verabschieded sich", "Abbrechen")

                        if on == 1 then
                            notice_all("".. pc.get_name() .." ist online")
                            notice_all("Er/Sie steht für eure Fragen zur verfügung")
                            send_letter("GM Panel by Imbattle")

                        elseif on == 2 then
                            notice_all("".. pc.get_name() .." steht euch immer noch zur verfügung")
                            send_letter("GM Panel by Imbattle")

                        elseif on == 3 then
                            notice_all("".. pc.get_name() .." verabschieded sich")
                            notice_all("und wünscht euch noch viel spaß auf Unleash Online")
                            send_letter("GM Panel by Imbattle")

                        elseif on == 4 then
                        return
                    end

                elseif head == 2 then
                    say_title("Event Panel")
                    say("Dieses Panel darf nur mit absprache eines GA/SA benutzt werden")
                    say("")
                    say_reward("Bitte wähle deine Option")
                    local event = select("Event Rates", "Abbrechen")
                        
                        if event == 1 then
                            say_title("Event Rates")
                            say_reward("Bitte wähle die Rate die du erhöhen möchtest")
                                       local rateset = select ("EXP","Yang","Yang Bombe","Gegenstände","Abbrechen")  

                         if rateset == 1 then  
                            say_title("EXP Rate:")   
                            say_reward("Wie hoch soll die EXP Rate werden?") 
                                local w =select ("50","100","150","200","Abbrechen")   
                                    if w == 1 then  
                                        command("priv_empire 0 4:exp 50 24")
                                        send_letter("GM Panel by Imbattle")
                                    elseif w == 2 then  
                                        command("priv_empire 0 4:exp 100 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif w == 3 then  
                                        command("priv_empire 0 4:exp 150 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif w == 4 then  
                                        command("priv_empire 0 4:exp 200 24")
                                        send_letter("GM Panel by Imbattle")
                                    elseif w == 5 then  
                                        send_letter("GM Panel by Imbattle")
                                        return  
                                    end  
                              
                        elseif rateset == 2 then  
                            say_title("Yang Rate:")  
                            say_reward("Wie hoch soll die Yang Rate werden?")  
                                local x =select ("50","100","150","200","Abbrechen")   
                                    if x == 1 then  
                                        command("priv_empire 0 2:gold_drop 50 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif x == 2 then  
                                        command("priv_empire 0 2:gold_drop 100 24")
                                        send_letter("GM Panel by Imbattle")
                                    elseif x == 3 then  
                                        command("priv_empire 0 2:gold_drop 150 24")
                                        send_letter("GM Panel by Imbattle")
                                    elseif x == 4 then  
                                        command("priv_empire 0 2:gold_drop 200 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif x == 5 then  
                                    send_letter("GM Panel by Imbattle")
                                        return  
                                    end 
 
                        elseif rateset == 3 then  
                            say_title("Yang Bomben Rate:")   
                            say_reward("Wie hoch soll die Yangbomben Rate werden?")  
                                local y =select ("50","100","150","200","Abbrechen")   
                                    if y == 1 then  
                                        command("priv_empire 0 3:gold10_drop 50 24")  
                                        send_letter("GM Panel by Imbattle")
                                    elseif y == 2 then  
                                        command("priv_empire 0 3:gold10_drop 100 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif y == 3 then  
                                        command("priv_empire 0 3:gold10_drop 150 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif y == 4 then  
                                        command("priv_empire 0 3:gold10_drop 200 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif y == 5 then  
                                    send_letter("GM Panel by Imbattle")
                                        return  
                                    end  
                        elseif rateset == 4 then  
                            say_title("Gegenstände Rate:") 
                            say("Wie hoch soll die Gegenstand Rate werden?")  
                            local z =select ("50","100","150","200","Abbrechen")   
                                    if z == 1 then  
                                        command("priv_empire 0 1:item_drop 50 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif z == 2 then  
                                        command("priv_empire 0 1:item_drop 100 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif z == 3 then  
                                        command("priv_empire 0 1:item_drop 150 24")
                                        send_letter("GM Panel by Imbattle")
                                    elseif z == 4 then  
                                        command("priv_empire 0 1:item_drop 200 24") 
                                        send_letter("GM Panel by Imbattle")
                                    elseif z == 5 then 
                                    send_letter("GM Panel by Imbattle")
                                        return  
                                    end  
                                    
                        elseif rateset == 5 then  
                        send_letter("GM Panel by Imbattle")
                            return  
                        end
                        
                        elseif event == 2 then
                        send_letter("GM Panel by Imbattle")
                        return
                    end        
                
                elseif head == 3 then
                    say_title("GM Set")
                    say_reward("Bitte wähle deine Option")
                    local set = select ("GM Equipment", "Militärgaul", "Abbrechen")
                    
                        if set == 1 then
                            say_title("Gm Eq")
                            say_reward("Item1 erhalten.")
                            say_reward("Item2 erhalten.")
                            say_reward("Item3 erhalten.")
                            say_reward("Item4 erhalten.")
                            say_reward("Item5 erhalten.")
                            pc.give_item2(19,1)
                            pc.give_item2(19,1)
                            pc.give_item2(19,1)
                            pc.give_item2(19,1)
                            pc.give_item2(19,1)
                            send_letter("GM Panel by Imbattle")

                        elseif set == 2 then
                            say_title("Militärgaul")
                            pc.set_skill_level(131, 10)
                            horse.set_level(21)
                            horse.summon()    
                            horse.ride()
                            pc.give_item2(50053, 1)
                            say_reward("Dein Pferd ist nun auf Level 21")
                            say_reward("Dein Pferderufen ist nun auf Level 10")
                            say_reward("Dein Pferd wurde gerufen")
                            say_reward("Du hast Waffenperfdebuch erhalten")
                            send_letter("GM Panel by Imbattle")
    
                        elseif set == 3 then
                        send_letter("GM Panel by Imbattle")
                            return
                        end
                
                elseif head == 4 then
                send_letter("GM Panel by Imbattle")
                    return
            end
        end
    end
end

Nachher:

Quote:

-----------------------------------
-- GM Panel Quest by Imbattle V1.0
-----------------------------------
quest gm_panel begin
state start begin
when letter with pc.is_gm() begin
send_letter("GM Panel by Imbattle")
end
when button or info begin
say_title("Willkommen im GM Panel by Imbattle")
say("Die meisten Inhalte dieses Panels")
say("dürfen nur in absprache mit einem GA/SA")
say("benutzt werden.")
say("")
say_reward("Bitte wähle deine Option")
local head = select("Online Meldung", "Event Panel", "GM Set", "Abbrechen")

if head == 1 then
say_title("Online Meldung")
say("Hier kannst du eine Meldung auswählen die du senden kannst")
say("wenn du den Spielern sagen möchtest das du da bist oder noch")
say("erreichbar bist")
say_reward("Bitte wähle deine Option")
local on = select("... ist Online", "... ist noch erreichbar", "... verabschieded sich", "Abbrechen")

if on == 1 then
notice_all("".. pc.get_name() .." ist online")
notice_all("Er/Sie steht für eure Fragen zur verfügung")
send_letter("GM Panel by Imbattle")

elseif on == 2 then
notice_all("".. pc.get_name() .." steht euch immer noch zur verfügung")
send_letter("GM Panel by Imbattle")

elseif on == 3 then
notice_all("".. pc.get_name() .." verabschieded sich")
notice_all("und wünscht euch noch viel spaß auf Unleash Online")
send_letter("GM Panel by Imbattle")

elseif on == 4 then
return
end

elseif head == 2 then
say_title("Event Panel")
say("Dieses Panel darf nur mit absprache eines GA/SA benutzt werden")
say("")
say_reward("Bitte wähle deine Option")
local event = select("Event Rates", "Abbrechen")

if event == 1 then
say_title("Event Rates")
say_reward("Bitte wähle die Rate die du erhöhen möchtest")
local rateset = select ("EXP","Yang","Yang Bombe","Gegenstände","Abbrechen")

if rateset == 1 then
say_title("EXP Rate:")
local c=input()
if c == "serverleitung" then
say_reward("Wie hoch soll die EXP Rate werden?")
local w =select ("50","100","150","200","Abbrechen")
if w == 1 then
command("priv_empire 0 4:exp 50 24")
send_letter("GM Panel by Imbattle")
elseif w == 2 then
command("priv_empire 0 4:exp 100 24")
send_letter("GM Panel by Imbattle")
elseif w == 3 then
command("priv_empire 0 4:exp 150 24")
send_letter("GM Panel by Imbattle")
elseif w == 4 then
command("priv_empire 0 4:exp 200 24")
send_letter("GM Panel by Imbattle")
elseif w == 5 then
send_letter("GM Panel by Imbattle")
return
end

elseif rateset == 2 then
say_title("Yang Rate:")
say_reward("Wie hoch soll die Yang Rate werden?")
local x =select ("50","100","150","200","Abbrechen")
if x == 1 then
command("priv_empire 0 2:gold_drop 50 24")
send_letter("GM Panel by Imbattle")
elseif x == 2 then
command("priv_empire 0 2:gold_drop 100 24")
send_letter("GM Panel by Imbattle")
elseif x == 3 then
command("priv_empire 0 2:gold_drop 150 24")
send_letter("GM Panel by Imbattle")
elseif x == 4 then
command("priv_empire 0 2:gold_drop 200 24")
send_letter("GM Panel by Imbattle")
elseif x == 5 then
send_letter("GM Panel by Imbattle")
return
end

elseif rateset == 3 then
say_title("Yang Bomben Rate:")
say_reward("Wie hoch soll die Yangbomben Rate werden?")
local y =select ("50","100","150","200","Abbrechen")
if y == 1 then
command("priv_empire 0 3:gold10_drop 50 24")
send_letter("GM Panel by Imbattle")
elseif y == 2 then
command("priv_empire 0 3:gold10_drop 100 24")
send_letter("GM Panel by Imbattle")
elseif y == 3 then
command("priv_empire 0 3:gold10_drop 150 24")
send_letter("GM Panel by Imbattle")
elseif y == 4 then
command("priv_empire 0 3:gold10_drop 200 24")
send_letter("GM Panel by Imbattle")
elseif y == 5 then
send_letter("GM Panel by Imbattle")
return
end
elseif rateset == 4 then
say_title("Gegenstände Rate:")
say("Wie hoch soll die Gegenstand Rate werden?")
local z =select ("50","100","150","200","Abbrechen")
if z == 1 then
command("priv_empire 0 1:item_drop 50 24")
send_letter("GM Panel by Imbattle")
elseif z == 2 then
command("priv_empire 0 1:item_drop 100 24")
send_letter("GM Panel by Imbattle")
elseif z == 3 then
command("priv_empire 0 1:item_drop 150 24")
send_letter("GM Panel by Imbattle")
elseif z == 4 then
command("priv_empire 0 1:item_drop 200 24")
send_letter("GM Panel by Imbattle")
elseif z == 5 then
send_letter("GM Panel by Imbattle")
return
end

elseif rateset == 5 then
send_letter("GM Panel by Imbattle")
return
end

elseif event == 2 then
send_letter("GM Panel by Imbattle")
return
end

elseif head == 3 then
say_title("GM Set")
say_reward("Bitte wähle deine Option")
local set = select ("GM Equipment", "Militärgaul", "Abbrechen")

if set == 1 then
say_title("Gm Eq")
say_reward("Item1 erhalten.")
say_reward("Item2 erhalten.")
say_reward("Item3 erhalten.")
say_reward("Item4 erhalten.")
say_reward("Item5 erhalten.")
pc.give_item2(19,1)
pc.give_item2(19,1)
pc.give_item2(19,1)
pc.give_item2(19,1)
pc.give_item2(19,1)
send_letter("GM Panel by Imbattle")

elseif set == 2 then
say_title("Militärgaul")
pc.set_skill_level(131, 10)
horse.set_level(21)
horse.summon()
horse.ride()
pc.give_item2(50053, 1)
say_reward("Dein Pferd ist nun auf Level 21")
say_reward("Dein Pferderufen ist nun auf Level 10")
say_reward("Dein Pferd wurde gerufen")
say_reward("Du hast Waffenperfdebuch erhalten")
send_letter("GM Panel by Imbattle")

elseif set == 3 then
send_letter("GM Panel by Imbattle")
return
end

elseif head == 4 then
send_letter("GM Panel by Imbattle")
return
end
end
end
end

Ich Hoffe um Schnelle Hilfe weil wenn ich sie drinne hab die quest kommt die meldung:

HTML Code:

QUEST : gm_panel
STATE : start
WHEN  : letter
        with pc . is_gm ( )
WHEN  : button or
WHEN  : info
assertion failure : nested==0
gm_panel.quest:194:Abort trap (core dumped)

fabian1233 · 07/11/2013, 21:18

Add mich skype und schicks mir mit formatierung dann mach ichs dir

volume1a · 07/11/2013, 21:26

hab dich geaddet musst nur annehmen