[share] Nạp thẻ lần đầu kt 2.6

[tinhlabui]

bỏ dev kt 4 5 6 năm r nay dev lại :v
mạo muội share cái thằng sứ giả hoạt động nạp thẻ lần đầu pro biết thì đừng ném gạch em [-X


-------------------------------------------------------------------
--File: tuiguangyuan.lua
--Author: kenmaster
--Date: 2008-06-04 03:00
--Describe: 活动推广员npc脚本
-------------------------------------------------------------------
local tbTuiGuangYuan = Npc:GetClass("tuiguangyuan");
tbTuiGuangYuan.TaskGourp = 3026;
tbTuiGuangYuan.TaskGourp1 = 3028;
tbTuiGuangYuan.TaskId_TanThu = 1;
tbTuiGuangYuan.tbItemInfo = {bForceBind=1,};
--初始对话（对话1）
-- Npc.IVER_nTuiGuanYuan 数值为1，表示只有大陆版才开启这个� ��能
function tbTuiGuangYuan:OnDialog()
DoScript("\\script\\npc\\tuiguangyuan.lua");
local tbOpt =
{
{"<color=yellow>Nhận <color=cyan>Đồng<color> Nạp Thẻ<color>", self.dnnhandong, self},
{"Ta chỉ ghé hỏi thăm."}
}



Dialog:Say("Sứ giả: Ngươi muốn nạp thẻ hay tham gia hoạt động ?",tbOpt);
end
function tbTuiGuangYuan:dnnhandong()
local msg =
"<color=gold>\n <pic=120>Phúc Lợi Nạp Thẻ<color><pic=120>\n"..
" Nạp Lần Đầu\n"..
" <color=red>Mệnh Giá Bất Kỳ<color>\n"..
"Nhận <color=purple>Mã Bài Tuyết Hồn<color>\n"..
"Nhận <color=purple>Huyền Tinh 11<color>\n"..
"Nhận <color=purple>30tr EXP<color>\n"..
"Nhận <color=purple>20 Chân Nguyên Tu Luyện Đơn<color>\n"..
"Nhận <color=purple>20 Thánh Linh Bảo Hạp Hồn<color>\n"..
"Nhận <color=purple>5 Tinh Thạch Thánh Hỏa<color>\n"..
"\n<color=red>Chú ý<color> Nạp thẻ với mệnh giá bất kỳ nhận\n"..
"<color=green>50tr EXP<color>\n10 <color=green>Tinh Thạch Thánh Hỏa\n1 <color=green>Huyền Tinh (Cấp 8)<color>"
local tbOpt = {
{"Nhận <color=green>Đồng<color> nạp thẻ",self.NhanXuNapThe_OK,self};
}
Dialog:Say(msg,tbOpt)
end
function tbTuiGuangYuan:NhanXuNapThe_OK()
if me.CountFreeBagCell() < 25 then
Dialog:Say("Phải Có 25 Ô Trống Trong Túi Hành Trang");
return 0;
end
local nRet = me.GetUserPayCoin();
if nRet ~= 0 then
local nCount1 = me.GetTask(self.TaskGourp, self.TaskId_TanThu);
if nCount1 < 1 then
me.AddJbCoin(-1*nRet)
me.Msg("<color=yellow>Nhận <color=green>Quà Nạp Lần Đầu")
self:NhanXuNapThe_OK_Lan1()
return
end
if nCount1 >= 1 then
me.AddJbCoin(-0*nRet)
me.AddExp(50000000)
me.AddStackItem(18,1,1331,4,self.tbItemInfo,10) -- 1 Tinh Thạch Thánh Hỏa
me.AddStackItem(18,1,1,8,self.tbItemInfo,1) -- 1 Huyen Tinh 8
me.Msg("<color=yellow>Số <color=green>Đồng<color> nhận được là <color=cyan>"..nRet.."<color>\nNhận thêm:\n50tr EXP\n10 Tinh Thạch Thánh Hỏa\n1 Huyền Tinh 8")
KDialog.MsgToGlobal("<color=yellow>\nNgười chơi <color=green>"..me.szName.."<color> <color=red>|<color> Nhận được <color=green>"..nRet.."<color> Đồng từ Hệ Thống Nạp Thẻ̉.\nNhận thêm:\n50tr EXP\n1 Tinh Thạch Thánh Hỏa\n1 Huyền Tinh 8");
return 0;
end
me.AddJbCoin(-1*nRet)
me.AddExp(30000000) -- 30tr EXp
me.AddStackItem(18,1,1,11,self.tbItemInfo,1) -- 1 HT 11
me.AddStackItem(1,12,46,4,self.tbItemInfo,1) -- 1 mã bài tuyết hồn
me.AddStackItem(18,1,402,1,self.tbItemInfo,20) -- 20 Chân Nguyên Tu Luyện Đơn
me.AddStackItem(18,1,1334,1,self.tbItemInfo,20) -- 20 Thánh Linh Bảo Hạp Hồn
me.AddStackItem(18,1,1331,4,self.tbItemInfo,5) -- 3 Tinh Thạch Thánh Hỏa
KDialog.MsgToGlobal("<color=yellow>\nNgười chơi <color=green>"..me.szName.."<color> <color=red>|<color> Nhận được quà nạp thẻ lần đầu !");
me.Msg("<color=yellow>Số <color=green>Đồng<color> nhận được là <color=cyan>"..nRet.."<color>\nNhận Quà Nạp Lần Đầu")
me.SetTask(self.TaskGourp, self.TaskId_TanThu, nCount1 + 1);
end

[tvnnam]

Thêm vào kiểu gì vậy bạn? Thank share.

[vd_tt]

script/npc/tuiguangyuan.lua (lễ quan )

[EngiS]

script/npc/tuiguangyuan.lua (lễ quan )

con này sứ giả hoạt động mà bác..... lê quan là liguan :)))

[tinhlabui]

script/npc/tuiguangyuan.lua (lễ quan )

sứ giả hoạt động mà :D.............

[bosualongthanh]

:misdoubt::misdoubt::misdoubt::haha::haha::haha::b eauty::beauty::beauty:

[vd_tt]

uhm quên mất, lâu ko dev lại kt, lễ quan là liquan :D :D:D
nhầm nhầm <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>