[JX] Viết Sai script mong các cao nhân chỉ điểm !!
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 6 của 6
  1. #1
    Thành Viên
    Ngày tham gia
    Feb 2009
    Bài viết
    132
    Thanks
    4
    Thanked 0 Times in 0 Posts

    Viết Sai script mong các cao nhân chỉ điểm !!

    Không Biết Viết Nhưng Tập Viết Theo Ai Dè Lấy Hoài Được Hoài lun Xin Chỉ Giáo @@

    function thuong20()
    if(GetLevel() < 20) then
    Talk(1, "", "<color=yellow>Bạn luyện đến cấp 20 hãy quay lại nhận.")
    return end
    if(GetNumber(nValue,3) > 0) then
    Talk(1, "", ALREADY) ( Ghi Chú : ALREADY = Ban da nhan qua phan thuong)
    return end
    local nIndex = ItemSetAdd(2,0,176,0,0,5,0);--Non Kim Phong
    if(nIndex > 0) then
    LockItem(nIndex)--khoa bao hiem vinh vien
    AddItemID(nIndex)
    end
    local nIndex = ItemSetAdd(2,0,183,0,0,5,0);--Giay Kim Phong
    if(nIndex > 0) then
    LockItem(nIndex)--khoa bao hiem vinh vien
    AddItemID(nIndex)
    end
    local nIndex = ItemSetAdd(2,0,177,0,0,5,0);--Ao Kim Phong
    if(nIndex > 0) then
    LockItem(nIndex)--khoa bao hiem vinh vien
    AddItemID(nIndex)
    end
    if(GetLevel() < 20) then
    Talk(1, "", "<color=yellow>Bạn luyện đến cấp 20 hãy quay lại nhận.")
    return end
    end
    end



    function hotro123()
    AddItem(0,5,31,0,0,0,0,0)
    if(nIndex > 0) then
    LockItem(nIndex)--khoa bao hiem vinh vien
    AddItemID(nIndex)
    end
    else
    Talk(1,"Bạn Đã Nhận Qua Phần Thưởng Rồi !")
    end
    end
    Lần sửa cuối bởi hoangbachma, ngày 07-06-15 lúc 02:27 AM. Lý do: Thiếu Sót
    Khách viếng thăm hãy cùng hoangbachma xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên
    Ngày tham gia
    Apr 2008
    Bài viết
    294
    Thanks
    3
    Thanked 42 Times in 36 Posts

    Ðề: Viết Sai script mong các cao nhân chỉ điểm !!

    sv của kenny nguyen hả (ngạo tuyet)
    đoạn 1 : check lại giá trị task đóm mình thấy sau khi nhận xong bạn không có lưu Task "đã nhận", nếu cảm thấy xài Task kiểu gộp này không quen thì bạn có thể tạo thêm task trong Taskid.lua xong sử dụng hàm GetTask(ten task) SetTask(tên task) để lưu như những sv trước

    đoạn 2: nIndex chưa gán, cấu trúc gì mà --if ...end ..else ..end , bạn muốn nhân vật chỉ nhận hổ trợ 1 lần thì làm như sau

    function nhanhotro()
    if
    GetTask(taskhotro) ~= 1 then
    -- add item
    -- add item
    -- add item
    ...
    SetTask(taskhotr,1)
    else
    Talk("Da nhan ho tro roi, lam mat ran ma chiu")
    end
    end
    Khách viếng thăm hãy cùng tinhhack 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 tinhhack vì bài viết này !

    hoangbachma (07-06-15)

  4. #3
    Thành Viên
    Ngày tham gia
    Feb 2009
    Bài viết
    132
    Thanks
    4
    Thanked 0 Times in 0 Posts

    Ðề: Viết Sai script mong các cao nhân chỉ điểm !!

    cái này mình vẫn không hiểu lắm . Vd muốn ở cấp 20 nhận đồ và chỉ được nhận 1 lần với cấu trúc trên xin chỉ cách viết với bạn
    Khách viếng thăm hãy cùng hoangbachma xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  5. #4
    Thành Viên
    Ngày tham gia
    Apr 2008
    Bài viết
    294
    Thanks
    3
    Thanked 42 Times in 36 Posts

    Ðề: Viết Sai script mong các cao nhân chỉ điểm !!

    TASK có 2 loại,
    task vĩnh viễn: sử dụng = hàm SetTask(têntask,gia' trị lưu) -- giá trị này sẽ không mất khi out game hoặc bảo trì, trừ khi ta thay đổi nó = hàm SetTask
    task tạm thời: sử dụng = hàm SetTaskTemp(têntask,gia' trj luu) --gia' trị này sẽ mất khi out game
    như yêu cầu của bạn cót thêm check lv nữa, lv >= 20 nhận 1 lần và vĩnh viễn không nhận dc nữa

    function nhanhotro()
    ..if GetTask(taskhotro) ~= 1 then
    .............if GetLevel() >= 20 then
    .................. add item
    .................. add item
    ..................add item
    ........................
    ...................SetTask(taskhotro,1)
    .................end
    ..else
    ........Talk("Ban chua du dk nhan, hoac da nhan roi")
    ..end
    end
    Lần sửa cuối bởi tinhhack, ngày 07-06-15 lúc 08:10 PM.
    Khách viếng thăm hãy cùng tinhhack xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

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

    hoangbachma (07-06-15)

  7. #5
    Thành Viên
    Ngày tham gia
    Feb 2015
    Bài viết
    8
    Thanks
    0
    Thanked 4 Times in 3 Posts

    Ðề: Viết Sai script mong các cao nhân chỉ điểm !!

    Trích dẫn Gửi bởi hoangbachma [Only registered and activated users can see links. ]
    Không Biết Viết Nhưng Tập Viết Theo Ai Dè Lấy Hoài Được Hoài lun Xin Chỉ Giáo @@



    function hotro123()
    if(GetTask(T_HOTRO) == 0) then --T_HOTRO ban tu tao ra 1 task de quan ly
    nIndex=SetItemAdd(0,5,31,0,0,0,0,0) -- ham nay sua lai theo dung cau truc cua server ma ban dang code
    AddItemID(nIndex)
    LockItem(nIndex)--khoa bao hiem vinh vien
    SetTask(T_HOTRO,1)
    else
    Talk(1,"Bạn Đã Nhận Qua Phần Thưởng Rồi !")
    end
    end
    Lần sửa cuối bởi teemo_Az90, ngày 08-06-15 lúc 04:06 AM.
    Khách viếng thăm hãy cùng teemo_Az90 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

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

    hoangbachma (08-06-15)

  9. #6
    Thành Viên Tâm Huyết BladeKnight109's Avatar
    Ngày tham gia
    Jun 2014
    Đang ở
    0x00000000
    Bài viết
    1,135
    Thanks
    151
    Thanked 950 Times in 465 Posts

    Ðề: Viết Sai script mong các cao nhân chỉ điểm !!

    Full function
    Code:
    --Define TASK
    TASKSAVE_HOTROTANTHU_1	1
    TASKSAVE_HOTROTANTHU_2	2
    
    function thuong20()
    	if(GetLevel() < 20) then
    		Talk(1, "", "<color=yellow>B?n luy?n d?n c?p 20 hãy quay l?i nh?n.")
    		return
    	end
    	
    	if(GetTask(TASKSAVE_HOTROTANTHU_1) > 0) then
    		Talk(1, "", ALREADY) ( Ghi Chú : ALREADY = Ban da nhan qua phan thuong)
    		return
    	end
    	
    	local nIndex = ItemSetAdd(2,0,176,0,0,5,0);--Non Kim Phong
    	if(nIndex > 0) then
    		LockItem(nIndex)--khoa bao hiem vinh vien
    		AddItemID(nIndex)
    	end
    	
    	nIndex = ItemSetAdd(2,0,183,0,0,5,0);--Giay Kim Phong
    	if(nIndex > 0) then
    		LockItem(nIndex)--khoa bao hiem vinh vien
    		AddItemID(nIndex)
    	end
    	
    	nIndex = ItemSetAdd(2,0,177,0,0,5,0);--Ao Kim Phong
    	if(nIndex > 0) then
    		LockItem(nIndex)--khoa bao hiem vinh vien
    		AddItemID(nIndex)
    	end
    	
    	SetTask(TASKSAVE_HOTROTANTHU_1,1)
    end
    
    function hotro123()
    	if(GetTask(TASKSAVE_HOTROTANTHU_2) <= 0) then
    		local nIndex = AddItem(0,5,31,0,0,0,0,0)
    		LockItem(nIndex)--khoa bao hiem vinh vien
    		AddItemID(nIndex)
    		SetTask(TASKSAVE_HOTROTANTHU_2,1)
    	else
    		Talk(1,"B?n Ðã Nh?n Qua Ph?n Thu?ng R?i !")
    	end
    end
    Đọc và suy nghĩ nhé. Của bạn viết sai rất nhiều, dư end nữa
    Skype: BladeKnight109 - [Only registered and activated users can see links. ]
    Telegram: @knight109 - [Only registered and activated users can see links. ]

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

    hoangbachma (08-06-15)

 

 

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

  1. [JX] e là NewBie mong các bạn nào rành về Script và MSSQL giúp đỡ ợ
    Bởi vinhkien1288 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 6
    Bài viết cuối: 22-12-12, 08:08 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. Mong Được Giúp Đỡ Về SCRIPT
    Bởi concabach trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 5
    Bài viết cuối: 24-04-11, 05:16 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à 04:05 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ệ.