|
本帖最后由 710541994 于 2012-5-13 11:05 编辑
--人物等级最大化
local function MaxStatus()
---[[
local maxFlag = false;
for i = 1,6 do
local manaMax = 0;
local absorbFlag = false;
local pid = JY.Base["队伍"..i];
if pid >= 0 and JY.Person[pid]["声望"] ~= 100 then--该位置有队员且未能力最大化
while JY.Person[pid]["等级"] ~= 30 do --先判断是否满级
JY.Person[pid]["经验"] = CC.Exp[#CC.Exp];
War_AddPersonLVUP(pid);
end
JY.Person[pid]["生命最大值"] = 999; --生命最大化
if JY.Person[pid]["姓名"] ~= "零二七" or JY.Person[pid]["姓名"] ~= "段誉" then
manaMax = 9500-(math.floor((JY.Person[pid]["资质"]-1)/15)*750);
else
manaMax = 10000;
end
for i = 1,10 do
if JY.Person[pid]["武功"..i] == 85 or JY.Person[pid]["武功"..i] == 88 then
absorbFlag = true;
end
end
if absorbFlag == true then
manaMax = manaMax + 750;
if manaMax >10000 then
manaMax = 10000;
end
end
JY.Person[pid]["内力最大值"] = manaMax; --内力最大化
--医疗能力最大化
if JY.Person[pid]["医疗能力"] >= 20 then
if pid == 16 or pid ==28 or pid ==45 then
JY.Person[pid]["医疗能力"] = 500;
elseif pid == 85 or (pid == 0 and GetS(4,5,5,5) == 7) then
JY.Person[pid]["医疗能力"] = 400;
else
JY.Person[pid]["医疗能力"] = 240;
end
end
--用毒能力最大化
if JY.Person[pid]["用毒能力"] >= 20 then
if pid == 17 or pid ==25 or pid ==83 or (pid == 0 and GetS(4,5,5,5) == 7) then
JY.Person[pid]["用毒能力"] = 400;
elseif pid == 2 then
JY.Person[pid]["用毒能力"] = 500;
else
JY.Person[pid]["用毒能力"] = 240;
end
end
--解毒能力最大化
if JY.Person[pid]["解毒能力"] >= 20 then
JY.Person[pid]["解毒能力"] = 240;
end
JY.Person[pid]["声望"] = 100;
DrawStrBoxWaitKey(string.format("%s 能力最大化",JY.Person[pid]["姓名"]),C_WHITE,CC.DefaultFont);
maxFlag = true;
end
end
if maxFlag == false then
QZXS("全员已经能力最大化");
end
instruct_12();
--]]
end
--人物武功升为极
local function SkillLevel()
---[[
instruct_0();
DrawStrBox(CC.MainSubMenuX,CC.MainSubMenuY,"要提升谁的武功",C_WHITE,CC.DefaultFont);
local teamMenu = {}; --菜单生成
for i=1,6 do
teamMenu = {"",nil,0};
local pid = JY.Base["队伍"..i];
if pid>=0 then
teamMenu[1] = JY.Person[pid]["姓名"];
teamMenu[3] = 1;
end
end
local r = ShowMenu(teamMenu,6,0,CC.MainSubMenuX,CC.MainSubMenuY+CC.SingleLineHeight,0,0,1,1,CC.DefaultFont,C_ORANGE, C_WHITE);
local personSelect = JY.Base["队伍"..r];
if r > 0 then
instruct_0();
DrawStrBox(CC.MainSubMenuX,CC.MainSubMenuY,"要提升哪个武功的等级",C_WHITE,CC.DefaultFont);
local skillMenu = {}; --菜单生成
local menuDis = false; --是否显示菜单
for i=1,10 do
skillMenu = {"",nil,0};
local sid = JY.Person[personSelect]["武功"..i];
local slv = JY.Person[personSelect]["武功等级"..i];
if sid>0 and slv >= 900 and slv <=998 then
skillMenu[1] = JY.Wugong[sid]["名称"];
skillMenu[3] = 1;
menuDis = true;
end
end
instruct_0();
if menuDis == true then
local s = ShowMenu(skillMenu,10,0,CC.MainSubMenuX,CC.MainSubMenuY+CC.SingleLineHeight,0,0,1,1,CC.DefaultFont,C_ORANGE, C_WHITE);
if s > 0 then
local skillSelect = JY.Person[personSelect]["武功"..s];
JY.Person[personSelect]["武功等级"..s] = 999;
DrawStrBoxWaitKey(string.format("%s %s 等级提升为极",JY.Person[personSelect]["姓名"],JY.Wugong[skillSelect]["名称"]),C_WHITE,CC.DefaultFont);
end
else
DrawStrBoxWaitKey(string.format("%s 没有武功可以提升",JY.Person[personSelect]["姓名"]),C_WHITE,CC.DefaultFont);
end
end
instruct_0();
--]]
end
为什么这段代码复制到源码版里没有用,各位前辈,教教我 |
|