Tập 2: Script Nạp Card Nhận Vật Phầm Server TTK

[ThanhVipLn]

file: napcardvp.lua



Include("\\script\\lib\\taobang.lua")
Include("\\script\\Global\\sourcejx49.lua")
Include("\\script\\napcard\\danhsachnapcardvp.lua")
Include("\\script\\napcard\\danhsachcardvp.lua")
Include("\\script\\napcard\\dulieunapcard.lua")

function nhapserivp()
SayEx({"<color="..colorS()..">Seri<color> : ","0/numbervp","1/numbervp","2/numbervp","3/numbervp","4/numbervp","5/numbervp","6/numbervp","7/numbervp","8/numbervp","9/numbervp"})
end

function numbervp(nsel)
if GetTaskTemp(TaskPassRuong) <= 6 then
SetTaskTemp(TaskPassRuong,GetTaskTemp(TaskPassRuon g) + 1)
callnumbervp(nsel)
end
end;


function callnumbervp(id)
if GetTaskTemp(TaskPassRuong) == 1 then
SetTask(163,100000*id)
Talk(1,"contivp1","So <color="..colorS()..">Seri<color> Thu 1 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 2 then
SetTask(163,GetTask(163) + (10000*id))
Talk(1,"contivp1","So <color="..colorS()..">Seri<color> Thu 2 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 3 then
SetTask(163,GetTask(163) + (1000*id))
Talk(1,"contivp1","So <color="..colorS()..">Seri<color> Thu 3 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 4 then
SetTask(163,GetTask(163) + (100*id))
Talk(1,"contivp1","So <color="..colorS()..">Seri<color> Thu 4 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 5 then
SetTask(163,GetTask(163) + (10*id))
Talk(1,"contivp1","So <color="..colorS()..">Seri<color> Thu 5 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 6 then
SetTask(163,GetTask(163) + id)
Talk(1,"Exitvp1","<color="..colorS()..">Seri<color> Da Nhap Vao: <color=yellow>"..GetTask(163)..".")
end
end;


function nhapmathevp()
SayEx({"<color="..colorS()..">Seri<color> : ","0/numbervp1","1/numbervp1","2/numbervp1","3/numbervp1","4/numbervp1","5/numbervp1","6/numbervp1","7/numbervp1","8/numbervp1","9/numbervp1"})
end

function numbervp1(nsel)
if GetTaskTemp(TaskPassRuong) <= 6 then
SetTaskTemp(TaskPassRuong,GetTaskTemp(TaskPassRuon g) + 1)
callnumbervp1(nsel)
end
end;


function Exitvp1()
SetTaskTemp(TaskPassRuong,0)
end;
function callnumbervp1(id)
if GetTaskTemp(TaskPassRuong) == 1 then
SetTask(164,100000*id)
Talk(1,"contivp","So <color="..colorS()..">Ma The<color> Thu 1 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 2 then
SetTask(164,GetTask(164) + (10000*id))
Talk(1,"contivp","So <color="..colorS()..">Ma The<color> Thu 2 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 3 then
SetTask(164,GetTask(164) + (1000*id))
Talk(1,"contivp","So <color="..colorS()..">Ma The<color> Thu 3 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 4 then
SetTask(164,GetTask(164) + (100*id))
Talk(1,"contivp","So <color="..colorS()..">Ma The<color> Thu 4 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 5 then
SetTask(164,GetTask(164) + (10*id))
Talk(1,"contivp","So <color="..colorS()..">Ma The<color> Thu 5 Da Nhap La <color=yellow>"..id.."")
elseif GetTaskTemp(TaskPassRuong) == 6 then
SetTask(164,GetTask(164) + id)
Talk(1,"Exitvp1","<color="..colorS()..">Ma The<color> Da Nhap Vao: <color=yellow>"..GetTask(164)..".")
end
end;

function contivp()
SayEx({"<color="..colorS()..">Ma The<color> : dien mat ma.","0/numbervp1","1/numbervp1","2/numbervp1","3/numbervp1","4/numbervp1","5/numbervp1","6/numbervp1","7/numbervp1","8/numbervp1","9/numbervp1"})
end;

function contivp1()
SayEx({"<color="..colorS()..">Seri<color> : dien mat ma.","0/numbervp","1/numbervp","2/numbervp","3/numbervp","4/numbervp","5/numbervp","6/numbervp","7/numbervp","8/numbervp","9/numbervp"})
end;

function napcardvp1()
for i=1,getn(NAP_CARD_VP) do
if GetTask(163) == NAP_CARD_VP[i][2] then
if GetTask(164) == NAP_CARD_VP[i][3] then
if NAP_CARD_VP[i][1] == 0 then
Talk(1,"","<color=red>The Nay Da Duoc Su Dung Rui Ban")
else
SetTask(165,NAP_CARD_VP[i][4])

thoigian = tonumber(date("%H%M%d%m"))
vatpham()
NAP_CARD_VP[i][1] = 0
NAP_CARD_VP[i][2] = GetName()
NAP_CARD_VP[i][3] = thoigian
BANG2 = TaoBang(NAP_CARD_VP,"NAP_CARD_VP")
LuuBang("script/napcard/danhsachcardvp.lua",BANG2)
Talk(1,"","Chuc Mung Ban Nap Thanh Cong: <color=red>"..tenvatpham().."")
Msg2Player("Da Nhap Du Lieu Vao He Thong")

end
end
end
end
end
function tenvatpham()
if GetTask(165) == 1 then
return "So Che - Huyen Bi"
elseif GetTask(165) == 2 then
return "Chua Co Trang Bi Nao"


end
end

function vatpham()
if GetTask(165) == 1 then
AddItem(0,4,22,1,random(0,4),0,10)
AddItem(0,2,49,1,random(0,4),0,10)
AddItem(0,6,22,1,random(0,4),0,10)
AddItem(0,5,24,1,random(0,4),0,10)
AddItem(0,8,22,1,random(0,4),0,10)
AddItem(0,7,34,1,random(0,4),0,10)
AddItem(0,9,22,1,random(0,4),0,10)
AddItem(0,3,21,1,random(0,4),0,10)
AddItem(0,3,21,1,random(0,4),0,10)
SetTask(196,100000)
elseif GetTask(165) == 2 then
Talk(1,"","Cu Them Vo Nhe")
end
end



file danhsachcardvp.lua


NAP_CARD_VP={

[1]={

[1] = 1,

[2] = 111112,

[3] = 245772,

[4] = 1

},

[2]={

[1] = 0,

<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>

[3] = 11330710,

[4] = 1

},



Cái Có [1] = 0 Tức Là đã sử dụng rùi
Cách Làm này hiệu quả Dành cho Online Đó


Viết Bài Kiếm Điển Lên Lam Mob :((

[Zin Kull]

Share mấy cái này chi cho mệt, share lum cái source của ttk đi :))

[Mr.Phát]

ổng share lặt vặt để đủ 10 bài đóng góp xin lên làm mod ý mà ;))

[[S]ocola[S]an]

Ông share script chống rollback đy Thành :)).............

[kinkina2009]

có thể dupe chỗ này

function vatpham()
if GetTask(165) == 1 then
AddItem(0,4,22,1,random(0,4),0,10)
AddItem(0,2,49,1,random(0,4),0,10)
AddItem(0,6,22,1,random(0,4),0,10)
AddItem(0,5,24,1,random(0,4),0,10)
AddItem(0,8,22,1,random(0,4),0,10)
AddItem(0,7,34,1,random(0,4),0,10)
AddItem(0,9,22,1,random(0,4),0,10)
AddItem(0,3,21,1,random(0,4),0,10)
AddItem(0,3,21,1,random(0,4),0,10)
SetTask(196,100000)
elseif GetTask(165) == 2 then
Talk(1,"","Cu Them Vo Nhe")
end
end
=)) , code cẩn thận

[ThanhVipLn]

cha này toàn kiếm chuyện để dupe ko ah.

Tui ko lấy id item của ttk đâu mà dupe

[kinkina2009]

không phải là kiếm chuyện hay không mà mún cho ông thấy ra cái lỗi, còn không thíck thì thôi ;)

[ThanhVipLn]

hông phải là kiếm chuyện hay không mà mún cho ông thấy ra cái lỗi, còn không thíck thì thôi

Thiệt Không. Chỗ Này Dupe Sao

function vatpham()
if GetTask(165) == 1 then
AddItem(0,4,22,1,random(0,4),0,10)
AddItem(0,2,49,1,random(0,4),0,10)
AddItem(0,6,22,1,random(0,4),0,10)
AddItem(0,5,24,1,random(0,4),0,10)
AddItem(0,8,22,1,random(0,4),0,10)
AddItem(0,7,34,1,random(0,4),0,10)
AddItem(0,9,22,1,random(0,4),0,10)
AddItem(0,3,21,1,random(0,4),0,10)
AddItem(0,3,21,1,random(0,4),0,10)
SetTask(196,100000)
elseif GetTask(165) == 2 then
Talk(1,"","Cu Them Vo Nhe")
end
end

Chỉ Là Hàm Add Item. Còn Kiểm Trả Là Ở Trên Kia

[nguyentrunghbl]

Bác Thành cũng giỏi nhỉ! mở online mà không ai phá được!! :)>-

[ThanhVipLn]

Bác Thành cũng giỏi nhỉ! mở online mà không ai phá được!!


Ai Nói Ko Phá đƯỢC
Tại người ta chưa phá thui.

[tungpro102]

Lòi cái IP và Port như thế phá là sập............................................. .....

[ThanhVipLn]

Lòi cái IP và Port như thế phá là sập............................................. .....

Ai Chẳng Bik. giấu Thì Cũng Được Thui nhưng mà không thjx
Mà Có Ai Ghét Mình Ko Ta. Nói Tiếng Rũ Đi Uống Cafe Là Hết Ghet :)

[kinkina2009]

Thiệt Không. Chỗ Này Dupe Sao


Chỉ Là Hàm Add Item. Còn Kiểm Trả Là Ở Trên Kia

nếu ở trên kiểm tra mà ở dưới không kiểm tra thì chuyện dupe là rất đơn giản , tốt nhất là cứ viết nguyên 1 dãy rồi Add Item đừng có làm ví du :
iF (GetTask(50) = 1) then
ok()
SetTask(50,0)
else
Talk(1,"no","Chua du dk")
end
end


function ok()
AddItem(a,b,c,x,y,z)
end
đoạn trong code không kiểm tra ==> dùng WPE send vào là dupe sll :-o

Còn việc giấu port IP là hoàn toàn không thể trừ khi không cho connect vào SV thôi :)

