quest handel_player begin
state start begin
when 9013.take with item.get_vnum() == 90023 and item.get_socket(0) == 0 begin
say_title(pc.get_name())
say("Zdobyłeś Pudełko na Duszę !")
say("Jeśli chcesz, mogę w nim ukryć dusze!")
say("Tylko pamiętaj że postać musi znajdować się ")
say("Na Twoim Koncie! ")
say("Podejmij decyzje! Tylko pamiętaj.. ")
say("Jesli się zgodzisz - nie bedzie odwrotu.. ")
local a = select("Dobrze..", "Rezygnuje!")
if a == 1 then
say_title(pc.get_name())
say_green("Zachowaj Poniższe Zasady: ")
say_reward("1.Nie możesz zakląć postaci na której aktualnie jesteś! ")
say_reward("2.Jednak pamiętaj, że ta postać musi znajdować sie na twoim koncie! ")
say_reward("3.Musisz Wygenerować Kod na Stronie Serwera! ")
wait()
say_title(pc.get_name())
say_orange("Wpisz Wygenerowany Kod na Stronie w Pole Poniżej: ")
local kod = input()
if kod == "" then
say_title(pc.get_name())
say_reward("Musisz Wpisać kod nie możesz zostawić pustego ! ")
return
end
local sprawdzkod = mysql_query("SELECT kod FROM account.account WHERE id = '"..pc.get_account_id().."';")
if kod != sprawdzkod[1][1] then
say_title(pc.get_name())
say_reward("Wpisany Kod jest nie poprawny! ")
return
else
say_title(pc.get_name())
say_green("Wpisałeś Poprawny Kod ! ")
say_orange("Wpisz teraz nick postaci którą chcesz zakląć ! ")
end
local nick = input()
if nick == pc.get_name() then
say_title(pc.get_name())
say_reward("Nie Możesz Zakląć Swojej Duszy! ")
return
end
local pid1 = mysql_query("SELECT account_id FROM player.player WHERE name = '"..nick.."';")
if pid1 != 0 then
if tonumber(pid1[1][1]) != tonumber(pc.get_account_id()) then
say_title(pc.get_name())
say_reward("Dusza nie znajduje się na twoim koncie! ")
return
end
local zaklete = mysql_query("SELECT nick FROM site.player_zaklete WHERE id_zaklinajacego = '"..pc.get_account_id().."';")
if zaklete != 0 then
local UW = mysql_query("SELECT UWOLNIONA FROM site.player_zaklete WHERE nick = '"..nick.."';")
if UW != 0 then
if UW[1][1] == "NIE" then
say_title(pc.get_name())
say_reward("Ta dusza jest już zaklęta! ")
return
end
end
end
local pid = mysql_query("SELECT id FROM player.player WHERE name = '"..nick.."';")
item.set_socket(0, pid[1][1])
mysql_query("UPDATE player.player_index SET pid1 = 0 WHERE pid1 = '"..pid[1][1].."' and id = '"..pc.get_account_id().."'; UPDATE player.player_index SET pid2 = 0 WHERE pid2 = '"..pid[1][1].."' and id = '"..pc.get_account_id().."'; UPDATE player.player_index SET pid3 = 0 WHERE pid3 = '"..pid[1][1].."' and id = '"..pc.get_account_id().."'; UPDATE player.player_index SET pid4 = 0 WHERE pid4 = '"..pid[1][1].."' and id = '"..pc.get_account_id().."';")
mysql_query("INSERT INTO site.player_zaklete VALUES ('"..pc.get_name().."', '"..pc.get_account_id().."', '"..pid[1][1].."', '', now(), 'NIE');")
say_title(pc.get_name())
say_green("Udało Się! Zakląłeś Duszę: ")
say(nick)
else
say_title(pc.get_name())
say_reward("Postać "..nick.." nie istnieje! ")
end
else
say_title(pc.get_name())
say("Jeśli się zdecydujesz - wróć później.. ")
end
end
when 9013.take with item.get_vnum() == 90023 and item.get_socket(0) != 0 begin
say_title(pc.get_name())
say("Masz Pudełko z Duszą? ")
say("To bardzo ciekawe bo na prawdę rzadko spotykam ")
say("Osoby mające ten piękny Pudełko... ")
say("Jednak jeszcze nie zapomniałęm jak uwolnić duszę ")
say("Mogę to dla ciebie zrobić ale Pudełko będe musiał Ci zabrać ")
say("To jak jesteś Zdecydowany? ")
local a = select("Uwolnij Duszę! ", "Zostawię ją dalej w Worku! ")
if a == 2 then
say_title(pc.get_name())
say("Trudno... wróc poźniej.. ")
else
local test0 = mysql_query("SELECT pid1 FROM player.player_index WHERE id = '"..pc.get_account_id().."';")
local test0 = tonumber(test0[1][1])
local test = mysql_query("SELECT pid2 FROM player.player_index WHERE id = '"..pc.get_account_id().."';")
local test = tonumber(test[1][1])
local test1 = mysql_query("SELECT pid3 FROM player.player_index WHERE id = '"..pc.get_account_id().."';")
local test1 = tonumber(test1[1][1])
local test2 = mysql_query("SELECT pid4 FROM player.player_index WHERE id = '"..pc.get_account_id().."';")
local test2 = tonumber(test2[1][1])
if test0 != 0 and test != 0 and test1 != 0 and test2 != 0 then
say_title(pc.get_name())
say("Przykro mi, ale nie możesz wchłonąć więcej dusz.. ")
return
end
if test0 == 0 then
mysql_query("UPDATE player.player_index SET pid1 = '"..item.get_socket(0).."' WHERE id = '"..pc.get_account_id().."';")
else
if test == 0 then
mysql_query("UPDATE player.player_index SET pid2 = '"..item.get_socket(0).."' WHERE id = '"..pc.get_account_id().."';")
else
if test1 == 0 then
mysql_query("UPDATE player.player_index SET pid3 = '"..item.get_socket(0).."' WHERE id = '"..pc.get_account_id().."';")
else
if test2 == 0 then
mysql_query("UPDATE player.player_index SET pid4 = '"..item.get_socket(0).."' WHERE id = '"..pc.get_account_id().."';")
end
end
end
end
local nikos = mysql_query("SELECT name FROM player.player WHERE id = '"..item.get_socket(0).."';")
mysql_query("UPDATE player.player SET account_id = '"..pc.get_account_id().."' WHERE name = '"..nikos[1][1].."';")
mysql_query("UPDATE site.player_zaklete SET id_odklinajacego = '"..pc.get_account_id().."' , UWOLNIONA = 'TAK' WHERE UWOLNIONA = 'NIE' and pid_zaklinanego = '"..item.get_socket(0).."';")
say_title(pc.get_name())
say("Pomyślnie Wchłonołeś Duszę Musisz: ")
say("Zalogować się do Gry ponownie! ")
item.remove()
end
end
when 90023.use begin
say_title(pc.get_name())
say("Masz Pudełko na Duszę ")
say("Możesz Zakląć w niej Duszę ")
say("Aby Dowiedzieć się więcej na ten temat ")
say("Udaj się do Magazyniera który znajduje się ")
say("w Mieście Pierwszym ")
say("Jeśłi Zaklołeś już Duszę w Worku ")
say("Pojawiło się w nazwię ID które ")
say("Możesz Wpisać na stronie aby zdobyć ")
say("Informacje na Temat Zaklętej Duszy! ")
local k = select("Informacje na Temat Kodu! ", "Wyjdź! ")
if k == 1 then
say_title(pc.get_name())
say_green("Aby Zakląć Duszę musisz Zalogować ")
say_green("się na stronie kliknąć po lewej stronie ")
say_green("Zaklinanie Dusz i Wygenerować kod który ")
say_green("Otrzymasz na Mail podany przy rejestracji! ")
say("")
say("")
end
if k == 2 then
return
end
end
end
end
