Dã Tẩu!!!! làm nv rồi cho đồ 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
 
Kết quả 1 đến 2 của 2
  1. #1
    Thành Viên
    Ngày tham gia
    Jan 2009
    Đang ở
    Vinh Nghệ An
    Bài viết
    366
    Thanks
    0
    Thanked 4 Times in 2 Posts

    Icon3 Dã Tẩu!!!! làm nv rồi cho đồ nè

    Cái này tui lấy bên
    Code:
    www.devjx.com
    của anh CuBin nà!

    Khỏi nói nhiều.share cho mọi người nè:
    Code:
    Include("\\Script\\global\\serverlib.lua");
    str_task=""
    StrStatus=""
    CheckFinish = 0
    main_task_type=0
    main_task_target=0
    main_task_start=0
    main_startlevel=0
    main_levelexp=0
    reward_exp = 0
    reward_money = 0
    reward_item = 0
    str_item = ""
    type_item = 0
    function main(sel)
        SayEx({"Da Tau : Chao dai hiep, co muon lam nhien vu giup ta khong ta se hau ta cho that xung dang", "Vang tui sang sang giup ong./dt_nv","Nhan ngua Phi Van [leve100]/Phivan", "Thoi ta khong lam gi ca./OnCancel"});
    end;
    function dt_nv()
        if (GetTask(250)==0) then
            SayEx({"Da Tau :Nguoi dung la mot nguoi tot", "Duong nhien /nv_new", "Toi khong dam nhan/OnCancel"});
        else
            if (str_task == "") then
                local Working, Task_Num, Task_Type, Task_Start, Task_Target, StartLevel, LevelExp , CurStatus, nNeedNum = GetDTTask()
                str_task = "Day la nhiem vu thu <color=red>"..Task_Num.."<color>. Nguoi hay di nang diem <color=red>"..Task_String[Task_Type].."<color> len <color=yellow>"..Task_Target.."<color> diem.";
            end    
            DTTask(1,0)
            SayEx({str_task, "Toi da hoan thanh nhiem vu./nv_finish", "Toi muon huy bo nhiem vu nay./nv_clear", "De ta lam xong roi den tim ong./OnCancel"});
        end
    end;
    function nv_new()
        DTTask(1,0)
        SetDTTask(main_task_type,main_task_start,main_task_target,main_startlevel,main_levelexp)
        dt_nv()
    end;
    function nv_finish()
        local Working, Task_Num, Task_Type, Task_Start, Task_Target, StartLevel, LevelExp , CurStatus, nNeedNum = GetDTTask()
        if (CheckFinish == 1) then
            FinishDTTask()
            if (random(1,10)==1) then
                str_item = "mon vu khi"
                type_item = 1
            elseif (random(1,50)==25) then
                str_item = "mon do Hoang Kim"
                type_item = 2
            elseif (random(1,5)==2) then
                str_item = "mon bao vat"
                type_item = 2
            else
                str_item = "mon trang bi"
                type_item = 3
            end
            if (Task_Type==1) then            --Kinh Nghiem
                reward_exp = floor(Task_Target+Task_Target*(Task_Num+StartLevel)/10)
                reward_money = floor((Task_Target*(Task_Num+StartLevel))/100)
                reward_item = 0        
            elseif (Task_Type==2) then        --Danh Vong
                reward_exp = floor(Task_Target*(Task_Num+StartLevel))*10
                reward_money = floor(Task_Target*(Task_Num+StartLevel))*100
                reward_item = 0        
            elseif (Task_Type==3) then        --PK
                reward_exp = floor(Task_Target*(Task_Num+StartLevel))*10000
                reward_money = floor(Task_Target*(Task_Num+StartLevel))*1000
                reward_item = 0        
            elseif (Task_Type==4) then        --Tong Kim
                reward_exp = floor(Task_Target+Task_Target*(Task_Num+StartLevel)/10)*100
                reward_money = floor((Task_Target*(Task_Num+StartLevel))/100)*100
                reward_item = 0            
            end
            reward()
        else
            Talk(1,"",StrStatus)
        end
    end;
    function nv_clear_confirm()
        ClearDTTask()
        dt_nv()
    end;
    function nv_clear()
        SayEx({"Da Tau: Nguoi co chac la muon huy bo nhiem vu lan nay chu.", "Dung vay, toi muon huy bo/nv_clear_confirm", "Tu tu de toi suy nghi lai./OnCancel"});
    end;
    function reward()
        SayEx({"Da tau: Nguoi that vat va, hay chon lay mot phan thuong cua ta.", "Nhan duoc "..reward_exp.." diem kinh nghiem./r_exp", "Nhan duoc "..reward_money.." luong./r_money", "Nhan duoc mot "..str_item.."./r_item","Nhan Vat Pham Ngau Nhien/nd"});
    end;
    function r_exp()
            AddOwnExp(reward_exp)
            dt_nv()
    end;
    function r_money()
            Earn(reward_money)
            dt_nv()
    end;
    function r_item()
            GenRewardItem()
            dt_nv()
    end;
    function nd()
    j = random(0, 11)                    --¾ßÌåÀà±ð
        k = random(2, 33)                    --µÈ¼¶£¬¿ØÖÆËæ»úÉú³ÉµÀ¾ßÎïÆ·µÄ¼Û¸ñ·¶Î§Îª500ÖÁ5000
        m = random(0, 4)                    --ϵ±ð
        if (j == 0) then                     --closeweapon
            n = random(0, 5)                --ÏêϸÀà±ð
            AddItem(0, 0, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 1) then                     --rangeweapon
            n = random(0, 2)                --ÏêϸÀà±ð
            AddItem(0, 1, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 2) then                     --armor
            n = random(0, 34)                --ÏêϸÀà±ð
            AddItem(0, 2, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 3) then                     --ring
            n = random(0, 6)
            AddItem(0, 3, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 4) then                     --amulet
            n = random(0, 5)                --ÏêϸÀà±ð
            AddItem(0, 4, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 5) then                     --boots
            n = random(0, 9)                --ÏêϸÀà±ð
            AddItem(0, 5, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 6) then                     --belt
            n = random(0, 7)                --ÏêϸÀà±ð
            AddItem(0, 6, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 7) then                     --helm
            n = random(0, 18)                --ÏêϸÀà±ð
            AddItem(0, 7, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 8) then                     --cuff
            n = random(0, 7)                --ÏêϸÀà±ð
            AddItem(0, 8, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 9) then                     --pendant
            n = random(0, 5)                --ÏêϸÀà±ð
            AddItem(0, 9, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 10) then                     --horse
            n = random(0, 5)                --ÏêϸÀà±ð
            AddItem(0, 10, n, k, m, 1)
            Msg2Player("Hay mo thung do ra xem do la vat gi")
            Msg2Player("Chuc nguoi may man !")
        end
        if (j == 11) then                    --hk
            a = random(0, 8)
            if (a == 0) then
                b = random(0, 5)
                c = random(89, 197)
                AddItem(0, 0, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 1) then
                c = random(11, 123)
                AddItem(0, 2, 28, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 2) then
                b = random(1, 5)
                c = random(1, 10)
                AddItem(0, 3, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 3) then
                b = random(2, 10)
                c = random(1, 10)
                AddItem(0, 4, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 4) then
                b = random(4, 9)
                c = random(1, 10)
                AddItem(0, 5, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 5) then
                b = random(2, 7)
                c = random(1, 10)
                AddItem(0, 6, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 6) then
                b = random(14, 17)
                c = random(1, 10)
                AddItem(0, 7, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 7) then
                b = random(3, 6)
                c = random(1, 10)
                AddItem(0, 8, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
            if (a == 8) then
                b = random(2, 6)
                c = random(1, 10)
                AddItem(0, 9, b, c, m, 1)
                Msg2Player("Hay mo thung do ra xem do la vat gi")
                Msg2Player("Chuc nguoi may man !")
            end
    
    end
    dt_nv()
    end;
    
    function OnCancel()
    end;
    Thấy hay hay thì thanks phát coi mồ!!!!( nao)
    Khách viếng thăm hãy cùng My.Ami.Pro xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên Tâm Huyết giangleloi's Avatar
    Ngày tham gia
    Mar 2008
    Đang ở
    Lâm Đồng
    Bài viết
    1,877
    Thanks
    38
    Thanked 394 Times in 136 Posts

    Ðề: Dã Tẩu!!!! làm nv rồi cho đồ nè

    sv cubin có rồi mà bạn,nó có khác gì cái này đâu
    Khách viếng thăm hãy cùng giangleloi xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 

Tag của Chủ đề này

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à 05:57 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ệ.