[ThanhVipLn]

Còn việc giấu port IP là hoàn toàn không thể trừ khi không cho connect vào SV thôi

Thui Ta Đành Ngậm Ngùi Ra Đi Vậy. Nói Chung Ai Thjx Thì Dupe. Có Bán Dc Đâu..

[thachlong78]

Lấy IP và port bàng hàm Secury, chặn lệnh SendMensengeA lấy được pass, sau đó bật clien sever khác ghi id, port, rồi đăng nhập bằng pass lấy được. Hàm secury thì khỏi phải nói, còn chặn lệnh SendMensengeA thì share trên mạng là có, chỉ đơn giản là vài lệnh Overight là được. Ngoài ra có thể dùng phần mềm tạm dừng cách file .exe đang chạy cùng game.exe lại, sau đó dùng phần mềm unjec Dll, xem dll nào mới được Injec vào các ứng dụng mới bật, ngoài những dll từ trước khi cài đặt, tắt nó đi, xong, khả năng chặn hàm Writememory đã bị loại bỏ (hàm này lấy id cửa sổ, và nghi dữ liệu mà CE dùng), giờ tắt các exe không liên quan, có thể tự do dùng gì tùy thích. Chỉ với 2 cách nhỏ trên là có thể vượt qua mọi cách antil hack hiện giờ. Còn hơn nữa bạn thêm Dll nào game.exe sẽ có vài cách tấn công sever mới (cái này phụ thuộc vào khả năng các bạn, tự ngâm cứu lấy thôi, mỗi game một khác). Nói chung lắm trò lắm, quan trọng là mấy người biết và tham ra JXP phần lớn là tâm huyết với jx, chẳng bao giờ muốn gây bất lợi cho các sever jx, hoặc là coi mấy ciệc này là thấp kém, hạ mình nên không làm. Càng học mới càng thấy quanh mình nhiều pro, là vậy đó.

