Xin cứu về hệ thống vip

[hxhhxhz]

ai giúp e cái hệ thống mua vip với..
hướng dẫn e cách thêm danh hiệu khi mua vip với..

[localhost169]

ai giúp e cái hệ thống mua vip với..
hướng dẫn e cách thêm danh hiệu khi mua vip với..

hướng dẫn sơ qua thôi nhé
tạo 3 skill vip (Vip 1, Vip 2, Vip 3) với 3 effect khác nhau (mấy cái effect như là thời gian tách đồ, trùng sinh đồng hành nó có thời gian bao lâu đó) trong skill.txt. và stateeffect.txt
tạo 3 cái title Víp 1, Vip 2, Vip 3 trong title.xml

khi mua vip thì add title vip 1, add skillstate(effect) cho thời gian là 1 tuần
trong các hoạt động thì check nếu có vip 1 thì cho phần thưởng nhiều hơn
giá víp thì tạo 3 item vip 1 vip 2 vip 3 bán với giá đồng trên KTC trong scriptitem.txt

ngon hơn thì check nếu víp 1 đang còn thì vẫn có thể sử dụng vip 2, del stateeffect của vip 1 đi và add vip 2 vào
nếu vip 2 có thì có thể sử dụng vip 2, vip 1 ko dc xài

đơn giản vậy thôi đó mà =))

[hxhhxhz]

hướng dẫn sơ qua thôi nhé
tạo 3 skill vip (Vip 1, Vip 2, Vip 3) với 3 effect khác nhau (mấy cái effect như là thời gian tách đồ, trùng sinh đồng hành nó có thời gian bao lâu đó) trong skill.txt. và stateeffect.txt
tạo 3 cái title Víp 1, Vip 2, Vip 3 trong title.xml

khi mua vip thì add title vip 1, add skillstate(effect) cho thời gian là 1 tuần
trong các hoạt động thì check nếu có vip 1 thì cho phần thưởng nhiều hơn
giá víp thì tạo 3 item vip 1 vip 2 vip 3 bán với giá đồng trên KTC trong scriptitem.txt

ngon hơn thì check nếu víp 1 đang còn thì vẫn có thể sử dụng vip 2, del stateeffect của vip 1 đi và add vip 2 vào
nếu vip 2 có thì có thể sử dụng vip 2, vip 1 ko dc xài

đơn giản vậy thôi đó mà =))

đối với a đơn giản chứ vs e thỳ chịu rầu..khó quá a ơi

[nghichtu91]

đối với a đơn giản chứ vs e thỳ chịu rầu..khó quá a ơi

người ta có câu "Khó quá bỏ qua haha"

[localhost169]

local tbNpc = Npc:GetClass("chucnang_muavip")

function tbNpc:OnDialog()
local szMsg = [[

<color=cyan>Chỗ ta có các chức năng Vip sau, các hạ tham khảo.<color>

Vip 1 : Tăng 150 lần khiêu chiến du long <20 vạn đồng>.
Vip 2 : Tăng Tăng 150 lần khiêu chiến du long + 30% số lệnh bài trên KTC <30 vạn đồng>
Vip 3 : Tăng Tăng 300 lần khiêu chiến du long + 30% số lệnh bài trên KTC <50 vạn đồng>

<color=yellow>Chú Ý <color> :
Hiệu Ứng Vip trên sẽ có hiệu lực 1 tuần.
]]

