Share source chống cheat nhân vật cho những ai chưa biết

Như tiêu đề mình đã làm ra đc 1 cái anti hack trong sv ns chung cũng tạm
ổn nên mình shage cho các bạn ai muốn dùng thì dùng nhé các pro đừng
ném gạck keke

+Đầu tiên các bạn vào script mở gmscript lên và copy đoạn code sau

Code:: Include("\\script\\startup_remix.lua")
Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\source\\antihack.lua")

a = 0
function main(sel)
if a == 0 then
a = 1
khoidong()
anticheatnv()

else
anticheatnv()

end
end

+Tiếp đến bạn vào script\source và mở antihack.lua lên nếu ai chưa có thì tạo ra 1 cai rồi copy đoạn code sau

Code:: Include("\\dulieu\\listruong.lua")
Include("\\script\\source\\sourcejx49.lua")

idtaskruong = 35 ----- ID task ma ruong
idtasktempp = 31----- ID task luu ma ruong tam thoi
idtasktempp1 = 32 ---- ID Task so tang(floor)
idtasktempp2 = 33 ---- ID dieu kien lap mat khau va doi mat khau

function anticheatnv()

if GetLevel() >= 100 then
SetTimer(7*18,18)
end

SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
Say("<color=cyan>KiÓm
Tra Nh©n VËt:<color> \nB¹n h·y nhËp vµo m· r¬ng. NÕu b¹n cha
®æi m· r¬ng th× m· mÆc ®Þnh lµ <color=yellow>000000<color>
\nB¹n h·y ®æi m· r¬ng vµ ghi l¹i ®Ó tr¸nh kh«ng vµo ®îc nh©n vËt
",3,"NhËp M· B¶o VÖ /morp","§æi M· B¶o VÖ /dmkp","Tho¸t/saimk")
end

function morp()
if GetTaskTemp(36) == 1 then
matkhauok()
else
SetTaskTemp(idtasktempp2,0)
SetTaskTemp(idtasktempp1,GetTaskTemp(idtasktempp1)+1)

Say("MËt khÈu mÆc ®Þnh lµ
<color=yellow>000000<color>\nH·y nhËp sè thø
<color=yellow>"..GetTaskTemp(idtasktempp1).."<color> trong
mËt
khÈu",11,"0/luupass","1/luupass","2/luupass","3/luupass","4/luupass","5/luupass","6/luupass","7/luupass","8/luupass","9/luupass","Tho¸t/saimk");
end
end

function dmkp()
SetTaskTemp(idtasktempp2,1)
SetTaskTemp(idtasktempp1,GetTaskTemp(idtasktempp1)+1)

Say("MËt khÈu mÆc ®Þnh lµ
<color=yellow>000000<color>\nH·y nhËp sè thø
<color=yellow>"..GetTaskTemp(idtasktempp1).."<color> trong
mËt khÈu r¬ng cò
",11,"0/luupass","1/luupass","2/luupass","3/luupass","4/luupass","5/luupass","6/luupass","7/luupass","8/luupass","9/luupass","Tho¸t/saimk");
end

function morp1()
local a,b,c,d,e,f = phantichpas(GetTask(idtaskruong))
local a1,b1,c1,d1,e1,f1 = phantichpas(GetTaskTemp(idtasktempp))
local tring1 = a..b..c..d..e..f -- chuoi ma ruong
local tring2 = a1..b1..c1..d1..e1..f1 -- chuoi ma ruong moi nhap(tuc thoi)
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
if tring1 == tring2 then
Msg2Player("MËt khÈu chÝnh x¸c !!!")
SetTaskTemp(36,1)
matkhauok()
StopTimer()
else
Talk(1,"saimk","B¹n ®· nhËp sai mËt khÈu !!!");
end
end

function dmkp1()
local a,b,c,d,e,f = phantichpas(GetTask(idtaskruong))
local a1,b1,c1,d1,e1,f1 = phantichpas(GetTaskTemp(idtasktempp))
local tring1 = a..b..c..d..e..f -- chuoi ma ruong
local tring2 = a1..b1..c1..d1..e1..f1 -- chuoi ma ruong moi nhap(tuc thoi)
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
if tring1 == tring2 then
dmkp2()
else
Talk(1,"saimk","B¹n ®· nhËp sai mËt khÈu !!!");
StopTimer()
end
end
function dmkp2()
SetTaskTemp(idtasktempp2,2)
SetTaskTemp(idtasktempp1,GetTaskTemp(idtasktempp1)+1)

Say("ThiÕt lËp mËt khÈu r¬ng míi\nH·y nhËp sè thø
<color=yellow>"..GetTaskTemp(idtasktempp1).."<color> trong
mËt khÈu
r¬ng",11,"0/luupass","1/luupass","2/luupass","3/luupass","4/luupass","5/luupass","6/luupass","7/luupass","8/luupass","9/luupass","Tho¸t/no");
end
function dmkp3()
local a1,b1,c1,d1,e1,f1 = phantichpas(GetTaskTemp(idtasktempp))
local tring2 = a1..b1..c1..d1..e1..f1
SetTask(idtaskruong,tonumber(tring2))
hoanthanh()
end

function luupass(sel)

local tang = GetTaskTemp(idtasktempp1)
if GetTaskTemp(idtasktempp2) == 0 then
if tang == 1 then

StopTimer()
SetTimer(4*18,18)

SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*100000)
morp()
elseif tang == 2 then
StopTimer()
SetTimer(4*18,18)
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*10000)
morp()
elseif tang == 3 then
StopTimer()
SetTimer(4*18,18)
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*1000)
morp()
elseif tang == 4 then
StopTimer()
SetTimer(4*18,18)
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*100)
morp()
elseif tang == 5 then
StopTimer()
SetTimer(4*18,18)
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*10)
morp()
elseif tang == 6 then
StopTimer()
SetTimer(4*18,18)
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*1)
morp1()
else
saimk()
end
elseif GetTaskTemp(idtasktempp2) == 1 then
if tang == 1 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*100000)
dmkp()
elseif tang == 2 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*10000)
dmkp()
elseif tang == 3 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*1000)
dmkp()
elseif tang == 4 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*100)
dmkp()
elseif tang == 5 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*10)
dmkp()
elseif tang == 6 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*1)
dmkp1()
else
saimk()
end
elseif GetTaskTemp(idtasktempp2) == 2 then
if tang == 1 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*100000)
dmkp2()
elseif tang == 2 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*10000)
dmkp2()
elseif tang == 3 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*1000)
dmkp2()
elseif tang == 4 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*100)
dmkp2()
elseif tang == 5 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*10)
dmkp2()
elseif tang == 6 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+sel*1)
dmkp3()
else
saimk()
end
end
end
function hoanthanh()
local a,b,c,d,e,f = phantichpas(GetTask(idtaskruong))
danh_sach_ma[getn(danh_sach_ma)+1] = {GetName(),a..b..c..d..e..f}
local danhsachma = TaoBang(danh_sach_ma,"danh_sach_ma","")
SaveData("dulieu/listruong.lua",danhsachma)
Talk(1,"no","M· r¬ng cña b¹n lµ : "..a..b..c..d..e..f.."")
end
function phantichpas(task)
--local x,len,a,b,c,d,e,f = GetTask(task),0,0,0,0,0,0,0
local x,len = task,0
local a,b,c,d,e,f = 0,0,0,0,0,0
x = tostring(x)
len = strlen(x)
if len < 6 then
for i=1,(6-len) do
x = "0"..x
end
end
a = tonumber(strsub(x,1,1))
b = tonumber(strsub(x,2,2))
c = tonumber(strsub(x,3,3))
d = tonumber(strsub(x,4,4))
e = tonumber(strsub(x,5,5))
f = tonumber(strsub(x,6,6))
return a,b,c,d,e,f
end

function saimk()
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
KickOutSelf()
end;

function matkhauok()
MoveNPC(53,197,202,6+random(-2,2),4+random(-2,2),500,0);
SetRevPos(53,200*8,200*16)
end

+Sau khi làm xong 2 bước trên các bạn code vào Lệnh bài hỗ trợ hoặc xaphu phần đưa lên đảo hoang nhé
+Kêu gamer sau khi out cất đồ vào rường rồi lên đảo ngồi nhé khi nào vào chơi viết xong pass nhân vật thì
tự nó move về ba lăng huyện

Thấy hay thì thank mình nhé!!!
Nếu bik rồi thì đừng ném gạch nhé

Share source chống cheat nhân vật cho những ai chưa biết

Bài viết liên quan

Similar topics

Similar topics

¨‘°ºO(¯°•. Trả lời nhanh.•°¯)Oº°‘¨