[KT] Script lửa trại by copday - Trang 2
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
 
Trang 2 của 3 Đầu tiênĐầu tiên 1 2 3 CuốiCuối
Kết quả 11 đến 20 của 30
  1. #11
    ✎﹏ Nà Ní Team ❖ ︻╦╤─ ҉ - na.ilusm89's Avatar
    Ngày tham gia
    May 2012
    Bài viết
    1,084
    Thanks
    99
    Thanked 706 Times in 402 Posts

    Ðề: Script lửa trại by conplay

    Trích dẫn Gửi bởi voanhnhat20010 [Only registered and activated users can see links. ]
    sory nhầm tên tác giải
    chả cười k đc
    bác quockhanh1992 đâu rùi
    Kết thúc kiếm thế qua TLBB quậy nào
    Bạn với Quốc Khánh cơ à ở dơ gặp nhau rồi ~
    ℵóα

  2. #12
    Vi phạm quy định copday's Avatar
    Ngày tham gia
    Dec 2012
    Bài viết
    276
    Thanks
    92
    Thanked 114 Times in 39 Posts

    Ðề: Script lửa trại by conplay

    Trích dẫn Gửi bởi satthupro95 [Only registered and activated users can see links. ]
    em nói oan làm gì anh chính bạn ý bảo em vậy mà
    ac, hình như anh cũng nghe thoang thoảng rồi đó.
    Khách viếng thăm hãy cùng copday xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #13
    HVA ZONE #SODIZ voanhnhat20010's Avatar
    Ngày tham gia
    May 2013
    Đang ở
    Thiên Địa Hội
    Bài viết
    612
    Thanks
    1,218
    Thanked 198 Times in 137 Posts

    Ðề: Script lửa trại by copday

    chà bên BOX KT có vẻ hot lại rùi
    free đâu qua đây với ta
    Khách viếng thăm Mail về [Only registered and activated users can see links. ] nếu cần hỗ trợ về Jx lẫn KT

  4. #14
    Vi phạm quy định copday's Avatar
    Ngày tham gia
    Dec 2012
    Bài viết
    276
    Thanks
    92
    Thanked 114 Times in 39 Posts

    Ðề: Script lửa trại by conplay

    Trích dẫn Gửi bởi na.ilusm89 [Only registered and activated users can see links. ]
    Bạn với Quốc Khánh cơ à ở dơ gặp nhau rồi ~
    đã cảnh báo rồi, không nghe, giờ mới biết sao
    Lần sửa cuối bởi copday, ngày 31-07-13 lúc 12:15 PM.
    Khách viếng thăm hãy cùng copday xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  5. #15
    Thành Viên
    Ngày tham gia
    Jan 2013
    Bài viết
    91
    Thanks
    38
    Thanked 4 Times in 4 Posts

    Ðề: Script lửa trại by copday

    Nghe tên Quốc Khánh là thấy bốc mùi khắm rồi. Đi nhà nghỉ chụp hình cho lên web rồi khoe là nhà mình Mồm nói thì rất oai,thực ra ko có vẹo gì đâu. Thấy mấy ông anh mình bảo giờ còn đang lang thang kẹt net dưới Hà Nội cơ @@
    Khách viếng thăm hãy cùng kiemthe_dev xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  6. #16
    Thành Viên
    Ngày tham gia
    Jul 2013
    Bài viết
    31
    Thanks
    14
    Thanked 30 Times in 11 Posts

    Ðề: Script lửa trại by conplay

    Trích dẫn Gửi bởi huylouis1996 [Only registered and activated users can see links. ]
    Tiện cho ae luôn
    PHP Code:
    local tbLuaTrai Npc:GetClass("LuaTrai");

    function 
    tbLuaTrai:OnDialog()
        
    tbLuaTrai:ChampionFlagNpc(mehim);
    end
    ---------
    function 
    tbLuaTrai:ChampionFlagNpc(pPlayerpNpc)
        
    self:dotlua(pPlayerpNpc);
    end

    function tbLuaTrai:dotlua(pPlayerpNpc)
    tbLuaTrai.SKILL_ID                391;
    tbLuaTrai.NPC_ID                20170;
    tbLuaTrai.EXISTENTIME             Env.GAME_FPS 3600 24
    tbLuaTrai.BASEMULTIP            100000;
    tbLuaTrai.TITLE_GROUP                    4;
    tbLuaTrai.TITLE_ID                    1;
        if (
    == me.nTeamIdthen
            me
    .Msg("Tổ đội mới có thể đốt lửa");
            
    me.CallClientScript({"AutoAi:Resume"});
            return 
    0;
        
    end
        
    if me.IsAccountLock() ~= 0 then
            Dialog
    :Say("Tài khoản đang khóa");
            return 
    0;
        
    end
        
    if me.nLevel 120 then
            Dialog
    :Say("Dưới cấp 120 k thể đốt");
            return 
    0;
        
    end
        
        
        pPlayer
    .CastSkill(self.SKILL_ID1, -1pPlayer.GetNpc().nIndex);
        
    local nNpcMapIdnNpcPosXnNpcPosY pPlayer.GetWorldPos();
        
    nNpcPosX=1607;
        
    nNpcPosY=3246;
        
    local tbNpc    Npc:GetClass("gouhuonpc");
        
    local pGouNpc    KNpc.Add2(self.NPC_ID1, -1nNpcMapIdnNpcPosXnNpcPosY);
        
    tbNpc:InitGouHuo(pGouNpc.dwId0self.EXISTENTIME590self.BASEMULTIP00);
        
    tbNpc:StartNpcTimer(pGouNpc.dwId)
        
    me.Msg(string.format("Ngươi đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng."));
        
    GlobalExcute({"Dialog:GlobalNewsMsg_GS""Người chơi <color=red>"  ..me.szName.. "<color> đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng."});
        
    me.SendMsgToFriend("Hảo hữu [" ..me.szName.. "] đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng.");
        
    Player:SendMsgToKinOrTong(me" đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng."0);
        
    me.AddJbCoin(100000);
        
    pNpc.Delete();
        --
    local nNpc self.NPC_ID
        
    --if not nNpc then
            
    --local pGouNpc1    KNpc.Add2(200161, -1nNpcMapIdnNpcPosXnNpcPosY);
        --
    end    
    end 
    code loằn ngoại 2 đoạn function thay vì như vầy :

    PHP Code:
    local tbLuaTrai Item:GetClass("LuaTrai");

    tbLuaTrai.SKILL_ID                391;
    tbLuaTrai.NPC_ID                20170;
    tbLuaTrai.EXISTENTIME             Env.GAME_FPS 3600 24
    tbLuaTrai.BASEMULTIP            100000;
    tbLuaTrai.TITLE_GROUP                    4;
    tbLuaTrai.TITLE_ID                    1;

    function 
    tbLuaTrai:OnUse()

        if (
    == me.nTeamIdthen
            me
    .Msg("Tổ đội mới có thể đốt lửa");
            
    me.CallClientScript({"AutoAi:Resume"});
            return 
    0;
        
    end
        
    if me.IsAccountLock() ~= 0 then
            Dialog
    :Say("Tài khoản đang khóa");
            return 
    0;
        
    end
        
    if me.nLevel 120 then
            Dialog
    :Say("Dưới cấp 120 không thể đốt");
            return 
    0;
        
    end
        
        me
    .CastSkill(self.SKILL_ID1, -1me.GetNpc().nIndex);
        
    local nNpcMapIdnNpcPosXnNpcPosY me.GetWorldPos();
        
    local szNameMap    GetMapNameFormId(nNpcMapId)
        
    local tbNpc        Npc:GetClass("gouhuonpc");
        
    local pGouNpc    KNpc.Add2(self.NPC_ID1, -1nNpcMapIdnNpcPosXnNpcPosY); -- add npc
        local AddCoin    
    me.AddJbCoin(100000);-- số lượng đồng
        local nSlCoin    
    AddCoin/10000; -- số lượng chia nhỏ
        tbNpc
    :InitGouHuo(pGouNpc.dwId0self.EXISTENTIME590self.BASEMULTIP00);
        
    tbNpc:StartNpcTimer(pGouNpc.dwId);
        
    me.Msg(string.format("Ngươi đã đốt lửa tại %s nhận được % vạn đồng.",szNameMap,nSlCoin));
        
    GlobalExcute({"Dialog:GlobalNewsMsg_GS"string.format("Người chơi <color=red>%s<color> đã đốt lửa tại %s nhận được %s vạn đồng.",me.szName,szNameMap,nSlCoin)});
        
    me.SendMsgToFriend(string.format("Hảo hữu [%s] đã đốt lửa tại %s nhận được %s vạn đồng.",me.szName,szNameMap,nSlCoin));
        
    Player:SendMsgToKinOrTong(mestring.format(" đã đốt lửa tại %s nhận được %s vạn đồng.",szNameMap,nSlCoin), 0);
        
    him.Delete();
    end 
    Khách viếng thăm hãy cùng ___Rookie___ xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  7. #17
    Vi phạm quy định copday's Avatar
    Ngày tham gia
    Dec 2012
    Bài viết
    276
    Thanks
    92
    Thanked 114 Times in 39 Posts

    Ðề: Script lửa trại by conplay

    có gì không muốn share là vậy
    Khách viếng thăm hãy cùng copday xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  8. #18
    Thành Viên
    Ngày tham gia
    Jul 2012
    Bài viết
    71
    Thanks
    53
    Thanked 12 Times in 11 Posts

    Ðề: Script lửa trại by conplay

    Trích dẫn Gửi bởi huylouis1996 [Only registered and activated users can see links. ]
    Tiện cho ae luôn
    PHP Code:
    local tbLuaTrai Npc:GetClass("LuaTrai");

    function 
    tbLuaTrai:OnDialog()
        
    tbLuaTrai:ChampionFlagNpc(mehim);
    end
    ---------
    function 
    tbLuaTrai:ChampionFlagNpc(pPlayerpNpc)
        
    self:dotlua(pPlayerpNpc);
    end

    function tbLuaTrai:dotlua(pPlayerpNpc)
    tbLuaTrai.SKILL_ID                391;
    tbLuaTrai.NPC_ID                20170;
    tbLuaTrai.EXISTENTIME             Env.GAME_FPS 3600 24
    tbLuaTrai.BASEMULTIP            100000;
    tbLuaTrai.TITLE_GROUP                    4;
    tbLuaTrai.TITLE_ID                    1;
        if (
    == me.nTeamIdthen
            me
    .Msg("Tổ đội mới có thể đốt lửa");
            
    me.CallClientScript({"AutoAi:Resume"});
            return 
    0;
        
    end
        
    if me.IsAccountLock() ~= 0 then
            Dialog
    :Say("Tài khoản đang khóa");
            return 
    0;
        
    end
        
    if me.nLevel 120 then
            Dialog
    :Say("Dưới cấp 120 k thể đốt");
            return 
    0;
        
    end
        
        
        pPlayer
    .CastSkill(self.SKILL_ID1, -1pPlayer.GetNpc().nIndex);
        
    local nNpcMapIdnNpcPosXnNpcPosY pPlayer.GetWorldPos();
        
    nNpcPosX=1607;
        
    nNpcPosY=3246;
        
    local tbNpc    Npc:GetClass("gouhuonpc");
        
    local pGouNpc    KNpc.Add2(self.NPC_ID1, -1nNpcMapIdnNpcPosXnNpcPosY);
        
    tbNpc:InitGouHuo(pGouNpc.dwId0self.EXISTENTIME590self.BASEMULTIP00);
        
    tbNpc:StartNpcTimer(pGouNpc.dwId)
        
    me.Msg(string.format("Ngươi đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng."));
        
    GlobalExcute({"Dialog:GlobalNewsMsg_GS""Người chơi <color=red>"  ..me.szName.. "<color> đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng."});
        
    me.SendMsgToFriend("Hảo hữu [" ..me.szName.. "] đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng.");
        
    Player:SendMsgToKinOrTong(me" đã đốt lửa tại Đạo hương Thôn nhận được 10v đồng."0);
        
    me.AddJbCoin(100000);
        
    pNpc.Delete();
        --
    local nNpc self.NPC_ID
        
    --if not nNpc then
            
    --local pGouNpc1    KNpc.Add2(200161, -1nNpcMapIdnNpcPosXnNpcPosY);
        --
    end    
    end 
    mình lấy script này của bạn add vào 1 NPC trong tân thủ thôn bất kỳ khi nhấn vào NPC thỳ bắn pháo hoa cả thành vậy là sao nhỉ ?
    Khách viếng thăm hãy cùng thanhdinh10 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  9. #19
    Thành Viên
    Ngày tham gia
    Jan 2013
    Bài viết
    91
    Thanks
    38
    Thanked 4 Times in 4 Posts

    Ðề: Script lửa trại by copday

    Đây là bắn pháo hoa chứ mình có thấy lửa trại đâu
    Khách viếng thăm hãy cùng kiemthe_dev xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  10. #20
    Thành Viên
    Ngày tham gia
    Jul 2013
    Bài viết
    31
    Thanks
    14
    Thanked 30 Times in 11 Posts

    Ðề: Script lửa trại by copday

    Trích dẫn Gửi bởi kiemthe_dev [Only registered and activated users can see links. ]
    Đây là bắn pháo hoa chứ mình có thấy lửa trại đâu
    sao lại bắn pháo nhỉ mình cũng chưa xem kỹ code này nhưng muốn có lửa trại thì vào script/item/class/gouhuo_team.lua là được !
    Khách viếng thăm hãy cùng ___Rookie___ xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 
Trang 2 của 3 Đầu tiênĐầu tiên 1 2 3 CuốiCuối

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

  1. [KT] Cần giúp đở viết script
    Bởi xichphilong trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 2
    Bài viết cuối: 30-05-12, 08:13 PM
  2. Một số script trong thư mục script Vina (unpack)
    Bởi sangpronhat trong diễn đàn Scripts
    Trả lời: 19
    Bài viết cuối: 26-11-11, 08:12 AM
  3. ai xem dùm em script này
    Bởi nhoxpk2707 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 8
    Bài viết cuối: 17-08-10, 01:15 PM
  4. Cần hỗ trợ về script..!! (Help)
    Bởi kemdenny trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 1
    Bài viết cuối: 17-08-10, 08:41 AM

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à 02:30 AM.
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ệ.