quest admin_control begin
   state start begin
      when letter with pc.is_gm() and pc.get_name() == "Asky" or pc.get_name() == "[NUME]" or pc.get_name() == "[NUME]" begin
         send_letter("+Control www.Shade-MT2.com")
      end
         when button or info begin
            say_title("Control Shade:")
            say("Bun venit "..pc.get_name().."!")
            say("")
            say("Unde vrea pulica ta sa umble?")
            say("")
            local choice_menu = select("- ADMIN - ", "- Server Setting -","Inchide")
            if choice_menu == 1 and pc.get_name() != "Asky" then
               syschat("Nu aveti drepturile necesare pentru aceasta sectiune!")
               return
            end
            if choice_menu == 1 and pc.get_name() == "Asky" or pc.get_name() == "[#Al3x]" or pc.get_name() == "[NUME]" then
               say_title("Admin Setting:")
               say("Yaso, fratelo!")
               say("")
               say("Ce modificari facem?")
               say("")
               local admin_setting = select("Clean & Fix - Character","Clean Logs - Server","Back Up - Server","Yaso, fratelo!")
               if admin_setting == 1 then
                  affect.add_collect(apply.MOV_SPEED, 1000, 60*60*24*365*60)
                  affect.add_collect(apply.ATT_SPEED, 1000, 60*60*24*365*60)
                  affect.add_collect(apply.STR, 1800, 7200)
                  affect.add_collect(apply.ATT_MONSTER, 5000, 7200)
                  affect.add_collect(apply.MAX_HP, 2000000, 7200)
                  affect.add_collect(apply.MAX_SP, 2000000, 7200) 
                  
                  affect.add_collect(apply.SKILL_DAMAGE_BONUS, 1500, 7200) 
                  affect.add_collect(apply.NORMAL_HIT_DAMAGE_BONUS, 1500, 7200) 
                  affect.add_collect(apply.SKILL_DEFEND_BONUS, 1500, 7200) 
                  affect.add_collect(apply.NORMAL_HIT_DEFEND_BONUS, 1500, 7200) 
               end
               if admin_setting == 2 then
                  say_title("Curata Log-uri server:")
                  say("")
                  say_reward("Doresti sa cureti log-urile din server?")
                  say("")
                  local log_clean = select("Da","Nu")
                  if log_clean == 2 then
                     return
                  else
                     os.execute("cd /usr/home/game/ && sh clear.sh")
                     syschat("Log-uri curatate!")
                  end
               end
               if admin_setting == 3 then
                  say_title("Back Up server")
                  say("")
                  say("La ce doriti sa faceti back-up?")
                  say("")
                  local backup = select("Mysql","Game + Mysql","Nimic")
                  if backup == 1 then
                     os.execute("cd /usr/home/game/ && sh backup_mysql.sh")
                     syschat("Backup finalizat!")
                  end
                  if backup == 2 then
                     os.execute("cd /usr/home/game/ && sh backup_server.sh")
                     syschat("Backup finalizat!")
                  end
               end
            end
            if choice_menu == 2 then
               say_title("Server Setting:")
               say("Bun venit "..pc.get_name().."!")
               say("")
               local server_setting = select("Evenimente","Activeaza Ratele","Inchide")
               if server_setting == 1 then
                  say_title("Lista cu evenimente:")
                  say("")
                  local evenimente = select("Cufar Lumina Lunii","Sherlock Holmes","Tanaka Eveniment","Eveniment PvM","System de Energie","Noaptea Terorii","Inchide")
                  if evenimente == 1 then
                     say_title("Eveniment Cufar Lumina Lunii:")
                     if game.get_event_flag("lumina_lunii") == 0 then
                        say_green("Evenimentul este inchis!")
                        say("")
                        say_white("Doriti sa il porniti?")
                        say("")
                        local lumina_lunii = select("Da","Nu")
                        if lumina_lunii == 1 then
                           game.set_event_flag("lumina_lunii", 1)
                           notice_all("Evenimentul lumina lunii a fost activat!")
                           return
                        end
                     end
                     if game.get_event_flag("lumina_lunii") == 1 then
                        say_green("Evenimentul este pornit!")
                        say("")
                        say_white("Doriti sa il inchideti?")
                        say("")
                        local lumina_lunii = select("Da","Nu")
                        if lumina_lunii == 1 then
                           game.set_event_flag("lumina_lunii", 0)
                           notice_all("Evenimentul lumina lunii a fost inchis!")
                           return
                        end
                     end
                  end
                  if evenimente == 2 then
                     say_title("Eveniment Sherlock Holmes")
                     if game.get_event_flag("sherlock_holmes") == 0 then
                        say_green("Evenimentul este inchis!")
                        say("")
                        say_white("Doriti sa il porniti?")
                        say("")
                        local sherlock_holmes = select("Da","Nu")
                        if sherlock_holmes == 1 then
                           game.set_event_flag("sherlock_holmes", 1)
                           notice_all("Evenimentul Sherlock Holmes a fost activat!")
                           notice_all("Jack Dovleacul va va da informatiile necesare!")
                           return
                        end
                     end
                     if game.get_event_flag("sherlock_holmes") == 1 then
                        say_green("Evenimentul este pornit!")
                        say("")
                        say_white("Doriti sa il inchideti?")
                        say("")
                        local sherlock_holmes = select("Da","Nu")
                        if sherlock_holmes == 1 then
                           game.set_event_flag("sherlock_holmes", 0)
                           notice_all("Evenimentul Sherlock Holmes a fost inchis!")
                           notice_all("Mult succes din nou duminica viitoare!")
                           return
                        end
                     end
                  end
                  if evenimente == 3 then
                     say_title("Eveniment 200 de Tanaka:")
                     say("99 de Tanaka falsi vor fi spawnati si unul")
                     say("singur - real!")
                     say("")
                     say_green("Deschizi evenimentul?")
                     say("")
                     local tanaka_start = select("Da", "Nu")
                     if tanaka_start == 1 then
                        game.set_event_flag("kill_tanaka", 1)
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5004 1")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 10")
                        command("m 5001 9")
                        notice_all("Evenimentul Tanaka a inceput! Gaseste realul Pirat Tanaka!")
                        return
                     end
                  end
                  if evenimente == 4 then
                     say_title("Eveniment PvM")
                     say("")
                     if game.get_event_flag("eveniment_pvm") == 0 then
                        say_green("Evenimentul este inchis!")
                        say("Doriti sa il porniti?")
                        say("")
                        local eveniment = select("Da", "Nu")
                        if eveniment == 2 then
                           return
                        else
                           notice_all("Evenimentul PvM a inceput!")
                           game.set_event_flag("eveniment_pvm", 1)
                           regen_in_map(63, "data/dungeon/evenimente/pvm_stone.txt")
                           regen_in_map(63, "data/dungeon/evenimente/pvm_boss.txt")
                        end
                     end
                     if game.get_event_flag("eveniment_pvm") == 1 then
                        say_green("Evenimentul este deschis!")
                        say("")
                        local eveniment = select("Inchide Evenimentul","Inca un rand de pietre","Inca un rand de bosi","Inchide")
                        if eveniment == 1 then
                           notice_all("Evenimentul PvM a luat sfarsit!")
                           game.set_event_flag("eveniment_pvm", 0)
                           kill_all_in_map(63)
                        end
                        if eveniment == 2 then
                           regen_in_map(63, "data/dungeon/evenimente/pvm_stone.txt")
                           notice_all("Inca un rand de metine au fost spawnate!")
                        end
                        if eveniment == 3 then
                           regen_in_map(63, "data/dungeon/evenimente/pvm_boss.txt")
                           notice_all("Inca un rand de bosi a fost spawnat!")
                        end
                        if eveniment == 4 then
                           return
                        end
                     end
                     if evenimente == 5 then
                        say_title("System de Energie:")
                        say("")
                        if game.get_event_flag("energy") == 0 then
                           say_green("Evenimentul este inchis!")
                           say("Doriti sa il porniti?")
                           say("")
                           local eveniment = select("Da","Nu")
                           if eveniment == 2 then
                              return
                           else
                              game.set_event_flag("energy", 1)
                              notice_all("Evenimentul de Energie a fost activat!")
                           end
                        end
                        
                        if game.get_event_flag("energy") == 1 then
                           say_green("Evenimentul este deschis!")
                           say("Doriti sa il opriti?")
                           say("")
                           local eveniment = select("Da","Nu")
                           if eveniment == 2 then
                              return
                           else
                              game.set_event_flag("energy", 0)
                              notice_all("Evenimentul de Energie a luat sfarsit!")
                           end
                        end                        
                     end
                     if evenimente == 6 then
                        say_title("Noaptea Terorii")
                        say("")
                        
                        if game.get_event_flag("terror_night") == 0 then
                           say_green("Evenimentul este inchis!")
                           say("Doriti sa il porniti?")
                           say("")
                           local eveniment = select("Da","Nu")
                           if eveniment == 2 then
                              return
                           else
                              game.set_event_flag("terror_night", 1)
                              notice_all("Noaptea Terorii a inceput! Timp de 12h veti fi in cele mai mari pericole!")
                           end
                        end
                        
                        if game.get_event_flag("terror_night") == 1 then
                           say_green("Evenimentul este deschis!")
                           say("Doriti sa il opriti?")
                           say("")
                           local eveniment = select("Da","Nu")
                           if eveniment == 2 then
                              return
                           else
                              game.set_event_flag("terror_night", 0)
                              notice_all("Noaptea Terorii a luat sfarsit! Supravietuitorii s-au ales cu premii pe masura!")
                           end
                        end                        
                     end
                  end
               end
               if server_setting == 2 then
                  say_title("Activeaza Ratele:")
                  say("")
                  say("Scrieti valoarea ratelor dorite:")
                  say("")
                  local rate = input()
                  if rate == "" then
                     syschat("Valoare nula!")
                  else
                     say_title("Activeaza ratele:")
                     say("")
                     say("Valoarea ratelor este de: "..rate..".")
                     say_green("Activati?")
                     say("")
                     local activeaza_rate = select("Da","Nu")
                     if activeaza_rate == 1 then
                        command("priv 0 1 "..rate.." 999")
                        command("priv 0 2 "..rate.." 999")
                        command("priv 0 4 "..rate.." 999")
                     end
                  end
               end
            end
         end
      end
   end