local tbOpt = {};
table.insert(tbOpt , {"<color=blue> Kích Hoạt Vip Cấp 1", self.muavip1, self});
table.insert(tbOpt , {"<color=gold> Kích Hoạt Vip Cấp 2", self.muavip2, self});
table.insert(tbOpt , {"<color=green> Kích Hoạt Vip Cấp 3", self.muavip3, self});
table.insert(tbOpt , {"Ta không cần !"});
Dialog:Say("Xin chào <color=yellow>"..me.szName.."<color>!".. szMsg, tbOpt);
return 0;
end;
---=================================
function tbNpc:about_muavip()
me.CallClientScript({"OpenWebSite", ""});
end
---=================================
function tbNpc:muavip1()
if (me.nCoin < 200000) then
Dialog:Say("Kích hoạt Vip cấp 1 cần <color=yellow>20v đồng<color>.Kiểm tra lại ngân lượng !");
return 0;
end
local SkillVip = me.GetSkillState(17)
local SkillVip2 = me.GetSkillState(18)
local SkillVip3 = me.GetSkillState(19)
if SkillVip > 0 or SkillVip2 > 0 or SkillVip3 > 0 then
Dialog:Say("Bạn vẫn còn thời gian sử dụng <color=yellow>Vip cùng cấp hoặc cấp cao hơn<color>.Hãy kiểm tra lại!");
return 0;
else
me.AddJbCoin(-200000);
me.AddSkillState(17, 1, 2, Env.GAME_FPS * 3600 * 24 * 7, 1, 0, 1);
me.AddTitle(15, 1, 1, 1)
Dialog:Say("Bạn đã kích hoạt <color=cyan>Vip 1<color> thành công.<enter><enter><color=cyan>Tăng thêm 150 lần Khiêu Chiến Du Long / ngày<color><enter><enter>Thời gian tồn tại trong 7 ngày !");
return 1;
end
end
function tbNpc:muavip2()
if (me.nCoin < 300000) then
Dialog:Say("Kích hoạt Vip cấp 2 cần <color=yellow>30v đồng<color>.Kiểm tra lại ngân lượng !");
return 0;
end
local SkillVip = me.GetSkillState(18)
local SkillVip3 = me.GetSkillState(19)
if SkillVip > 0 or SkillVip3 > 0 then
Dialog:Say("Bạn vẫn còn thời gian sử dụng <color=yellow>Vip cùng cấp hoặc cấp cao hơn<color>.Hãy kiểm tra lại!");
return 0;
else
me.AddJbCoin(-300000);
me.RemoveSkillState(17, 1);
me.AddSkillState(18, 2, 2, Env.GAME_FPS * 3600 * 24 * 7, 1, 0, 1);
me.AddTitle(15, 1, 2, 1)
Dialog:Say("Bạn đã kích hoạt <color=pink>Vip 2<color> thành công.<enter><enter><color=pink>Tăng thêm 150 lần Khiêu Chiến Du Long / ngày<enter>Tăng thêm 30% sử dụng các loại lệnh bài danh vọng KTC / ngày<color><enter><enter>Thời gian tồn tại trong 7 ngày !");
return 1;
end
end
function tbNpc:muavip3()
if (me.nCoin < 500000) then
Dialog:Say("Kích hoạt Vip cấp 3 cần <color=yellow>50v đồng<color>.Kiểm tra lại ngân lượng !");
return 0;
end
local SkillVip = me.GetSkillState(19)
if SkillVip > 0 then
Dialog:Say("Bạn vẫn còn thời gian sử dụng <color=yellow>Vip cùng cấp hoặc cấp cao hơn<color>.Hãy kiểm tra lại!");
return 0;
else
me.AddJbCoin(-500000);
me.RemoveSkillState(17, 1);
me.RemoveSkillState(18, 2);
me.AddSkillState(19, 3, 2, Env.GAME_FPS * 3600 * 24 * 7, 1, 0, 1);
me.AddTitle(15, 1, 3, 1)
Dialog:Say("Bạn đã kích hoạt <color=yellow>Vip 3<color> thành công.<enter><enter><color=yellow>Tăng thêm 300 lần Khiêu Chiến Du Long / ngày<enter>Tăng thêm 30% sử dụng các loại lệnh bài danh vọng KTC / ngày<color><enter><enter>Thời gian tồn tại trong 7 ngày !");
return 1;
end
end

tự mò phần còn lại trong setting nhé

[thiennhan]

tự mò phần còn lại trong setting nhé

vang tks a..có gì k hĩu e hõi a được k ạ