[JX] Help ME code ghép đồ với ạ !!!
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 3 của 3
  1. #1
    Vi phạm quy định hocdevgame's Avatar
    Ngày tham gia
    Apr 2016
    Bài viết
    181
    Thanks
    247
    Thanked 64 Times in 27 Posts

    Help ME code ghép đồ với ạ !!!

    Các a cho e hỏi đoạn code này muốn add vào 1 NPC để cho nó có chức năng ghép đồ tím phải ntn ạ.

    PHP Code:

    Include("\\script\\global\\recoin_goldenequip.lua")
    Include(
    "\\script\\global\\equipenchase_help.lua"
    Include(
    "\\script\\task\\newtask\\education\\jiaoyutasknpc.lua"
    Include(
    "\\script\\task\\newtask\\newtask_head.lua")
    Include(
    "\\script\\global\\紫色及黄金装备铸造.lua")
    Include(
    "\\script\\global\\shenmi_chapman.lua");    --修装备功能



    Include("\\script\\activitysys\\npcdailog.lua")
    Include(
    "\\script\\misc\\eventsys\\type\\npc.lua")



    --------
    固定对话 城市--------
    function 
    tiejiang_city(...)
        
        
    local nNpcIndex GetLastDiagNpc();
        --
    local szNpcName GetNpcName(nNpcIndex);
        --if 
    NpcName2Replace then szNpcName NpcName2Replace(szNpcNameend
        local szNpcName 
    "Th?R蘮"
        
    local tbDailog DailogClass:new(szNpcName);
        
    G_ACTIVITY:OnMessage("ClickNpc"tbDailognNpcIndex);
        
        
    EventSys:GetType("AddNpcOption"):OnEvent(szNpcNametbDailognNpcIndex)
        
        
    local aryParam arg;
        
        if (
    getn(aryParam) == 0then
            tbDailog
    .szTitleMsg TIEJIANG_DIALOG
        
    else
            for 
    1getn(aryParam) do
                if (
    == 1then
                    tbDailog
    .szTitleMsg TIEJIANG_DIALOG
                
    else
                    
    local _,_szOptszFun strfind(aryParam[i], "([^/]+)/([^/]+)")
                    
    local fn getglobal(szFun)
                    if 
    fn then
                        tbDailog
    :AddOptEntry(szOptfn);    
                    
    end
                end
    ;
            
    end;
        
    end;
        
        
        
    tbDailog.szTitleMsg gsub(tbDailog.szTitleMsg"<dec>""")
        
        
        
    tbDailog:AddOptEntry("Giao d辌h"yes);
        
    tbDailog:AddOptEntry("C鯽 h祅g tinh luy謓 th筩h"energy_sale);
        
    tbDailog:AddOptEntry("Ch?t筼"onFoundry);
        
    tbDailog:AddOptEntry("Kh秏 n筸"jewel_yes);
        
    tbDailog:AddOptEntry("X?l?Trang b?h醤g>"deal_brokenequip);
        
    tbDailog:AddOptEntry("Ta t韎 l祄 nhi謒 v?t﹏ th?"education_tiejiang);    
        
    tbDailog:AddOptEntry("Ta ch?gh?xem th玦."no, {});
        
    tbDailog:Show()
    end;
    --------
    固定对话 孝手村------
    function 
    tiejiang_village(...)
        
    local aryParam arg;
        
    local aryDescribe = {
            --
    szDialog,        --铁匠的说话,在各城市铁匠处
            
    "Giao d辌h/yes",
            
            --
    Change request 04/06/2011ng cht筼 trang bb筩h kim Modified by DinhHQ 20110605
            
    "V藅 ph萴 c /onFoundry",
            
            
    "Nhi謒 v?t﹏ th?/tboss",
            
    "Ta ch?甶 d筼 m閠 ch髏 /no",
        };
        
        if (
    getn(aryParam) == 0then
            tinsert
    (aryDescribe1TIEJIANG_DIALOG)
        else
            for 
    1getn(aryParam) do
                if (
    == 1then
                    tinsert
    (aryDescribe1aryParam[i]);
                else
                    
    tinsert(aryDescribe2aryParam[i]);
                
    end;
            
    end;
        
    end;
        
    CreateTaskSay(aryDescribe);
    end;

    --------
    镶嵌--------
    function 
    jewel_yes()
        
    CreateTaskSay({"<dec><npc>Kh秏 B秓 Ng鋍 li猲 quan n s?c﹏ b籲g c馻 Ng?h祅h, l?m閠 c鵦 ph萴 tuy謙 th? Ngi mu鑞 x竎 nh薾 kh秏 ch??""B総 u kh秏/jewel_yes1""T譵 hi觰 th猰/help""Ta ch?gh?xem th玦/no"});
    end

    function jewel_yes1()
        
    EnchaseItem()
    end

    -------No--------
    function 
    no()
    end;

    ------
    精炼石-------
    function 
    energy_sale()
        
    CreateStores();
        --
    AddShop2Stores(174"Tinh luy謓 "15100"fBuyCallBack(%d,%d)");
        
    AddShop2Stores(179"Ho箃 ng "1100"fBuyCallBack(%d,%d)");
        
    AddShop2Stores(93"Ph骳 duy猲 "2100"fBuyCallBack(%d,%d)");
        
    AddShop2Stores(98"T鑞g kim "4100"fBuyCallBack(%d,%d)");
        
    AddShop2Stores(146"Vinh d?"11100"fBuyCallBack(%d,%d)");
        --
    AddShop2Stores(173"Danh v鋘g "13100"fBuyCallBack(%d,%d)");
        
    OpenStores();
    end

    function fBuyCallBack(nItemIdxnPrice)
        
    local nCount 1
        local itemgenre
    itemdetailitemParticular GetItemProp(nItemIdx)
        if 
    itemgenre == and itemdetail == and itemParticular == 2317 then
            
    -- 试炼帖
            AddStatData
    ("jlxiaohao_shiliantiegoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2355 then
            
    -- 玄天锦囊
            AddStatData
    ("jlxiaohao_xuantiangoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2369 then
            
    -- 堑驹令
            AddStatData
    ("jlxiaohao_qingjulinggoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2353 then
            
    -- 云⒐令
            AddStatData
    ("jlxiaohao_yunlulinggoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2352 then
            
    -- 苍狼令
            AddStatData
    ("jlsxiaohao_canglanglinggoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2351 then
            
    -- 玄猿令
            AddStatData
    ("jlxiaohao_xuanyuanlinggoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2350 then
            
    -- 紫蟒令
            AddStatData
    ("jlxiaohao_zimanglinggoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 2744 then
            
    -- 如意钥匙
            AddStatData
    ("jlxiaohao_ruyiyaoshigoumai"nCount)
        elseif 
    itemgenre == and itemdetail == and itemParticular == 1617 then
            
    -- 炎帝令
            AddStatData
    ("jlxiaohao_yandilinggoumai"nCount)
        
    end                                            
        
    return 1
    end 
    Khách viếng thăm hãy cùng hocdevgame xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên
    Ngày tham gia
    May 2010
    Bài viết
    291
    Thanks
    50
    Thanked 355 Times in 69 Posts

    Ðề: Help ME code ghép đồ với ạ !!!

    của bạn đây ,
    Code:
    Include( "\\script\\item\\compound\\compound_header.lua" );
    Include( "\\script\\item\\compound\\atlas.lua" );
    {"VËt PhÈm §óc", chetao},
    
    function chetao()
    Say( "NƠu ®¹i hiÖp muèn că mét măn ®å vơa ư th× ®em ®Çy ®ñ nguyªn liÖu tíi ®©y. Ta sÏ ®óc luyÖn mét vËt phÈm ng­¬i thƯch nhÊt!", 4, "B¾t ®Çu chƠ t¹o/onFoundryItem", "Liªn quan chƠ t¹o/onAbout", "T×m hiÓu m¶nh Hoµng Kim./onQueryPiece","§Ó ta suy nghÜ kü l¹i xem/onCancel");
    end
    cậu chỉnh lại cho phù hợp với npc bạn add vào là đc
    Khách viếng thăm hãy cùng hichay xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. Các thành viên gởi lời cảm ơn đến hichay vì bài viết này !

    hocdevgame (20-05-16)

  4. #3
    Thành Viên
    Ngày tham gia
    Jun 2010
    Bài viết
    191
    Thanks
    47
    Thanked 120 Times in 70 Posts

    Ðề: Help ME code ghép đồ với ạ !!!

    Boss hichay tái xuất giang hồ
    Khách viếng thăm hãy cùng cabato xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  5. Các thành viên gởi lời cảm ơn đến cabato vì bài viết này !

    hocdevgame (20-05-16)

 

 

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

  1. xin code khóa mod và code reset time
    Bởi _ThienThan_ trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 5
    Bài viết cuối: 05-11-15, 08:18 PM
  2. [KT] Tools hỗ trợ viết code LUA [ Code Snippet Function]
    Bởi khoctinhmhs trong diễn đàn Releases
    Trả lời: 6
    Bài viết cuối: 03-12-14, 06:03 PM
  3. [JX] cần xin code auto backup của PTTk bác nào có code autoit đó share giúp thanks
    Bởi Olala trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 0
    Bài viết cuối: 18-10-14, 12:49 AM
  4. [Gunny] Xin Code Web Chuyển xu Game thành Cash Web Với code xóa pet 5 sao với ...
    Bởi vinateam trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 5
    Bài viết cuối: 14-07-14, 01:04 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à 07:27 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ệ.