Kết quả 1 đến 5 của 5
-
16-03-14, 08:35 AM #1
Xin pro chỉ cách Add thêm giờ hoạt động
e muốn add thêm giờ vào file.lua này nhưng ko biết add làm sao mong pro chỉ giúp
Script của e nó đây
Code:local tbBanPhuc = Npc:GetClass("thantaibanphuc"); function tbBanPhuc:OnDialog() if me.CountFreeBagCell() < 5 then Dialog:Say("Phải Có 5 Ô Trống Trong Túi Hành Trang"); return 0; end local tbEvent = { Player.ProcessBreakEvent.emEVENT_MOVE, Player.ProcessBreakEvent.emEVENT_ATTACK, Player.ProcessBreakEvent.emEVENT_SITE, Player.ProcessBreakEvent.emEVENT_USEITEM, Player.ProcessBreakEvent.emEVENT_ARRANGEITEM, Player.ProcessBreakEvent.emEVENT_DROPITEM, Player.ProcessBreakEvent.emEVENT_SENDMAIL, Player.ProcessBreakEvent.emEVENT_TRADE, Player.ProcessBreakEvent.emEVENT_CHANGEFIGHTSTATE, Player.ProcessBreakEvent.emEVENT_CLIENTCOMMAND, Player.ProcessBreakEvent.emEVENT_LOGOUT, Player.ProcessBreakEvent.emEVENT_DEATH, Player.ProcessBreakEvent.emEVENT_ATTACKED, } local tbOpt = { GeneralProcess:StartProcess("Đang Hái Lộc", 10 * Env.GAME_FPS, {self.OnDialog4, self}, nil, tbEvent); }; end function tbBanPhuc:OnDialog4() local i = 0; local nAdd = 0; local nRand = 0; local nIndex = 0; -- random nRand = MathRandom(1, 10000); -- fill 3 rate local tbRate = {3000,1000,6000}; local tbAward = {1,2,3} for i = 1, 3 do nAdd = nAdd + tbRate[i]; if nAdd >= nRand then nIndex = i; break; end end if (tbAward[nIndex]==3) then me.AddExp(100000000); me.AddStackItem(18,10,11,2,self.tbBanPhuc,20); -- Cá CHép Đỏ me.Msg("Hái được <color=green>100tr Exp và 20 Tiền Xu<color>"); end if (tbAward[nIndex]==1) then me.AddExp(200000000); me.AddStackItem(18,10,11,2,self.tbBanPhuc,30); -- Cá CHép Vàng me.Msg("Hái được <color=green>200tr Exp và 30 Tiền Xu<color>"); end if (tbAward[nIndex]==2) then me.AddExp(300000000); me.AddItem(18,10,11,2,self.tbBanPhuc,40); -- Lưỡi Kiếm me.Msg("Hái được <color=green>300tr Exp và 40 Tiền Xu<color>"); 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é!
-
16-03-14, 08:45 AM #2
- Ngày tham gia
- May 2012
- Bài viết
- 1,084
- Thanks
- 99
- Thanked 707 Times in 402 Posts
Ðề: Xin pro chỉ cách Add thêm giờ hoạt động
PHP Code:local nCurTime = tonumber(os.date("%H%M", GetTime()));
if (nCurTime >= 0900 and nCurTime <= 0910) or (nCurTime >= 1500 and nCurTime <= 1510) or (nCurTime >= 1700 and nCurTime <= 1710) or (nCurTime >= 2000 and nCurTime <= 2010) then
PHP Code:Dialog:Say("Hái Lộc diễn ra lúc :\n9h00 -> 9h10\n15h00 -> 15h10\n17h00 -> 17h10\n20h00 -> 20h10")
︵ℵóα
-
Các thành viên gởi lời cảm ơn đến na.ilusm89 vì bài viết này !
anhnhianh (16-03-14)
-
16-03-14, 08:48 AM #3
Ðề: Xin pro chỉ cách Add thêm giờ hoạt động
nhưng add vào chỗ nào hả pro ?? giúp e chút nữa thôi
Khách viếng thăm hãy cùng anhnhianh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-03-14, 09:19 PM #4
- Ngày tham gia
- Sep 2008
- Bài viết
- 1,320
- Thanks
- 256
- Thanked 739 Times in 558 Posts
Ðề: Xin pro chỉ cách Add thêm giờ hoạt động
Code:local tbBanPhuc = Npc:GetClass("thantaibanphuc"); function tbBanPhuc:Onfialog() local tbOpt = {}; local nCurTime = tonumber(os.date("%H%M", GetTime())); if (nCurTime >= 1330 and nCurTime <= 1335) then table.insert(tbOpt , {"Chưc Năng Ban Phúc", self.ChucNangBanPhuc, self}); else table.insert(tbOpt, {"Chưa đến thời gian Ban Phuc"}); end end function tbBanPhuc:ChucNangBanPhuc() if me.CountFreeBagCell() < 5 then Dialog:Say("Phải Có 5 Ô Trống Trong Túi Hành Trang"); return 0; end local tbEvent = { Player.ProcessBreakEvent.emEVENT_MOVE, Player.ProcessBreakEvent.emEVENT_ATTACK, Player.ProcessBreakEvent.emEVENT_SITE, Player.ProcessBreakEvent.emEVENT_USEITEM, Player.ProcessBreakEvent.emEVENT_ARRANGEITEM, Player.ProcessBreakEvent.emEVENT_DROPITEM, Player.ProcessBreakEvent.emEVENT_SENDMAIL, Player.ProcessBreakEvent.emEVENT_TRADE, Player.ProcessBreakEvent.emEVENT_CHANGEFIGHTSTATE, Player.ProcessBreakEvent.emEVENT_CLIENTCOMMAND, Player.ProcessBreakEvent.emEVENT_LOGOUT, Player.ProcessBreakEvent.emEVENT_DEATH, Player.ProcessBreakEvent.emEVENT_ATTACKED, } local tbOpt = { GeneralProcess:StartProcess("Đang Hái Lộc", 10 * Env.GAME_FPS, {self.OnDialog4, self}, nil, tbEvent); }; end function tbBanPhuc:OnDialog4() local i = 0; local nAdd = 0; local nRand = 0; local nIndex = 0; -- random nRand = MathRandom(1, 10000); -- fill 3 rate local tbRate = {3000,1000,6000}; local tbAward = {1,2,3} for i = 1, 3 do nAdd = nAdd + tbRate[i]; if nAdd >= nRand then nIndex = i; break; end end if (tbAward[nIndex]==3) then me.AddExp(100000000); me.AddStackItem(18,10,11,2,self.tbBanPhuc,20); -- Cá CHép Đỏ me.Msg("Hái được <color=green>100tr Exp và 20 Tiền Xu<color>"); end if (tbAward[nIndex]==1) then me.AddExp(200000000); me.AddStackItem(18,10,11,2,self.tbBanPhuc,30); -- Cá CHép Vàng me.Msg("Hái được <color=green>200tr Exp và 30 Tiền Xu<color>"); end if (tbAward[nIndex]==2) then me.AddExp(300000000); me.AddItem(18,10,11,2,self.tbBanPhuc,40); -- Lưỡi Kiếm me.Msg("Hái được <color=green>300tr Exp và 40 Tiền Xu<color>"); end end
-
Các thành viên gởi lời cảm ơn đến __Jie__ vì bài viết này !
anhnhianh (16-03-14)
-
16-03-14, 09:51 PM #5
Ðề: Xin pro chỉ cách Add thêm giờ hoạt động
tks pro nhá
Một với một là bao nhiêu ? (viết trả lời bằng số)Khách viếng thăm hãy cùng anhnhianh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!