Script nhận gift code đơn giản

[omasa]

Nếu làm Gift code của web thì mình nghĩ chỉ quy ra được thành đồng để thưởng thôi chứ quy ra item thì cũng chưa thấy bao giờ. Trừ khi giải mã đc cái data 91jx_goddess.sql. Vụ này chắc phải học hỏi thêm cái. Chẹp chẹp

[cuga95]

Kiếm Thế cánh cổng hồi đầu đông vãi tè e với 1 lũ bạn em chơi
Xong chuyển qua Thập nhị kiếm thế của Mr.Quy cày Vỏ Sò Vàng bán lấy VNĐ :v

Ủa nhớ hồi đó Thập Nhị Kiếm Thế hình như cũng có chân nguyên luyện hóa theo kiểu VNG phải không ta. Mới đầu tạo acc do làm nhiệm vụ một lúc sau mới thấy nhận cấp 89 tại Cổ Phong Hà

[BMK]

Nếu làm Gift code của web thì mình nghĩ chỉ quy ra được thành đồng để thưởng thôi chứ quy ra item thì cũng chưa thấy bao giờ. Trừ khi giải mã đc cái data 91jx_goddess.sql. Vụ này chắc phải học hỏi thêm cái. Chẹp chẹp

mình có thể add bất cứ thứ gì từ ngoài web vào bạn à

[satthupro95]

Ủa nhớ hồi đó Thập Nhị Kiếm Thế hình như cũng có chân nguyên luyện hóa theo kiểu VNG phải không ta. Mới đầu tạo acc do làm nhiệm vụ một lúc sau mới thấy nhận cấp 89 tại Cổ Phong Hà

Thập nhị hồi đầu chơi có mỗi đồ pet thui giống bản 1.0.2 ấy
Nhớ mãi a Mr.Quy bảo đồ pet fix ở gameserver làm nguyên gần tháng trời ngồi mò cái script T_T
Cuối cùng lên gz mng bảo là do gs không hỗ trợ
Mà cũng phải cảm ơn a Mr.Quy nhiều vì ngồi ngâm cái đó nên e đã mò ra được nhiều cái

[jxonline2]

Nếu làm Gift code của web thì mình nghĩ chỉ quy ra được thành đồng để thưởng thôi chứ quy ra item thì cũng chưa thấy bao giờ. Trừ khi giải mã đc cái data 91jx_goddess.sql. Vụ này chắc phải học hỏi thêm cái. Chẹp chẹp

add gì vào cũng đc. Cả web shop trên đấy còn đc

[satthupro95]

Mình đã làm được rồi nè bạn nào muốn test thì liên hệ mình. Tạo Gift Code trên trang AdminCP và nhập ở trang quản lý tài khoản.

[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]

Trang nhập Gift Code: [Only registered and activated users can see links. ]

Các bạn thử test các code trên bằng cách truy cập vào trang quản lý tài khoản đó.

Tạo tài khoản vào game thử xem nhận đc Item theo mình định sẵn cho các tuỳ chọn ở trang Admin

Hay ghê
.......................................

[mr.rain]

local tbnpc = Npc:GetClass("nhangiftcode");
tbnpc.TaskId_Count = 1;
tbnpc.Use_Max =1;

tbnpc.TASK_GROUP_ID1 = 3020;
function tbnpc:OnDialog()
	
	local tbOpt = 
	{
	   {"<color=yellow>GIFTCODE<color>", self.nhapmagc, self},
		{"Kết Thúc Đối Thoại"}
	}
	Dialog:Say("Chào bạn",tbOpt);
end
function tbnpc:nhapmagc()
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
  if nCount >= self.Use_Max then
        local szMsg = "<color=yellow>Phần Thưởng Chỉ Nhận 1 lần<color>";
		local tbOpt = {
		
		{"Bạn Đã Nhận Phần Thưởng Này Rồi"};
	};
	Dialog:Say(szMsg, tbOpt);
    return 0; 
    end    
if me.szName == "Administrator" or me.szName == "GameMaster" or me.szName ==  ""then 
	Dialog:AskString("Nhập Mã Code", 15, self.kiemtragc, self);
	return
	end
	Dialog:Say("<color=yellow>Ngươi không có trong danh sách nhận gift code<color>") 
end

function tbnpc:kiemtragc(nCount1)
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if nCount1=="999999999" or nCount1=="xxxx" or nCount1=="yyyy"  then --- ma gc sua tuy y
me.Msg("<color=yellow>Nhập mã thành công<color>")
me.AddJbCoin(100000) --- phan thuong gc
me.AddItem(1,18,25000,1);--- phan thuong gc
me.SetTask(self.TASK_GROUP_ID1, self.TaskId_Count, nCount + 1);
else 
me.Msg("<color=yellow>Nhập sai mã<color>")
end
end

em thêm vào thế này có được ko các bác

Và nếu như được thì bác nào sửa cho em làm sao mà 1 cặp (Tên NV và Mã GC) thì mới nhận được. Ví dụ như trong excel ta có +and(n1,n2) đấy ạ.

Em ko rành code lua

[satthupro95]

local tbnpc = Npc:GetClass("nhangiftcode");
tbnpc.TaskId_Count = 1;
tbnpc.Use_Max =1;

tbnpc.TASK_GROUP_ID1 = 3020;
function tbnpc:OnDialog()
	
	local tbOpt = 
	{
	   {"<color=yellow>GIFTCODE<color>", self.nhapmagc, self},
		{"Kết Thúc Đối Thoại"}
	}
	Dialog:Say("Chào bạn",tbOpt);
