quest GMP begin
	state start begin
		when letter with pc.is_gm() begin
				send_letter(" Admin Panel ")
		end

		when button or info begin
			say(" Panel GM - ExiliosMT2 ")
			wait()
			say_title(" Menu: ")
			local selectban = select(" Ban Permanentny ", " Ban Czasowy " , " Zdjecie Blokady "," Anuluj ")
			----------------
			--- PERM BAN ---
			----------------
			if selectban == 1 then
					say_title("Banowanie: ")
					say("Podaj nick: ")
					local nick=input()
					local answer = myquery("SELECT account_id FROM player.player WHERE name = '"..nick.."';")
					say(answer)
					if answer == nil then
						say("Konto zawierające podaną postać nie istnieje.")
						return
					end
					say("Wpisz powód zablokowania:")
					local dlaczego=input()
					local id = pc.get_name()

					myquery("UPDATE player.player SET is_admin='2' WHERE `account_id` = '"..answer.."';")
					myquery("UPDATE account.account SET status = 'BLOCK' WHERE id = '"..answer.."';")

					say(""..nick.." został zbanowany permanentnie.")
					say("Powód: "..dlaczego.."")
					notice_all("[INFO]Gracz: "..nick.." został zablokowany permanentnie.")

			-----------------
			-- CZASOWY BAN --
			-----------------
			elseif selectban == 2 then
					say_title("Wpisz nick: ")
					local nick=input()
					local answer = myquery("SELECT account_id FROM player.player WHERE name = '"..nick.."';")
					if answer == nil then
						say("Konto zawierające podaną postać nie istnieje.")
						return
					end
					say_title("Wpisz liczbe godzin: ")
					say_reward("Prócz wartości całkowitych dopuszczalne jest podawanie połówek np. 1.5")
					say_reward("W liczbach ułamkowych używaj . zamiat , !")
					local howlong=input()
					say_title("Wpisz powód zablokowania:")
					local dlaczego=input()
					local id = pc.get_name()

					local dat = os.time()+(howlong*3600)
					local data = os.date("*t", dat)
					local dataFormat = datemysql(data)

					myquery("UPDATE account.account SET availDt = '"..dataFormat.."' WHERE  id = '"..answer.."';")

					say(""..nick.." został zbanowany na  "..howlong.." h")
					say("Powód: "..dlaczego.."")
					notice_all("[INFO]Gracz: "..nick.." został zbanowany na "..howlong.." h.")
			------------------
			------ UNBAN -----
			------------------
			elseif selectban == 3 then
					say("Wpisz nick:")
					local nick=input()
					local answer = myquery("SELECT account_id FROM player.player WHERE name = '"..nick.."';")

					if answer == nil then
						say("Konto zawierające podaną postać nie istnieje.")
						return
					end
					say("Wpisz powód:")
					local dlaczego = input()

					local id = pc.get_name()


					myquery("UPDATE player.player SET is_admin='0' WHERE `account_id` = '"..answer.."';")
					myquery("UPDATE account.account SET status = 'OK', availDt = '0000-00-00 00:00:00' WHERE  id = '"..answer.."';")

					say("Gracz o Nicku: "..nick.." został odbanowany.")
					notice_all("[INFO]Gracz: "..nick.." został odbanowany.")
			else
				return
			end
		end
	end
end