Kết quả 1 đến 3 của 3
-
15-03-14, 07:31 PM #1
Lỗi này khó hiểu pro nào vào giúp phát
lúc đầu e viết script cho item đèn kéo quân click phải vào đc VP rồi item đèn kéo quân đó mất đi (như ev siro ngũ sắc). Nhưng chỉ đc lúc đầu thì nó còn mất item nhưng lúc sau cũng cùng script đó nhưng click phải vào lại ko mất đi item đó
CÒN ĐÂY LÀ FILE.LUA CỦA NÓ:
Code:local tbItem = Item:GetClass("denkeoquan"); tbItem.tbItemInfo = { bForceBind=1, }; function tbItem:OnUse() DoScript("\\script\\item\\class\\denkeoquan.lua") -- Reload Đèn Kéo Quân local nCount = me.GetItemCountInBags(18,1,1337,4) -- Đèn Kéo Quân if nCount < 1 then Dialog:SendBlackBoardMsg(me, string.format("Trong người không có <color=yellow>Đèn Kéo Quân<color> !")); return end self:OnUse1(); end function tbItem:OnUse1() if me.CountFreeBagCell() < 10 then Dialog:Say("Phải Có 10 Ô Trống Trong Túi Hành Trang!"); return 0; end local nCount = me.GetItemCountInBags(18,1,1337,4) -- Đèn Kéo Quân local tbItemId1 = {18,1,1337,0,0,0}; -- Đèn Kéo Quân local i = 0; local nAdd = 0; local nRand = 0; local nIndex = 0; nRand = MathRandom(1, 100); local tbRate = {50, 30, 15, 5}; -- Rate Item local tbAward = {1 ,2, 3, 4}; -- Rate 4 con số for i = 1, 4 do nAdd = nAdd + tbRate[i]; if nAdd >= nRand then nIndex = i; break; end end if (tbAward[nIndex]==1) then -- Xác xuất ra số 1 là 50/100 (50%) me.AddExp(10000000) -- 10tr Exp me.AddStackItem(18,1,1,7,self.tbItemInfo,2) -- (18,1,1,7) là Huyền Tinh (Cấp 7) , 2 là số lượng Huyền Tinh (Cấp 7) người chơi nhận được Dialog:SendBlackBoardMsg(me, string.format("Nhận được 10tr EXP và 2 Huyền Tinh (Cấp 7)!")); Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là Đèn Kéo Quân me.CastSkill(307, 1, -1, me.GetNpc().nIndex); end if (tbAward[nIndex]==2) then -- Xác xuất ra số 2 là 30/10000 (30%) me.AddExp(20000000) -- 20tr Exp me.AddStackItem(18,1,1,8,self.tbItemInfo,1) -- (18,1,1,8) là Huyền Tinh (Cấp 8) , 1 là số lượng Huyền Tinh (Cấp 8) người chơi nhận được Dialog:SendBlackBoardMsg(me, string.format("Nhận được 20tr EXP và 1 Huyền Tinh (Cấp 8)!")); Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là Đèn Kéo Quân me.CastSkill(307, 1, -1, me.GetNpc().nIndex); end if (tbAward[nIndex]==3) then -- Xác xuất ra số 3 là 15/100 (15%) me.AddExp(400000000) -- 40tr Exp me.AddStackItem(18,1,1,8,self.tbItemInfo,3) -- (18,1,1,8) là Huyền Tinh (Cấp 8) , 2 là số lượng Huyền Tinh (Cấp 8) người chơi nhận được Dialog:SendBlackBoardMsg(me, string.format("Nhận được 40tr EXP và 3 Huyền Tinh (Cấp 8)!")); Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là Đèn Kéo Quân me.CastSkill(307, 1, -1, me.GetNpc().nIndex); end if (tbAward[nIndex]==4) then -- Xác xuất ra số 4 là 5/100 (5%) me.AddExp(150000000) -- 100tr Exp me.AddStackItem(18,1,1,10,self.tbItemInfo,2) -- (18,1,1,12) là Huyền Tinh (Cấp 10) , 2 là số lượng Huyền Tinh (Cấp 10) người chơi nhận được Dialog:SendBlackBoardMsg(me, string.format("Nhận được 100tr EXP và 2 Huyền Tinh (Cấp 10)!")); Task:DelItem(me, tbItemId1, 1); -- Xóa 1 Item tbItemId1 được khai báo ở trên là Đèn Kéo Quân GlobalExcute({"Dialog:GlobalNewsMsg_GS","<color=yellow>Người chơi <color=green>["..me.szName.."]<color> sử dụng <color=yellow>Đèn Kéo Quân<color> nhận được <color=green>2 Huyền Tinh Hoàn Mỹ (Cấp 10)<color> !<color>"}); KDialog.NewsMsg(1, Env.NEWSMSG_COUNT,"<color=yellow>Người chơi <color=green>["..me.szName.."]<color> sử dụng <color=yellow>Đèn Kéo Quân<color> nhận được <color=green>2 Huyền Tinh Hoàn Mỹ (Cấp 10)<color> !<color>"); KDialog.MsgToGlobal("<color=yellow>Người chơi <color=green>["..me.szName.."]<color> sử dụng <color=yellow>Đèn Kéo Quân<color> nhận được <color=green>2 Huyền Tinh Hoàn Mỹ (Cấp 10)<color> !<color>"); me.CastSkill(307, 1, -1, me.GetNpc().nIndex); end end
Khách viếng thăm hãy cùng anhnhianh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
15-03-14, 07:45 PM #2
- Ngày tham gia
- May 2012
- Bài viết
- 1,084
- Thanks
- 99
- Thanked 707 Times in 402 Posts
Ðề: Lỗi này khó hiểu pro nào vào giúp phát
PHP Code:local tbItemId1 = {18,1,1337,0,0,0}; -- Đèn Kéo Quân
︵ℵóα
-
15-03-14, 07:50 PM #3
Ðề: Lỗi này khó hiểu pro nào vào giúp phát
Khách viếng thăm hãy cùng anhnhianh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!