Cái hot hiện nay là chống pc

[devsevergame]

Hiện nay thấy nhiều sv dùng chức năng chống tống kim 2ac/1pc không biết có ai share k nhỉ, ngon quá.
Danhkiem
Tuyetdinhkiemthe
Ktvolam

[EngiS]

chủ thớt là admin sv nào vậy :D

[devsevergame]

chủ thớt là admin sv nào vậy :D

Từng làm ad rồi, mà bị ăn hành đủ kiểu sợ rồi. giờ dev hết lỗi ngon tí mới nghỉ đến ad tiếp

[bitmoiso]

Hiện nay thấy nhiều sv dùng chức năng chống tống kim 2ac/1pc không biết có ai share k nhỉ, ngon quá.
Danhkiem
Tuyetdinhkiemthe
Ktvolam

Gợi ý cho nhé :

Trong server có sẵn script lấy "Mã ổ cứng" Hard Ware Id . Kiểm tra cho 1 Hard Ware Id mà có nhìu acc login thì chặn thôi :D

[devsevergame]

Gợi ý cho nhé :

Trong server có sẵn script lấy "Mã ổ cứng" Hard Ware Id . Kiểm tra cho 1 Hard Ware Id mà có nhìu acc login thì chặn thôi :D
Có sẵn, bản 2.6 có hàm đó k bạn?, hay chỉ linux mới có, bạn biết có thể gợi ý rõ hơn đc k ạ.

[__Jie__]

Thử xem . search trong 4rum thấy có rồi

Nguồn: <b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

[QUOTE=kittyngoc_dp_;851088]dựa vào hàm me.dwHardWareId e lấy ý tưởng giới hạn 1 acc/1 máy vào chiến tg ntn:

e thêm vào script\mission\battle\npc\mubingxiaowei.lua

local nHardWareId = me.dwHardWareId;
local szContent = string.format("%s\t%s\n",nHardWareId,me.szName)
KFile.AppendFile("..\\Gamecenter\\playerladder\\idhdd.txt", szContent);

Như vậy nv đầu tiên vào chiến tr sẽ ghi ID ổ cứng và tên vào file idhdd.txt. tiếp đó thêm cái này vào đầu function tbNpcBase:OnDialog()

tbNpcBase.HardWareId = Lib:LoadTabFile("..\\Gamecenter\\playerladder\\idhdd.txt");
if tbNpcBase.HardWareId then
for i, tbRow in ipairs(tbNpcBase.HardWareId) do
local nHardWareId = tbRow.ID;
local szName = tbRow.szName;
local meHardWareId = me.dwHardWareId;
if me.szName ~= szName and nHardWareId == meHardWareId then
Dialog:Say("Chỉ 1 nhân vật trên 1 máy trạm được phép tham gia chiến trường");
end
end
end

Thêm cái check tên để nhỡ có bị uot acc ra thì vẫn vào lại đc. Kết quả là ko hoạt động. Các bác giúp e xem code sai chỗ nào? Ko thấy báo lỗi gì mà.[-O

[visaothe123]

function tbGift:ip1()
local szContent = string.format("%s\t%s\n",nHardWareId , me.szName)
KFile.AppendFile("\\LuuTK\\ID\\CheckID.txt", szContent);
end


function tbGift:ip2()
tbGift.HardWareId = Lib:LoadTabFile("\\LuuTK\\ID\\CheckID.txt");
if tbGift.HardWareId then
for i, tbRow in ipairs(tbGift.HardWareId) do
local szName = tbRow.Name;
local nHardWareId = tbRow.IDHard;
local nHardWareId = me.dwHardWareId;

if me.szName ~= szName and nHardWareId > 1 then
Dialog:Say("Mỗi PC được phép tham gia tống kim 2 tài khoản.");
end
end
end
end

[devsevergame]

function tbGift:ip1()
local szContent = string.format("%s\t%s\n",nHardWareId , me.szName)
KFile.AppendFile("\\LuuTK\\ID\\CheckID.txt", szContent);
end


function tbGift:ip2()
tbGift.HardWareId = Lib:LoadTabFile("\\LuuTK\\ID\\CheckID.txt");
if tbGift.HardWareId then
for i, tbRow in ipairs(tbGift.HardWareId) do
local szName = tbRow.Name;
local nHardWareId = tbRow.IDHard;
local nHardWareId = me.dwHardWareId;

if me.szName ~= szName and nHardWareId > 1 then
Dialog:Say("Mỗi PC được phép tham gia tống kim 2 tài khoản.");
end
end
end
end

vẫn không được bác ơi, code của bác là check theo giòng, qua 2 giòng là nó check, k cần mã ổ cứng nó cũng check, ai fix lại giúp với.

[thuannd203]

function tbGift:ip1()
local szContent = string.format("%s\t%s\n",nHardWareId , me.szName)
KFile.AppendFile("\\LuuTK\\ID\\CheckID.txt", szContent);
end


function tbGift:ip2()
tbGift.HardWareId = Lib:LoadTabFile("\\LuuTK\\ID\\CheckID.txt");
if tbGift.HardWareId then
for i, tbRow in ipairs(tbGift.HardWareId) do
local szName = tbRow.Name;
local nHardWareId = tbRow.IDHard;
local nHardWareId = me.dwHardWareId;

if me.szName ~= szName and nHardWareId > 1 then
Dialog:Say("Mỗi PC được phép tham gia tống kim 2 tài khoản.");
end
end
end
end

Ngoài luồng tý, Bạn gì ơi check inbox giùm mình rồi send mình số điện thoại liên hệ nhé.