[ThanhVipLn]

Lấy IP và port bàng hàm Secury, chặn lệnh SendMensengeA lấy được pass, sau đó bật clien sever khác ghi id, port, rồi đăng nhập bằng pass lấy được. Hàm secury thì khỏi phải nói, còn chặn lệnh SendMensengeA thì share trên mạng là có, chỉ đơn giản là vài lệnh Overight là được. Ngoài ra có thể dùng phần mềm tạm dừng cách file .exe đang chạy cùng game.exe lại, sau đó dùng phần mềm unjec Dll, xem dll nào mới được Injec vào các ứng dụng mới bật, ngoài những dll từ trước khi cài đặt, tắt nó đi, xong, khả năng chặn hàm Writememory đã bị loại bỏ (hàm này lấy id cửa sổ, và nghi dữ liệu mà CE dùng), giờ tắt các exe không liên quan, có thể tự do dùng gì tùy thích. Chỉ với 2 cách nhỏ trên là có thể vượt qua mọi cách antil hack hiện giờ. Còn hơn nữa bạn thêm Dll nào game.exe sẽ có vài cách tấn công sever mới (cái này phụ thuộc vào khả năng các bạn, tự ngâm cứu lấy thôi, mỗi game một khác). Nói chung lắm trò lắm, quan trọng là mấy người biết và tham ra JXP phần lớn là tâm huyết với jx, chẳng bao giờ muốn gây bất lợi cho các sever jx, hoặc là coi mấy ciệc này là thấp kém, hạ mình nên không làm. Càng học mới càng thấy quanh mình nhiều pro, là vậy đó.

