vhmt1101
05-05-15, 12:23 AM
Đây là code action trong vòng quay may mắn. Mua hạnh nhân quả và quay thì Quay bình thường
Nhưng Hạnh nhân quả không biến mất và vẫn còn quay tiếp liên tục được hoài
Chèn thêm code delete item khi click vào chữ Quay thì vẫn k mất item được.
Các bác cao thủ giúp dùm em với. thêm code gì và vào đâu trong đoạn nay hay client ạ !!
--Ṿng quay may m¡n
--Author: Kenvin Sói
--*********************--
x930038_g_scriptId = 930038
--********************--
x930038_g_Need_Item = 30504583
--********************--
--**********************************--
--* On Update *--
--**********************************--
function x930038_OnUpdate(sceneId,selfId,Request,Param_1,Pa ram_2)
--*********************--
if Request==0 then
x930038_ChooseGift(sceneId,selfId)
end
--*********************--
if Request==1 then
x930038_ChangeItemList(sceneId,selfId)
end
--*********************--
if Request==2 then
x930038_RecieveGift(sceneId,selfId,Param_1,Param_2 )
end
--*********************--
end
--**********************************--
--* Choose Gift *--
--**********************************--
function x930038_ChooseGift(sceneId,selfId)
--*********************--
if GetMissionData(sceneId,selfId,LUCKY_GIFT)==1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ có ph¥n thß·ng chßa nh§n!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
if LuaFnGetAvailableItemCount(sceneId, selfId, x930038_g_Need_Item)<1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ không có HƠnh V§n Quä!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
local nRandom=random(24)
--*********************--
SetMissionData(sceneId,selfId,LUCKY_GIFT,1)
--*********************--
BeginUICommand(sceneId)
UICommand_AddInt(sceneId,nRandom)
EndUICommand(sceneId)
DispatchUICommand(sceneId,selfId,2012816)
--*********************--
end
--**********************************--
--* Change Item List *--
--**********************************--
function x930038_ChangeItemList(sceneId,selfId)
--*********************--
if GetMissionData(sceneId,selfId,LUCKY_GIFT)==1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ có ph¥n thß·ng chßa nh§n!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
BeginEvent(sceneId)
AddText(sceneId,"Làm m¾i v§t ph¦m thành công!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
--*********************--
BeginUICommand(sceneId)
EndUICommand(sceneId)
DispatchUICommand(sceneId,selfId,20120817)
--*********************--
end
--**********************************--
--* Recieve Gift *--
--**********************************--
function x930038_RecieveGift(sceneId,selfId,Item_ID,Item_Nu mber)
--*********************--
if GetMissionData(sceneId,selfId,LUCKY_GIFT)~=1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ không có ph¥n thß·ng có th¬ nh§n!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
elseif TryRecieveItem(sceneId,selfId,Item_ID,1)<=0 then
BeginEvent(sceneId)
AddText(sceneId,"Hăy s¡p xªp lƠi mµt khoäng tr¯ng trong tay näi!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
for i=1,Item_Number-1 do
TryRecieveItem(sceneId,selfId,Item_ID,1)
end
LuaFnDelAvailableItem(sceneId,selfId,x930038_g_Nee d_Item,1)
--*********************--
BeginEvent(sceneId)
AddText(sceneId,"Nh§n ph¥n thß·ng thành công!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
--*********************--
SetMissionData(sceneId,selfId,LUCKY_GIFT,0)
--*********************--
end
Nhưng Hạnh nhân quả không biến mất và vẫn còn quay tiếp liên tục được hoài
Chèn thêm code delete item khi click vào chữ Quay thì vẫn k mất item được.
Các bác cao thủ giúp dùm em với. thêm code gì và vào đâu trong đoạn nay hay client ạ !!
--Ṿng quay may m¡n
--Author: Kenvin Sói
--*********************--
x930038_g_scriptId = 930038
--********************--
x930038_g_Need_Item = 30504583
--********************--
--**********************************--
--* On Update *--
--**********************************--
function x930038_OnUpdate(sceneId,selfId,Request,Param_1,Pa ram_2)
--*********************--
if Request==0 then
x930038_ChooseGift(sceneId,selfId)
end
--*********************--
if Request==1 then
x930038_ChangeItemList(sceneId,selfId)
end
--*********************--
if Request==2 then
x930038_RecieveGift(sceneId,selfId,Param_1,Param_2 )
end
--*********************--
end
--**********************************--
--* Choose Gift *--
--**********************************--
function x930038_ChooseGift(sceneId,selfId)
--*********************--
if GetMissionData(sceneId,selfId,LUCKY_GIFT)==1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ có ph¥n thß·ng chßa nh§n!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
if LuaFnGetAvailableItemCount(sceneId, selfId, x930038_g_Need_Item)<1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ không có HƠnh V§n Quä!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
local nRandom=random(24)
--*********************--
SetMissionData(sceneId,selfId,LUCKY_GIFT,1)
--*********************--
BeginUICommand(sceneId)
UICommand_AddInt(sceneId,nRandom)
EndUICommand(sceneId)
DispatchUICommand(sceneId,selfId,2012816)
--*********************--
end
--**********************************--
--* Change Item List *--
--**********************************--
function x930038_ChangeItemList(sceneId,selfId)
--*********************--
if GetMissionData(sceneId,selfId,LUCKY_GIFT)==1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ có ph¥n thß·ng chßa nh§n!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
BeginEvent(sceneId)
AddText(sceneId,"Làm m¾i v§t ph¦m thành công!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
--*********************--
BeginUICommand(sceneId)
EndUICommand(sceneId)
DispatchUICommand(sceneId,selfId,20120817)
--*********************--
end
--**********************************--
--* Recieve Gift *--
--**********************************--
function x930038_RecieveGift(sceneId,selfId,Item_ID,Item_Nu mber)
--*********************--
if GetMissionData(sceneId,selfId,LUCKY_GIFT)~=1 then
BeginEvent(sceneId)
AddText(sceneId,"Các hƠ không có ph¥n thß·ng có th¬ nh§n!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
elseif TryRecieveItem(sceneId,selfId,Item_ID,1)<=0 then
BeginEvent(sceneId)
AddText(sceneId,"Hăy s¡p xªp lƠi mµt khoäng tr¯ng trong tay näi!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
return
end
--*********************--
for i=1,Item_Number-1 do
TryRecieveItem(sceneId,selfId,Item_ID,1)
end
LuaFnDelAvailableItem(sceneId,selfId,x930038_g_Nee d_Item,1)
--*********************--
BeginEvent(sceneId)
AddText(sceneId,"Nh§n ph¥n thß·ng thành công!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId,-1)
--*********************--
SetMissionData(sceneId,selfId,LUCKY_GIFT,0)
--*********************--
end