PDA

View Full Version : [QUEST] Sistem vanzare caracter



Mihai.!?
02-01-17, 22:08
Văzusem acum vreo săptămână că un utilizator vindea un quest de vânzare caracter, adică spre exemplu eu vreau să-i vând prietenului meu tot caracterul cu abilitati cu tot ce are pe el caracterul.


quest vanzare_caracter_mt2na begin
state start begin
when 50034.use begin
if not pc.can_warp() then
say("Nu puteti face asta acum. Incercati in 10 secunde.")
else
if item.get_socket(0) == 0 then
say_reward("Aici puteti posta caracterul dvs., si sa-l vindeti altui jucator.")
say_title(" Informatii importante:")
say("- Nu puteti schimba forma: TUT/GM/GA")
say("- Selectati numele in formular.")
say("- Postare anunt: Gratuit")
say_rosu("Dupa completarea formularului ve-ti fi autentificat automat. ")
local s = select("- Posteaza -", "- Inchide fereastra - ")
if s == 1 then
local acc_id = pc.get_account_id()
local pl_id = pc.get_player_id()
local pid1 = query("SELECT pid1 FROM player.player_index WHERE id='"..acc_id.."';")
local pid2 = query("SELECT pid2 FROM player.player_index WHERE id='"..acc_id.."';")
local pid3 = query("SELECT pid3 FROM player.player_index WHERE id='"..acc_id.."';")
local pid4 = query("SELECT pid4 FROM player.player_index WHERE id='"..acc_id.."';")
local name1
local name2
local name3
local name4
pc.setqf("materia_select1", tonumber(pid1))
pc.setqf("materia_select2", tonumber(pid2))
pc.setqf("materia_select3", tonumber(pid3))
pc.setqf("materia_select4", tonumber(pid4))
if pid1 == "0" then
name1 = "Nici-un caracter"
else
name1 = query("SELECT name FROM player.player WHERE id='"..pid1.."';")
end
if pid2 == "0" then
name2 = "Nici-un caracter"
else
name2 = query("SELECT name FROM player.player WHERE id='"..pid2.."';")
end
if pid3 == "0" then
name3 = "Nici-un caracter"
else
name3 = query("SELECT name FROM player.player WHERE id='"..pid3.."';")
end
if pid4 == "0" then
name4 = "Nici-un caracter"
else
name4 = query("SELECT name FROM player.player WHERE id='"..pid4.."';")
end
say("Selectati un caracter pentru a fi anulat:")
local ss = select(name1, name2, name3, name4, "Iesire!")
if ss >= 1 and ss <= 4 then
say()
if ss == 1 then
if name1 == pc.get_name() then
say("Nu puteti inchide forma pe care sunteti autentificat!")
return
elseif name1 == "Nici-un caracter" then
say("Nu puteti inchide un spatiu gol!")
return
end
end
if ss == 2 then
if name2 == pc.get_name() then
say("Nu puteti inchide forma pe care sunteti autentificat!")
return
elseif name2 == "Nici-un caracter" then
say("Nu puteti inchide un spatiu gol!")
return
end
end
if ss == 3 then
if name3 == pc.get_name() then
say("Nu puteti inchide forma pe care sunteti autentificat!")
return
elseif name3 == "Nici-un caracter" then
say("Nu puteti inchide un spatiu gol!")
return
end
end
if ss == 4 then
if name4 == pc.get_name() then
say("Nu puteti inchide forma pe care sunteti autentificat!")
return
elseif name4 == "Nici-un caracter" then
say("Nu puteti inchide un spatiu gol!")
return
end
end
local nick
if ss == 1 then
nick = query("SELECT name FROM player.player WHERE id='"..pid1.."';")
elseif ss == 2 then
nick = query("SELECT name FROM player.player WHERE id='"..pid2.."';")
elseif ss == 3 then
nick = query("SELECT name FROM player.player WHERE id='"..pid3.."';")
elseif ss == 4 then
nick = query("SELECT name FROM player.player WHERE id='"..pid4.."';")
end
say("Sigur doriti sa inchideti vanzarea caracterului: "..nick.."?")
local sss = select("- Da -", "- Nu -")
if sss == 1 then
if ss == 1 then
query("UPDATE player.player_index SET pid1='0' WHERE id='"..acc_id.."';")
item.set_socket(0, pid1)
elseif ss == 2 then
query("UPDATE player.player_index SET pid2='0' WHERE id='"..acc_id.."';")
item.set_socket(0, pid2)
elseif ss == 3 then
query("UPDATE player.player_index SET pid3='0' WHERE id='"..acc_id.."';")
item.set_socket(0, pid3)
elseif ss == 4 then
query("UPDATE player.player_index SET pid4='0' WHERE id='"..acc_id.."';")
item.set_socket(0, pid4)
end
command("logout")
say("Formular a fost anulat!")
say("Ve-ti fi delogat!")
say("Ve-ti fi delogat!")
say("Ve-ti fi delogat!")
say("Ve-ti fi delogat!")
say("Ve-ti fi delogat!")

end
end
end
elseif item.get_socket(0) > 0 then
local nick = query("SELECT name FROM player.player WHERE id='"..item.get_socket(0).."';")
local acc_id = pc.get_account_id()
say("Numele caracterului este: "..nick..".")
say("Doriti sa-l atribuiti contului dvs?")
local s = select("Da", "Nu")
if s == 1 then
local pid1 = query("SELECT pid1 FROM player.player_index WHERE id='"..acc_id.."';")
local pid2 = query("SELECT pid2 FROM player.player_index WHERE id='"..acc_id.."';")
local pid3 = query("SELECT pid3 FROM player.player_index WHERE id='"..acc_id.."';")
local pid4 = query("SELECT pid4 FROM player.player_index WHERE id='"..acc_id.."';")
if pid1 == "0" then
query("UPDATE player.player_index SET pid1='"..item.get_socket(0).."' WHERE id='"..acc_id.."';")
query("UPDATE player.player SET account_id='"..acc_id.."' WHERE id='"..item.get_socket(0).."';")
elseif pid2 == "0" then
query("UPDATE player.player_index SET pid2='"..item.get_socket(0).."' WHERE id='"..acc_id.."';")
query("UPDATE player.player SET account_id='"..acc_id.."' WHERE id='"..item.get_socket(0).."';")
elseif pid3 == "0" then
query("UPDATE player.player_index SET pid3='"..item.get_socket(0).."' WHERE id='"..acc_id.."';")
query("UPDATE player.player SET account_id='"..acc_id.."' WHERE id='"..item.get_socket(0).."';")
elseif pid4 == "0" then
query("UPDATE player.player_index SET pid4='"..item.get_socket(0).."' WHERE id='"..acc_id.."';")
query("UPDATE player.player SET account_id='"..acc_id.."' WHERE id='"..item.get_socket(0).."';")
else
say("Nu trebuie sa alocati un spatiu, pentru a atribui un caracter!")
return
end
command("logout")
item.remove()
say()
say("Caracterul a fost atribuit contului dvs.!")
say("Ve-ti fi deconectat pentru actualizari!")
say("Ve-ti fi deconectat pentru actualizari!")
say("Ve-ti fi deconectat pentru actualizari!")
say("Ve-ti fi deconectat pentru actualizari!")

end
end
end
end
end
end


Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .