Quest na banowanie

[Argin™]

Cześć znalazłem na kompie quest do banowania ; ).

quest panel_admina begin

	state start begin

		when login or levelup with pc.is_gm() begin

			if pc.count_item(30182) == 0 then

				pc.give_item2(30182, 1)

			end

			if pc.count_item(30182) >= 2 then

				pc.removeitem(30182)

			end

		end

		when 30182.use with pc.is_gm() begin

			say_title("Informacja:")

			say("")

			say("Wybierz jakaś z poniższych funkcji:")

			say("")

			local s = select("Zbanuj Gracza", "Odbanuj Gracza", "Banowanie na czas", "Wyjdź!")

			if s == 10 then

				return

			elseif s == 1 then

				say_title("Etap I:")

				say("")

				say("Podaj nick gracza:")

				say("")

				local nick = input()

				say_title("Etap II:")

				say("")

				say("Czy napewno chcesz zbanować gracza?")

				say("")

				local na_pewno = select("Tak!", "Nie..")

				if na_pewno == 2 then

					return

				elseif na_pewno == 1 then

					local id = query("SELECT account_id FROM player.player WHERE name = '"..nick.."';")

					query("UPDATE account.account SET status = 'BLOCK' WHERE id = '"..id.."';")

					say_reward("Banowania zakończono pomyślnie.")

					notice_all("Nick zbanowanego gracza: "..nick.."")

					notice_all("Ban wygaśnie: Nigdy")

					notice_all("Gracz został zbanowany przez: "..pc.get_name().."")

				end

			elseif s == 2 then

				say_title("Etap I:")

				say("Podaj nick gracza:")

				say("")

				local nick = input()

				say_title("Etap II:")

				say("")

				say("Na pewno chcesz odbanować gracza?")

				say("")

				local na_pewno = select("Tak!", "Nie..")

				if na_pewno == 2 then

					return

				elseif na_pewno == 1 then

					local id = query("SELECT account_id FROM player.player WHERE name = '"..nick.."';")

					query("UPDATE account.account SET status = 'OK', availDt = '0000-00-00 00:00:00' WHERE id = '"..id.."';")

					say_reward("Odbanowanie zakończono pomyślnie.")

				end

				elseif s == 3 then

				say_title("Etap I:")

				say("")

				say("Podaj nick gracza:")

				say("")

				local nick = input()

				say_title("Etap II:")

				say("")

				say("Podaj do kiedy ma być zbanowany:[ENTER]")

				say_reward("Wzór: 0000-00-00 00:00:00")

				say("")

				local dni = input()

				say_title("Etap III:")

				say("")

				say("Na pewno chcesz zbanować gracza?")

				say("")

				local tak = select("Tak!", "Nie..")

				if tak == 2 then

					return

				elseif tak == 1 then

					local id = query("SELECT account_id FROM player.player WHERE name = '"..nick.."';")

					query("UPDATE account.account SET availDt = '"..dni.."' WHERE id = '"..id.."';")

					say_reward("Banowania zakończono pomyślnie.")

					notice_all("Nick zbanowanego gracza: "..nick.."")

					notice_all("Ban wygaśnie: "..dni.."")

					notice_all("Gracz został zbanowany przez: "..pc.get_name().."")

				end

			end

		end

	end

end         

[ullucar]

Taki sredni ten quest. Oczywiscie mozna napisac go lepiej, ale jesli zdaje swoj egzamin w grze to jest okej

[Rotcher]

Quest jak każdy do banowania ale dzięki ;p

[Quentis.]

Quest z 2011 roku brawo, cofamy się

[Vengard.pl]

Słabe rozwiązanie. Zapytania sformułowałbym nieco inaczej, wziąłbym to w letter i przede wszystkim zabezpieczyłbym inputy+dodałbym do tego pętle while.

[Ravoner]

Quest bardzo dobry mimo, że ma parę ładnych lat.