[Share Script nhỏ] Vài chức năng cho các bạn !
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 1 của 3 1 2 3 CuốiCuối
Kết quả 1 đến 10 của 22
  1. #1
    Amateur Editor kidcrazy187's Avatar
    Ngày tham gia
    May 2009
    Đang ở
    TP HCM
    Bài viết
    344
    Thanks
    76
    Thanked 317 Times in 73 Posts

    Icon6 [Share Script nhỏ] Vài chức năng cho các bạn !

    Cái này mình tự làm, lấy code từ server TSBĐ v2.0 và 3.0 edit và chế ra thêm thôi. Làm có 2 ngày (mà có vài tiếng) nên test không hết, share cho các bạn xài test và ý kiến, hoặc cùng nhau dev tốt hơn
    Mình có để file Hướng dẫn trong đó (file huongdan.lua) rồi. Có gì các bạn xem thêm nha.

    Sơ sơ chức năng script là :

    • Bán ngựa theo kiểu Sale() (Hiện ra shop cho từng loại ngựa, giá cả chỉnh ở các file *.txt), mình thì thích dùng dạng nì hơn là AddItem, mặc dù cực hơn
    • Kỳ Trân Các (Bán các món đồ dành cho tên nhân vật không phải admin, cày tiền Vạn đổi xu là mua được. Giá có thể tự chỉnh lại cho chuẩn theo ý các bạn).
    • Nạp Card : (dành cho chơi LAN, ONL gì đó , code gồm 12 chữ số, được random tạo ra, nạp xong được 1000 xu (có thể thay đổi lại tùy thích) ). Mình làm cái này chủ yếu test kỹ năng lập trình mình thôi, chứ k fải mở onl để donate đâu nha). Giống như để dành mở chơi LAN, đứa nào đấm lưng vài cái cho cái CODE vô nạp xu chẳng hạn )


    P/S: Nói rồi, làm có 2 ngày (vài tiếng trong ngày à) nên chắc chắn là không tốt, pro nào cay đắng thì miễn bàn , newbie có ý kiến thì comment, thanks để mình cố gắng hoàn thiện hơn. Để "Develop" chứ không có để "Download" hay "Release" đâu nhé Thanks các bạn ủng hộ
    ------------------------------------------------------------

    [down].[/down]
    Link :[Only registered and activated users can see links. ]
    Thấy hay thì nhấn nút Thanks nhá
    ------------------------------------------------------------

    Mình gom gọn lại những thứ chỉnh sửa cho dễ xem nhé
    Lưu ý : Dùng cho server TSBĐ v3.0 của ohishu. Ai dùng cái khác tự config lại cho đúng !

    NEW : Edit lại file taocodemoi.lua nha :
    [sp]
    Ban đầu :
    function main()
    a,b,c,d,e,f,g,h,i,j,k,l = random(0,9) --Xóa dòng này đi
    gio = tonumber(date("%H"))
    phut = tonumber(date("%M"))
    giay = tonumber(date("%S"))
    if (gio == 0) and (phut == 0) and (giay == 0) then
    for i=1,siso do
    DANH_SACH_CODE[getn(DANH_SACH_CODE)+1] = {a,b,c,d,e,f,g,h,i,j,k,l}
    danhsachcode = TaoBang(DANH_SACH_CODE,"DANH_SACH_CODE","")
    SaveData("script/giavinh/napcard/datacode.lua",danhsachcode)
    end
    end
    nhapcode()
    end
    Sửa lại là :
    function main()
    gio = tonumber(date("%H"))
    phut = tonumber(date("%M"))
    giay = tonumber(date("%S"))
    if (gio == 0) and (phut == 0) and (giay == 0) then
    for i=1,siso do
    a,b,c,d,e,f,g,h,i,j,k,l =
    random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9) --Thêm vào tại đây
    DANH_SACH_CODE[getn(DANH_SACH_CODE)+1] = {a,b,c,d,e,f,g,h,i,j,k,l}
    danhsachcode = TaoBang(DANH_SACH_CODE,"DANH_SACH_CODE","")
    SaveData("script/giavinh/napcard/datacode.lua",danhsachcode)
    end
    end
    nhapcode()
    end

    Mình chưa test file này vì làm biếng chỉnh giờ với ngồi chờ 12h, các bạn siêng chỉnh lại nha , (chủ yếu là file nhapcode.lua thôi), nhưng đọc lại thấy kì kì, vì như cũ nó sẽ tạo ra 20 CODE giống nhau do a,b,c,...,l chưa thay đổi trong hàm for.
    [/sp]
    NEW : Thêm vào cuối file questkey.txt trong Settings ( nhớ đồng bộ sang Client ) dòng sau để được KNB :
    [sp]
    Code:
    Kim Nguyen Bao    4    234    \spr\item\questkey\obj_item_cardg.spr    340    1    1    Kim Nguyen Bao    1
    Hình ảnh KNB trong file *.pak nào mình k nhớ nữa, cứ khai báo hết mấy file *.pak đi, rồi cũng có à, thiếu file *.pak thì chép từ patch v2.0 qua nha
    [/sp]
    Chân thành xin lỗi các bạn Để cáo lỗi, mình share sẵn luôn cái hàm và tọa độ add npc cho newbie luôn hen

    - Các bạn chèn thêm hàm này vào file Get_NPC.lua ở \script\Global\Get_NPC.lua nhé
    [sp]
    Hàm thêm NPC bán ngựa : (Lấy hình ảnh NPC Ban Ngua, muốn sửa lại tên NPC vô file NPCS.txt trong settings dòng 199 mở = Excel)
    Code:
    AddNPCEx(197,1,53,196,196,8,8,"\\script\\giavinh\\banngua.lua",6)
    Hàm thêm NPC KTC : (Lấy hình ảnh NPC Nguoi Ban Den Long
    , muốn sửa lại tên NPC vô file NPCS.txt trong settings dòng 744 mở = Excel)
    Code:
    AddNPCEx(742,1,53,204,198,2.5,2.5,"\\script\\giavinh\\kytrancac\\kytrancac.lua",6)
    Hàm thêm NPC Nap Card :
    (Lấy hình ảnh NPC Xem Nao, muốn sửa lại tên NPC vô file NPCS.txt trong settings dòng 517 mở = Excel)
    Code:
    AddNPCEx(515,1,53,203,202,9.5,7,"\\script\\giavinh\\napcard\\taocodemoi.lua",6)
    Các số :
    Màu xanh lá : ID NPC.
    Màu xanh dương : Tọa độ NPC.
    Màu đỏ : độ lệch của NPC.
    [/sp]

    NEW : File chuyensinh.lua trong \script\Global\chuyensinh.lua cò dòng :
    "Ho Tro Nang Diem Tiem Nang/supporttiemnang" <-- Chỗ này chưa có hàm supporttiemnang . Mình chưa biết ý tác giả muốn làm gì hàm này, nên mình thêm đại hỗ trợ nâng nhanh tiềm năng. Ai muốn xài đỡ thêm hàm này vào cuối file nhé :"

    [sp]
    Code:
    function supporttiemnang()
    SayEx({"<color=cyan>Bac Dau Than Tang<color>: Xin chao ! Ta se giup nguoi cong  nhanh diem tiem nang.\nNguoi hien co <color=red>"..GetProp().."<color> diem tiem nang !\nNguoi co chac chan chua ?",
        "Ta chac chan./chacchanroi",
        "Ta chua chuan bi./Exit"})
    end
    function chacchanroi()
    SayEx({"<color=cyan>Bac Dau Than Tang<color>: Co 4 loai, moi loai 50 diem, nguoi hay chon di !",
        "Suc Manh  50 diem./tangtn",
        "Than Phap 50 diem./tangtn",
        "Sinh Luc  50 diem./tangtn",
        "Noi Luc   50 diem./tangtn",
        "Thoat./Exit"})
    end
    function tangtn(sel)
    diemtnht = GetProp() -- Diem tiem nang hien tai
    sm = GetStrg()
    tp = GetDex()
    sl = GetVit()
    nl = GetEng()
    
    id = sel + 1
    if diemtnht >= 50 then
        if id == 1 then
            AddProp(-50)
            ResetBaseAttrib(0,sm+50)
            Msg2Player("Ban nhan duoc 50 diem suc manh !")
        elseif id == 2 then
            AddProp(-50)
            ResetBaseAttrib(1,tp+50)
            Msg2Player("Ban nhan duoc 50 diem than phap !")
        elseif id == 3 then
            AddProp(-50)
            ResetBaseAttrib(2,sl+50)
            Msg2Player("Ban nhan duoc 50 diem sinh luc !")
        else
            AddProp(-50)
            ResetBaseAttrib(3,nl+50)
            Msg2Player("Ban nhan duoc 50 diem noi luc !")
        end
    else Msg2Player("Ban khong du 50 diem tiem nang !")
    end
    end
    [/sp]

    File caymai.lua trong \script\Global\caymai.lua có 1 lỗi là khi file timerserver.lua đc kích hoạt, cây mai xuất hiện là các bạn có thể nhấp vào nhận thưởng không ngừng. Các bạn có thể xóa hoặc thêm chú thích giống mình trong phần sau trong file timerserver.lua :
    [sp]
    Code:
    --    if (gio >= 21) or ((gio >= 0) and (gio < 7)) then
    --        if phut == 10 or phut == 20 or phut == 30 or phut == 40 or phut == 50 or phut == 0 then
    --Msg2SubWorld("Cay Mai Truong Tho Da Xuat Hien Tai 201/198 Tai Maps BLH Mau Ve Tham Gia Event !")
    --        end
    --        if (GetGlbMissionV(88)) == 0 then
    --            caymai=AddNpc(921,99,SubWorldID2Idx(53),201*8*32,198*16*32)
    --            SetNpcScript(caymai,"\\script\\global\\caymai.lua")
    --            SetGlbMissionV(32,1)
    --        end
    --    else
    --            DelNpc(caymai)
    --            SetGlbMissionV(32,0)
    --    end
    Hoặc có thể tham khảo thêm phần hàm chặn thời gian bên đây : [Only registered and activated users can see links. ]
    [/sp]

    [sp]Mình cũng chỉ là newbie mà thôi [/sp]

    P/S : Các phần mình sai các bạn tự coi comment ở dưới chỉnh lại và thông cảm cho mình nhé, tạo acc lâu chứ mới tìm hiểu hơn tháng à . Các điều trên mình vẫn giữ nguyên bản quyền tác giả ohishu nhé, chỉ là thêm, bớt, chế thui, và chỉ thích hợp cho newbie giống mình, pro k chém

    --THE END--

    Chém gió vài pic chơi

    [sp]

    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]

    [/sp]

    Lần sửa cuối bởi kidcrazy187, ngày 15-03-11 lúc 08:35 AM.

    [Only registered and activated users can see links. ]


  2. The Following 16 Users Say Thank You to kidcrazy187 For This Useful Post:

    anhtuan0650 (09-03-11), chaoban6 (26-02-13), chungthanhphuo (28-09-11), chuongga2vn (14-03-11), hoivegame (16-05-11), icydream35 (01-07-11), KingMax (09-03-11), nguyentrunghbl (08-03-11), ococ13 (01-07-11), quangken (03-07-11), rainyway8x (03-04-11), TaeYen (09-03-11), thaihoa91 (08-03-11), tieudieuphong (13-03-11), trieu.design (09-03-11), tungok (15-03-11)

  3. #2
    Thành Viên anhtuan0650's Avatar
    Ngày tham gia
    Oct 2006
    Bài viết
    130
    Thanks
    9
    Thanked 53 Times in 12 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    xem giúp mình
    [Only registered and activated users can see links. ]
    Khách viếng thăm hãy cùng anhtuan0650 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. #3
    Amateur Editor kidcrazy187's Avatar
    Ngày tham gia
    May 2009
    Đang ở
    TP HCM
    Bài viết
    344
    Thanks
    76
    Thanked 317 Times in 73 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    Cái này không sao hết bạn. Tại mình dùng "[[" để chú thích nên bị lỗi thôi. Bạn chép file InfoKTC đó ra chỗ khác (ra khỏi cái thư mục script là đc). File đó chỉ là thông tin thôi bạn
    Thanks bạn đã test

    [Only registered and activated users can see links. ]


  5. #4
    Thành Viên anhtuan0650's Avatar
    Ngày tham gia
    Oct 2006
    Bài viết
    130
    Thanks
    9
    Thanked 53 Times in 12 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    ố ối hiểu ròi mình tưởng khi đang nhập cần pass roi mới vào gỏ ma code
    Khách viếng thăm hãy cùng anhtuan0650 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  6. #5
    Amateur Editor kidcrazy187's Avatar
    Ngày tham gia
    May 2009
    Đang ở
    TP HCM
    Bài viết
    344
    Thanks
    76
    Thanked 317 Times in 73 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    Trích dẫn Gửi bởi anhtuan0650 [Only registered and activated users can see links. ]
    Nạp Card : (dành cho chơi LAN, ONL gì đó , code gồm 12 chữ số, được random tạo ra, nạp xong được 1000 xu (có thể thay đổi lại tùy thích) ). Mình làm cái này chủ yếu test kỹ năng lập trình mình thôi, chứ k fải mở onl để donate đâu nha). Giống như để dành mở chơi LAN, đứa nào đấm lưng vài cái cho cái CODE vô nạp xu chẳng hạn )
    1?npc nap card có cái pass dang nhap
    2: doi tiền van thành knb nhưng ko thấy knb

    Bạn k hiểu nhiều về Script à ? . Mình có để sẵn file huongdan.lua rồi mà.
    Cấu trúc nạp card như sau :
    - Mỗi ngày tạo ra siso = 20 mã CODE lưu vào file datacode.lua (Pass nhập NPC chính là CODE nạp card trong file này nè, đọc từ trên xuống gồm 12 chữ số) . Nạp xong cái CODE đó nó sẽ lưu vào datacodeold.lua và sẽ không dùng được nữa.
    - Vấn đề mua KNB = tiền vạn mình quên share file questkey.txt , sorry nó nè :
    Thêm vào mấy dòng cuối của file nhé :
    Code:
    Kim Nguyen Bao    4    234    \spr\item\questkey\obj_item_cardg.spr    340    1    1    Kim Nguyen Bao    1

    [Only registered and activated users can see links. ]


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

    anhtuan0650 (09-03-11)

  8. #6
    ±‡[̲̅ə̲̅٨̲̅٥̲̅٦� �� �̅]‡± Čħīċķėň's Avatar
    Ngày tham gia
    Jul 2009
    Đang ở
    TP HCM
    Bài viết
    1,349
    Thanks
    62
    Thanked 101 Times in 48 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    for i=1,siso do
    a,b,c,d,e,f,g,h,i,j,k,l = random(0,9) --Thêm vào tại đây
    DANH_SACH_CODE[getn(DANH_SACH_CODE)+1] = {a,b,c,d,e,f,g,h,i,j,k,l}
    danhsachcode = TaoBang(DANH_SACH_CODE,"DANH_SACH_CODE","")
    SaveData("script/giavinh/napcard/datacode.lua",danhsachcode)
    end
    Phần chữ xanh code sai với ý tưởng của bạn rùi nó chỉ gán giá trị random cho biến a thui còn mấy biến kia vẫn = nil


    còn để danhsachcode = TaoBang(DANH_SACH_CODE,"DANH_SACH_CODE","")
    SaveData("script/giavinh/napcard/datacode.lua",danhsachcode)

    trong vòng lặp for thì cực kì nguy hiểm, mỗi lần chạy for là phải save mảng lại lại 1 lần ko cần thiết, điều này ta nên hạn chế
    Chúc 4rum ngày càng phát triển

  9. Các thành viên gởi lời cảm ơn đến Čħīċķėň vì bài viết này !

    kidcrazy187 (09-03-11)

  10. #7
    Amateur Editor kidcrazy187's Avatar
    Ngày tham gia
    May 2009
    Đang ở
    TP HCM
    Bài viết
    344
    Thanks
    76
    Thanked 317 Times in 73 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    Trích dẫn Gửi bởi Čħīċķėň [Only registered and activated users can see links. ]


    Phần chữ xanh code sai với ý tưởng của bạn rùi nó chỉ gán giá trị random cho biến a thui còn mấy biến kia vẫn = nil


    còn để danhsachcode = TaoBang(DANH_SACH_CODE,"DANH_SACH_CODE","")
    SaveData("script/giavinh/napcard/datacode.lua",danhsachcode)

    trong vòng lặp for thì cực kì nguy hiểm, mỗi lần chạy for là phải save mảng lại lại 1 lần ko cần thiết, điều này ta nên hạn chế
    - Dòng màu xanh : Tại mình đọc ngôn ngữ LUA trên mạng, nên cứ nghĩ nó sẽ gán như vậy , vậy thì giải quyết tạm thời để từng dòng hoặc for để gán cho các biến.
    - Vấn đề 2 để mình tìm cách lại. Hiện tại mình đang bận, nên chưa sửa đc, tạm thời thế nhé
    THANKS
    P/S: Ai sửa rùi post lên cũng đc
    @mod : cái thẻ [sp][/sp] Lúc nhấn thì hiện ra, lúc k hiện ra, bực ghê Có khi edit bài lại lưu k thay đổi =,=
    Lần sửa cuối bởi kidcrazy187, ngày 09-03-11 lúc 08:45 PM.

    [Only registered and activated users can see links. ]


  11. #8
    [S]-[A]-[N]-[G] sangpronhat's Avatar
    Ngày tham gia
    Apr 2008
    Đang ở
    HCM
    Bài viết
    546
    Thanks
    9
    Thanked 82 Times in 27 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    a,b,c,d,e,f,g,h,i,j,k,l = random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9),random(0,9)
    _ _! Với 12 biến như thế này thì cách đơn giản nhất lè dùng mảng nhá _ _! Chớ mốt làm 1 cái gì to hơn tý mà đặt ra 1 đống biến như thế này thì bó tay

    for i=1,12 do
    CODE[i]=random(0,9)
    end
    Đó vậy đó !! Sau đó tới đây
    DANH_SACH_CODE[getn(DANH_SACH_CODE)+1] = {a,b,c,d,e,f,g,h,i,j,k,l}
    Thì thành
    DANH_SACH_CODE[getn(DANH_SACH_CODE)+1] = CODE
    Gôd luck !!
    Soure game mobile full Unity3d mới nhất cập nhật liên tục
    Có share 1 số source free cho anh em học tập
    Click ngay
    [Only registered and activated users can see links. ]

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

    kidcrazy187 (11-03-11)

  13. #9
    Amateur Editor kidcrazy187's Avatar
    Ngày tham gia
    May 2009
    Đang ở
    TP HCM
    Bài viết
    344
    Thanks
    76
    Thanked 317 Times in 73 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    Cám ơn, tại đang bận wá, nên để đại đó mà, edit cho nhanh, làm biếng sửa =,=

    [Only registered and activated users can see links. ]


  14. #10
    Thành Viên benop001's Avatar
    Ngày tham gia
    Jan 2010
    Bài viết
    465
    Thanks
    39
    Thanked 18 Times in 14 Posts

    Ðề: [Share Script nhỏ] Vài chức năng cho các bạn !

    cho mình hõi mún làm 1 hàm kiễm tra xu thì phãi làm như thế nào dzi ? ? ?? ? ??
    Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 
Trang 1 của 3 1 2 3 CuốiCuối

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

  1. Ai sửa giúp mình Script này với (Tẩy Tiềm năng)
    Bởi jxonline94 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 0
    Bài viết cuối: 05-06-11, 11:41 AM
  2. [Share nhỏ] Map Pos của minimap
    Bởi kidcrazy187 trong diễn đàn Võ Lâm Truyền Kỳ (Jx Server)
    Trả lời: 0
    Bài viết cuối: 27-02-11, 03:18 PM
  3. Script nâng cấp chức năng GM
    Bởi banynavy trong diễn đàn Scripts
    Trả lời: 46
    Bài viết cuối: 07-08-10, 09:25 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à 07:43 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ệ.