[KT] Share giftcode kiếm thế
Hello & Welcome to our community. Is this your first visit? Đăng Ký
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Kết quả 1 đến 1 của 1
  1. #1
    Thành Viên GameZone bosualongthanh's Avatar
    Ngày tham gia
    Apr 2015
    Bài viết
    423
    Thanks
    32
    Thanked 460 Times in 105 Posts

    Share giftcode kiếm thế

    cái giftcode này làm cũng chỉ cho zui thôi, cha co j hot

    Hướng dẫn sử dụng

    [Only registered and activated users can see links. ]

    PHP Code:
    [QUOTE][CODE]------------------------------------------
    ---
    Giftcode____________________lua
    ------------------------------------------
    local tbActivityCode Npc:GetClass("activityCode");

    tbActivityCode.TASK_MAIN_NEICE=2400
    tbActivityCode
    .NEICE_ID=150 --TAKS Le Bao Bò sữa
     
    function tbActivityCode:ActiveGift()
        
        
    local szMsg = [[
    <
    color=yellow>Mã kích hoạt hệ thống<color>

        
    Giang Hồ tuy xacó ngươi không cô đơn
        
        1
    , <color=wood>*Đại Lễ Bao*: Bò sữa<color>
        
    2, <color=wood>...<color>
        
    3, <color=wood>...<color>
    ]];
          
    local tbOpt = { 
            
            {
    "Bò sữa *Đại Lễ Bao* kích hoạt"self.MyGSCheck1self},
                {
    "Trở về trang trước"self.BackDialogself},
            {
    "Kết thúc đối thoại"},
        };
        
    Dialog:Say(szMsgtbOpt);
    end

    function tbActivityCode:BackDialog()
    local tbTuiGuangYuan Npc:GetClass("tuiguangyuan");
    tbTuiGuangYuan:OnDialog();
    end

    --CODE
    function tbActivityCode:MyGSCheck1(nFlagszCDKey)

    local keyflag me.GetTask(self.TASK_MAIN_NEICE,self.NEICE_ID);
     
    local szCDKeyNum=tonumber(szCDKey);
    if (
    keyflag ~= 0then
                Dialog
    :Say("Ngươi đã kích hoạt tuyên truyền phần thưởng.");
                return;
    end


    if not nFlag then
      Dialog
    :AskString("Xin nhập mã quà tặng: "12self.MyGSCheck1self1);
      return 
    0;
    end


    if (nFlag ~= 1then
      
    return 0;
    end
    if (me.CountFreeBagCell() < 1then
      Dialog
    :Say("Hành trang không đủ trống, cần 1 ô trống.");
      return;
    end 
    if not szCDKey or szCDKey == "" or string.len(szCDKey) ~= 12 then
      me
    .Msg(szCDKey);
      
    Dialog:Say("Nhập vào mã quà tặng vô hiệu!");
      return 
    0;
    end

    local a
    =self:findCdkey1(szCDKeyNum);

    if 
    a=="no" then
      Dialog
    :Say("Mã quà tặng vô hiệu hoặc đã sử dụng, <color=red>Mã quà tặng nhận tại trang chủ<color>!");
    else
      if (
    == szCDKeyNumthen
      local GB_flag 
    =KGblTask.SCGetDbTaskInt(a);
    if (
    GB_flag >= 1then
                Dialog
    :Say("Mã kích hoạt này đã bị sử dụng.");
                return;
    end
       me
    .SetTask(self.TASK_MAIN_NEICE,self.NEICE_ID,szCDKeyNum);
       
    KGblTask.SCSetDbTaskInt(a1);
       
    Dialog:Say("Chúc mừng ngươi sử dụng mã quà tặng Bò Sữa,\n Nhận được <color=yellow>*Đại Lễ Bao* Bò sữa<color>!\n Kiếm hiệp giang hồ, cám ơn ngươi!");
        
    me.AddStackItem(18138631,{bForceBind=1},1);------------------item
      end
    end 
    --]]
    end

    function tbActivityCode:findCdkey1(szCDKeyNum)
    local tbsortpos Lib:LoadTabFile("\\setting\\ActivityCode\\activitycode1.txt");--------duong dan load file
    local nLineCount 
    #tbsortpos;
        
    for nLine=1nLineCount do
            
    local szCode1 tbsortpos[nLine].CODE1;
            
    local szCode=tonumber(szCode1);
            
            if 
    szCDKeyNum == szCode then
            
    return szCode;
            
            
    end
        end
        
    return "no";
    end

    --------------------------------------------------------[/CODE][/QUOTE
    Lần sửa cuối bởi bosualongthanh, ngày 27-06-19 lúc 01:49 AM.
    Khách viếng thăm hãy cùng bosualongthanh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. The Following 4 Users Say Thank You to bosualongthanh For This Useful Post:

    Century (17-12-19), gamevndev (26-07-19), linhhonbs (22-07-21), __Jie__ (27-06-19)

 

 

Các Chủ đề tương tự

  1. [JX] SHARE SCRIPT GIFTCODE CHECK ĐÃ SỬ DỤNG - GAME.EXE Tinh Lực
    Bởi sky.light9530 trong diễn đàn Releases
    Trả lời: 20
    Bài viết cuối: 04-12-18, 09:54 PM
  2. Kiếm Thế VNG - Kiếm Thế Private - Kiếm Thế Lậu Mới Ra Hay Nhất Hiện Nay
    Bởi bjnky trong diễn đàn CÁC SERVER GAME PRIVATE ONLINE
    Trả lời: 15
    Bài viết cuối: 11-04-17, 02:05 PM
  3. [Share + hướng dẫn] Hệ thống giftcode cho AHTT!
    Bởi vagrant trong diễn đàn CHUYÊN ĐỀ WEB GAMES
    Trả lời: 11
    Bài viết cuối: 27-04-15, 11:26 AM
  4. Phát GiftCode Tân Thủ Kiếm Thế Hải Phòng nhân dịp ra mắt máy chủ !
    Bởi TuanNet trong diễn đàn CÁC SERVER GAME PRIVATE ONLINE
    Trả lời: 0
    Bài viết cuối: 23-03-14, 10:59 PM
  5. [Gunny] Cần xin code giftcode và DB giftcode gunny 3.0
    Bởi YahooMesenger trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 1
    Bài viết cuối: 17-07-13, 06:06 PM

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 11:28 PM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.