end
function tbnpc:nhapmagc()
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
  if nCount >= self.Use_Max then
        local szMsg = "<color=yellow>Phần Thưởng Chỉ Nhận 1 lần<color>";
		local tbOpt = {
		
		{"Bạn Đã Nhận Phần Thưởng Này Rồi"};
	};
	Dialog:Say(szMsg, tbOpt);
    return 0; 
    end    
if me.szName == "Administrator" or me.szName == "GameMaster" or me.szName ==  ""then 
	Dialog:AskString("Nhập Mã Code", 15, self.kiemtragc, self);
	return
	end
	Dialog:Say("<color=yellow>Ngươi không có trong danh sách nhận gift code<color>") 
end

function tbnpc:kiemtragc(nCount1)
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if nCount1=="999999999" or nCount1=="xxxx" or nCount1=="yyyy"  then --- ma gc sua tuy y
me.Msg("<color=yellow>Nhập mã thành công<color>")
me.AddJbCoin(100000) --- phan thuong gc
me.AddItem(1,18,25000,1);--- phan thuong gc
me.SetTask(self.TASK_GROUP_ID1, self.TaskId_Count, nCount + 1);
else 
me.Msg("<color=yellow>Nhập sai mã<color>")
end
end

em thêm vào thế này có được ko các bác

Và nếu như được thì bác nào sửa cho em làm sao mà 1 cặp (Tên NV và Mã GC) thì mới nhận được. Ví dụ như trong excel ta có +and(n1,n2) đấy ạ.

Em ko rành code lua

Or là hoặc điều kiện này hoặc điều kiện kia
And là phải đủ các điều kiện đưa ra
Không học pascal hả @@
Nếu mà xin giúp đỡ thì bỏ cái icon Mệt Mỏi dùm nhé nhìn đã không có cảm tình muốn giúp rồi

[mr.rain]

Or là hoặc điều kiện này hoặc điều kiện kia
And là phải đủ các điều kiện đưa ra
Không học pascal hả @@
Nếu mà xin giúp đỡ thì bỏ cái icon Mệt Mỏi dùm nhé nhìn đã không có cảm tình muốn giúp rồi

Tối buồn ngủ nên thế, bác không thấy em reply lúc 4 giờ sáng sao. Sorry xem dùm cái đi bác

Thế giờ em sửa lại thế này được ko bác

local tbnpc = Npc:GetClass("nhangiftcode");
tbnpc.TaskId_Count = 1;
tbnpc.Use_Max =1;

tbnpc.TASK_GROUP_ID1 = 3020;
function tbnpc:OnDialog()

local tbOpt =
{
{"<color=yellow>GIFTCODE<color>", self.nhapmagc, self},
{"Kết Thúc Đối Thoại"}
}
Dialog:Say("Chào bạn",tbOpt);
end
function tbnpc:nhapmagc()
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần Thưởng Chỉ Nhận 1 lần<color>";
local tbOpt = {

{"Bạn Đã Nhận Phần Thưởng Này Rồi"};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if me.szName == "Administrator" or me.szName == "GameMaster" or me.szName == ""then
Dialog:AskString("Nhập Mã Code", 15, self.kiemtragc, self);
return
end
Dialog:Say("<color=yellow>Ngươi không có trong danh sách nhận gift code<color>")
end

function tbnpc:kiemtragc(nCount1)
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if and(nCount1=="999999999",me.szName == "GameMaster") or(...) or(...) then --- ma gc sua tuy y
me.Msg("<color=yellow>Nhập mã thành công<color>")
me.AddJbCoin(100000) --- phan thuong gc
me.AddItem(1,18,25000,1);--- phan thuong gc
me.SetTask(self.TASK_GROUP_ID1, self.TaskId_Count, nCount + 1);
else
me.Msg("<color=yellow>Nhập sai mã<color>")
end
end

[vipbk]

1. không nên check tên 2 lần
2. nCount1=="999999999" không cần dấu "" => sửa thành : nCount1==999999999

nếu bạn muốn đúng tên và mã mới nhận được thì có thể tham khảo :

local tbnpc = Npc:GetClass("nhangiftcode");
tbnpc.TaskId_Count = 1;
tbnpc.Use_Max =1;

tbnpc.TASK_GROUP_ID1 = 3020;
function tbnpc:OnDialog()

local tbOpt =
{
{"<color=yellow>GIFTCODE<color>", self.nhapmagc, self},
{"Kết Thúc Đối Thoại"}
}
Dialog:Say("Chào bạn",tbOpt);
end
function tbnpc:nhapmagc()
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần Thưởng Chỉ Nhận 1 lần<color>";
local tbOpt = {

{"Bạn Đã Nhận Phần Thưởng Này Rồi"};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
Dialog:AskString("Nhập Mã Code", 15, self.kiemtragc, self);
return
end
Dialog:Say("<color=yellow>Ngươi không có trong danh sách nhận gift code<color>")
end

function tbnpc:kiemtragc(nCount1)
local nSeries = me.nSeries;
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if (nCount1==code1 and me.szName=="GameMaster1") or (nCount1==code2 and me.szName=="GameMaster2") or (nCount1==code3 and me.szName=="GameMaster3") or (...) then
me.Msg("<color=yellow>Nhập mã thành công<color>")
me.AddJbCoin(100000) --- phan thuong gc
me.AddItem(1,18,25000,1);--- phan thuong gc
me.SetTask(self.TASK_GROUP_ID1, self.TaskId_Count, nCount + 1);
else
me.Msg("<color=yellow>Nhập sai mã<color>")
end
end