Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.

tung

Latest topics


    [HKGH] Share Server 3.1 Có thể Viết Nhiệm Vụ

    Ruby
    Ruby
    User's Founder


    Bài viết : 460
    Ryo : 4839
    Cảm ơn : 3022
    Nam Date : 09/04/2012
    Tuổi : 25
    Đến từ : Việt Nam

    [HKGH] Share Server 3.1 Có thể Viết Nhiệm Vụ Empty [HKGH] Share Server 3.1 Có thể Viết Nhiệm Vụ

    Bài gửi by Ruby Fri Aug 17, 2012 8:51 pm

    share cho các bạn server mình edit lại từ bộ source server5.0 bên Range Zo ,

    server mình viết thêm chức năng Nhiệm vụ ,các bạn có thể viết thoải mái tất cả các nhiệm vụ trong game

    Server : http://share.vnn.vn/dl.php/5469153
    patch :http://share.vnn.vn/dl.php/5469247
    server mình đã viết sẵn trong nhiệm vụ Tc 1->6 trong File Quest.lua (viết hơi gà ^_^)

    các bạn download về test thử xem như thế nào


    cách viết Nhiệm Vụ :
    - Trong Game khi các bạn Click vào các nhiệm vụ thì Trên Server sẻ hiện lên ID của nhiệm vụ đó .Sử dụng các ID đó Các viết nhiệm vụ cho game
    ví dụ:
    - khi các bạn nhấp chọn nhiệm vụ cấp 29 ở Môn chủ huyền bột

    [HKGH] Share Server 3.1 Có thể Viết Nhiệm Vụ 37aa7788ed15bc385f37117f3c4f68df_40527173.vidu1

    -mở file Quest.Lua trong Server lên ,viết đoạn mã này vào (giả sử nhận nhiệm vụ lv 29 ở môn chủ huyền bột được 1 cây vũ khí 600k của thương)

    Code:
    if GetIDQuest()==8 then
    if GetIndex()==1 then
    SentQuest(GetIDQuest(),11,GetTest())
    end
    if GetIndex()==2 then
    SentQuest(IDQuest,0x33,Test)
    AddItem("4AB0E411") -- ma hex của cây thương
    end
    if GetIndex()==3 then
    SentQuest(GetIDQuest(),0x33,GetTest())
    end
    end

    ây là Oke



    mình úp lại server có mới code lại hàm Additem các bạn dowload lại nha

    server http://share.vnn.vn/dl.php/5469153

    hướng dẫn

    Code:
    Additem(IDItem,Magic1,Magic2,Magic3,Magic4,CuongHo a,ThuocTinh,Echange)

    IDItem Các Bạn Lấy Trong DataBase ra

    sau đây là mã của các loại option

    Ruby đã viết:Công Lực Võ Công 70000000 (Muốn có dòng Công Lực võ Công 10% thì sữa Thành 700010)
    Công Lực 10000000
    Lực phòng Ngự 20000000
    Sinh mệnh tăng 30000000
    Nội Công Tăng 40000000
    Chính Xác tăng 50000000
    Né Tránh Tăng 60000000
    Toàn Bộ Khí Công Tăng 80000000
    May mắn Tăng 90000000
    Phọng Ngự võ công tăng 110000000
    Thêm Tiền 120000000
    Giảm tổn Thất Exp 130000000

    các lọai thuộc tính:
    Hỏa 1000001000 (Muốn Có thuộc tính Hỏa 1 giai Đoạn thì khai báo Thuộc tính =1000001000 muốn có 2 giai đoạn thì khai báo 1000001100)
    Thủy 1000002000
    Phong 1000003000
    Nôi Công 1000004000
    Ngọai Công 1000005000
    độc Công 1000006000

    Cường Hóa
    vũ Khí Cường Hóa 10000000 (cường hóa 1 10000001,cường Hóa 2 10000002)
    Trang Bị Cường Hóa 20000000

    vi dụ mình muốn add 1 item là long truyền thương (vk 600k của thương)
    ID: là 300200010
    option full Công lực võ công 20%
    cường hóa 10
    thuộc tính hỏa 10 giai đoạn
    Echange là cái dùng mấy viên 5 viêng ngọc có 5 màu sau đó ép thành 1 cái cục ji ji đó mình không biết ,có tác dụng tăng dame vũ khí.giả sử cái này mình để là 0.
    ta làm như sau:
    AddItem(300200010,70000020,70000020,70000020,70000 020,10000010,1000001900,0)
    Oke

    Update Thêm Hàm DeleteItem ,Một số hàm Chức Cho Pet (chưa hoàn chỉnh lắm),Pet Trong Server Sẽ lên level theo % kinh nghiệm chia cho pet
    Server các pác down lại nè : http://share.vnn.vn/dl.php/5470034
    Hướng Dẫn xài hàm DeleteItem
    --Cú Pháp DeleteItem (Số Thứ Tự Item trong Túi đồ , Số Lượng Item Cần Xóa)

    Để lấy đươc Số Thứ tự của Item Trong Túi Đồ ta xài hàm GetSTTItem(IdItem)
    hàm này Trả về -1 nếu không tìm thấy Item Cần Xóa .

    Ví Dụ bạn muốn Xóa 1 Item Là Thương 600k Có Id là 300200010
    tui code tạm cái nhiệm vụ Delete Item (Nv 29 tại môn chủ nha)

    Code:
    if GetIDQuest()==8 then
    if GetIndex()==1 then
    SentQuest(GetIDQuest(),0x0b,Test)
    end
    if GetIndex()==2 then
    SentQuest(IDQuest,0x33,GetTest())
    if GetSTTItem(300200010)==-1 then
    return
    else
    DeleteItem(GetSTTItem(300200010),1)
    end
    end
    if GetIndex()==3 then
    SentQuest(GetIDQuest(),0x33,GetTest())
    end
    end


      Hôm nay: Fri May 10, 2024 2:53 pm