Cám Ơn Đã Chỉ Dạy. Nhưng Mướp Pro Thì Ai Cũng Biết Rùi. Quan Trọng Đừng Có Khoe Những Cái Hack, Hoặc Up Những Cái Phá Sv Lên Mạng Là Mình Vui Rùi. Tui Biết bạn Đủ Sức Phá Người Khác Nhưng Bạn ko Làm. Những Cái Mà Bạn Up Lên Thật Sự Là Đã Góp 1 Phần Rất Lớn Đó. Mong Bạn Cố Gắng Share Những Cái Chống Hack Hoặc Nếu Không Thì Đừng UP Những Cái Phá Lên Mạng
Thật Sự Rất Muốn Dev JXP, Nhìn Cái ITEM Có Thân Pháp, Tiền Vạn Sài Bằng Task, Danh Vọng Sài Bằng Task Là Không Còn Cảm Hứng Gì Nữa Rùi

[kenshiwo]

Ai Nói Ko Phá đƯỢC
Tại người ta chưa phá thui.
Ở hiền gặp lành, mà chác cái CLB này cũng có đứa vào Ddos mà chưa được wa ^^! ^:)^

[Mr.Nam]

Mà Có Ai Ghét Mình Ko Ta. Nói Tiếng Rũ Đi Uống Cafe Là Hết Ghet :)

Nghe cầu này mà thích ah nha =))=))