local Enchange_Item1 = -1;
local Enchange_Item2 = -1;
local g_Object = -1;
local QianghualuId = 30900045 --天罡强化露
function EquipStrengthen_PreLoad()
this:RegisterEvent("UI_COMMAND")
this:RegisterEvent("OBJECT_CARED_EVENT")
this:RegisterEvent("PUT_STENGTHEN_ITEM")
this:RegisterEvent("PACKAGE_ITEM_CHANGED")
this:RegisterEvent("UNIT_MONEY");
this:RegisterEvent("TAKE_STENGTHEN_ITEM")
this:RegisterEvent("MONEYJZ_CHANGE"); --zchw
end
function EquipStrengthen_OnLoad()
end
function EquipStrengthen_OnEvent(event)
if ( event == "UI_COMMAND" ) then
if tonumber(arg0) == 1002 then
EquipStrengthen_Clear();
Init_EquipStrengthen_Frame();
objCared = -1
local xx = Get_XParam_INT(0);
objCared = DataPool : GetNPCIDByServerID(xx);
if tonumber(objCared)==nil or tonumber(objCared)== -1 then
PushDebugMessage("server传过来的数据有问题。");
return;
end
this:Show();
BeginCareObject_EquipStrengthen(objCared);
end
if tonumber(arg0) == 20200533 then
local RestEquipPos = Get_XParam_INT(0)
if RestEquipPos >=0 or RestEquipPos ~= nil then
EquipStrengthen_RestUpdate(RestEquipPos)
return
end
end
elseif ( event == "PUT_STENGTHEN_ITEM" ) then
if arg0~= nil then
EquipStrengthen_Update(arg0);
end
local playerMoney = Player:GetData("MONEY");
EquipStrengthen_SelfMoney:SetProperty("MoneyNumber", playerMoney);
EquipStrengthen_SelfJiaozi:SetProperty("MoneyNumber", Player:GetData("MONEY_JZ")); --zchw
elseif ( event == "UNIT_MONEY" and this:IsVisible()) then
EquipStrengthen_SelfMoney:SetProperty("MoneyNumber", tostring(Player:GetData("MONEY")));
elseif (event == "MONEYJZ_CHANGE" and this:IsVisible()) then
EquipStrengthen_SelfJiaozi:SetProperty("MoneyNumber", Player:GetData("MONEY_JZ")); --zchw
elseif ( event == "PACKAGE_ITEM_CHANGED" and this:IsVisible()) then
if(tonumber(arg0) and PlayerPackage:GetItemTableIndex(tonumber(arg0)) == Enchange_Item2) then
if(PlayerPackage:IsLock(tonumber(arg0)) == 1) then
--push事件干掉msgbox
LifeAbility:CloseStrengthMsgBox();
return;
end
end
if (Enchange_Item1 == tonumber(arg0)) then
--if(PlayerPackage:IsLock(tonumber(Enchange_Item1)) == 1) then
--EquipStrengthen_Clear();
--Init_EquipStrengthen_Frame();
--return
--end
EquipStrengthen_Update(arg0);
end
elseif (event == "TAKE_STENGTHEN_ITEM") then
EquipStrengthen_Clear();
Init_EquipStrengthen_Frame();
end
end
function Init_EquipStrengthen_Frame()
local playerMoney = Player:GetData("MONEY");
EquipStrengthen_SelfMoney:SetProperty("MoneyNumber", playerMoney);
EquipStrengthen_SelfJiaozi:SetProperty("MoneyNumber", Player:GetData("MONEY_JZ")); --zchw
EquipStrengthen_Info2:Hide();
EquipStrengthen_Info6:Hide();
EquipStrengthen_Info5:Hide();
EquipStrengthen_Info8:Hide();
EquipStrengthen_Info7:Hide();
EquipStrengthen_Info9:Hide();
end
function BeginCareObject_EquipStrengthen(objCared)
g_Object = objCared;
this:CareObject(tonumber(g_Object), 1, "EquipStrengthen");
end
function EquipStrengthen_RestUpdate(i_index)
local NeedMoney
local Property
local theAction = EnumAction(i_index, "packageitem");
NeedMoney,Property = LifeAbility : Get_Equip_StrengthLevel(i_index);
local Propertytable = {100,100,50,20,10,5,5,5,1,1}
EquipStrengthen_Money : SetProperty("MoneyNumber", tostring(NeedMoney));
EquipStrengthen_Object1:SetActionItem(theAction:GetID())
local StrongLevel = LifeAbility:Get_Equip_CurStrengthLevel(i_index)
EquipStrengthen_Info6:SetText(""..tonumber(StrongLevel));
EquipStrengthen_Info5:SetText(""..tonumber(Propertytable[StrongLevel]).."%")
local Equip_Level = LifeAbility : Get_Equip_Level(i_index);
if Equip_Level < 40 then
Enchange_Item2 = 30900005; --地煞强化精华
EquipStrengthen_Info7 : SetText("#G#{_ITEM30900005}")
else
Enchange_Item2 = 30900006; --天罡强化精华
EquipStrengthen_Info7 : SetText("#G#{_ITEM30900006}#W或#G#{_ITEM30900045}")
end
LifeAbility : Lock_Packet_Item(i_index,0)
end
function EquipStrengthen_Update(Item_index)
local i_index = tonumber(Item_index)
local theAction = EnumAction(i_index, "packageitem");
local NeedMoney
local Property
--PushDebugMessage(tostring(Item_index));
if theAction:GetID() ~= 0 then
local EquipPoint = LifeAbility : Get_Equip_Point(i_index)
if EquipPoint == -1 or EquipPoint == 8 or EquipPoint == 9 or EquipPoint == 10 or EquipPoint == 2 then
if EquipPoint ~= -1 then
PushDebugMessage("不能放入这种装备。")
end
return
end
NeedMoney,Property = LifeAbility : Get_Equip_StrengthLevel(i_index);
--BUG30523,alan,2007-12-29
--将装备拖到强化窗口与每次强化结束都会调用此函数，9级装备是不允许放到强化窗口的，但是强化到9级时
--需要显示9级装备强化的结果，这里用强化窗口的物品格是否有物品来识别这两类情形。
--后一情形下禁用OK按钮
if(NeedMoney<=0 or tonumber(Property)==nil or tonumber(Property)<0) then
if Enchange_Item1 ~= -1 then
NeedMoney = 0
EquipStrengthen_OK:Disable()
else
PushDebugMessage("此装备无法强化。")
return
end
else
EquipStrengthen_OK:Enable()
end
if Enchange_Item1 ~= -1 then
LifeAbility : Lock_Packet_Item(Enchange_Item1,0);
end
--push事件干掉msgbox
LifeAbility:CloseStrengthMsgBox();
local Equip_Level = LifeAbility : Get_Equip_Level(i_index);
EquipStrengthen_Object1:SetActionItem(theAction:GetID());
LifeAbility : Lock_Packet_Item(i_index,1);
Enchange_Item1 = i_index
EquipStrengthen_Money : SetProperty("MoneyNumber", tostring(NeedMoney));
local StrongLevel = LifeAbility:Get_Equip_CurStrengthLevel(i_index);
local Propertytable = {100,100,50,20,10,5,5,5,1,1}
--PushDebugMessage("EquipPoint:"..tostring(EquipPoint)..",StrongLevel:"..tostring(StrongLevel))
if(tonumber(StrongLevel)~=nil and tonumber(StrongLevel)>=0)then
EquipStrengthen_Info2:Show();
EquipStrengthen_Info6:Show();
EquipStrengthen_Info5:Show();
if(tonumber(StrongLevel) == 0)then
EquipStrengthen_Info6:SetText("无");
EquipStrengthen_Info5:SetText("100%")
else
EquipStrengthen_Info6:SetText(""..tonumber(StrongLevel));
EquipStrengthen_Info5:SetText(""..tonumber(Propertytable[StrongLevel]).."%")
end
end
local Equip_Level = LifeAbility : Get_Equip_Level(i_index);
--PushDebugMessage(tostring(Equip_Level));
EquipStrengthen_Info8:Show();
EquipStrengthen_Info7:Show();
if Equip_Level < 40 then
Enchange_Item2 = 30900005; --地煞强化精华
EquipStrengthen_Info7 : SetText("#G#{_ITEM30900005}")
else
Enchange_Item2 = 30900006; --天罡强化精华
EquipStrengthen_Info7 : SetText("#G#{_ITEM30900006}#W或#G#{_ITEM30900045}")
end
EquipStrengthen_Info9:Show();
else
return;
end
end
local EB_FREE_BIND = 0; -- 无绑定限制
local EB_BINDED = 1; -- 已经绑定
local EB_GETUP_BIND =2 -- 拾取绑定
local EB_EQUIP_BIND =3 -- 装备绑定
function EquipStrengthen_Buttons_Clicked()
if Enchange_Item1 == -1 then
PushDebugMessage("请放入一个装备。")
return
end
local index,BindState = PlayerPackage:FindFirstBindedItemIdxByIDTable(tonumber(Enchange_Item2));
--PushDebugMessage("请放入一个装备1。")
--先找天罡强化精华
if index == -1 and Enchange_Item2 == 30900006 then --天罡强化精华
local index1,BindState1 = PlayerPackage:FindFirstBindedItemIdxByIDTable(tonumber(QianghualuId));
--PushDebugMessage("请放入一个装备21。")
if(index1 == -1)then
local str = "需要#{_ITEM"..Enchange_Item2.."}或#{_ITEM"..QianghualuId.."}";
--PushDebugMessage("请放入一个装备321。")
PushDebugMessage(str);
return
end
index = index1;
BindState =BindState1;
Enchange_Item2 = QianghualuId;
end
if(index == -1)then
local str = "缺少#{_ITEM"..Enchange_Item2.."}，或者#{_ITEM"..Enchange_Item2.."}已加锁。";
PushDebugMessage(str);
return
end
if(BindState == EB_BINDED)then
--如果已绑定
local tmp = PlayerPackage:GetItemBindStatusByIndex(Enchange_Item1);
if(tmp == EB_BINDED)then
Clear_XSCRIPT();
Set_XSCRIPT_Function_Name("FinishEnhance");
Set_XSCRIPT_ScriptID(809262);
Set_XSCRIPT_Parameter(0,Enchange_Item1);
Set_XSCRIPT_Parameter(1,index);
Set_XSCRIPT_ParamCount(2);
Send_XSCRIPT();
else
PlayerPackage:OpenStengMsgBox(tonumber(Enchange_Item1),tonumber(index));
end
else
Clear_XSCRIPT();
Set_XSCRIPT_Function_Name("FinishEnhance");
Set_XSCRIPT_ScriptID(809262);
Set_XSCRIPT_Parameter(0,Enchange_Item1);
Set_XSCRIPT_Parameter(1,index);
Set_XSCRIPT_ParamCount(2);
Send_XSCRIPT();
end
end
function EquipStrengthen_Clear()
if Enchange_Item1 ~= -1 then
EquipStrengthen_Object1:SetActionItem(-1);
LifeAbility : Lock_Packet_Item(Enchange_Item1,0);
Enchange_Item1 = -1
--push事件干掉msgbox
LifeAbility:CloseStrengthMsgBox();
end
Enchange_Item2 = -1
EquipStrengthen_Money : SetProperty("MoneyNumber", 0)
end
function EquipStrengthen_OnHiden()
EquipStrengthen_Clear();
end
浙公网安备33048102000118号
|天天打卡
