|
|
if ms==8 then --忘却
Cls()
DrawStrBox(CC.MainSubMenuX, CC.MainSubMenuY, "谁要遗忘技能?", C_WHITE, CC.DefaultFont);
nexty = CC.MainSubMenuY + CC.SingleLineHeight;
s = SelectTeamMenu(CC.MainSubMenuX, nexty);
if s==0 then return end
pid = JY.Base["队伍"..s];
if JY.Person[pid]["武功1"]==0 then
QZXS("想要忘却，你得先有记忆")
return
end
local kfmenu={{nil,nil,0},{nil,nil,0},{nil,nil,0},{nil,nil,0},{nil,nil,0},
{nil,nil,0},{nil,nil,0},{nil,nil,0},{nil,nil,0},{nil,nil,0},{nil,nil,0},{nil,nil,0}};
for i=1,12 do
kfmenu[i][1]=JY.Wugong[JY.Person[pid]["武功"..i]]["名称"]
if JY.Person[pid]["武功"..i]~=0 then
kfmenu[i][3]=1
end
end
Cls();
local r=ShowMenu(kfmenu,12,0,12,12,0,0,1,1,CC.DefaultFont,C_ORANGE,C_WHITE)
if r==0 then return end
if JY.Person[pid]["武功"..r]==91 or (JY.Person[pid]["武功"..r]>108 and 113>JY.Person[pid]["武功"..r]) then
QZXS(JY.Wugong[JY.Person[pid]["武功"..r]]["名称"].."不能被遗忘！")
return
elseif JY.Person[pid]["武功2"]==91 and JY.Person[pid]["武功3"]==0 then
QZXS("学了风林或者六如后至少要留一个技能，不能遗忘！")
return
end
if DrawStrBoxYesNo(-1,-1,"确定要遗忘"..JY.Wugong[JY.Person[pid]["武功"..r]]["名称"].."吗？",C_WHITE,CC.DefaultFont)==false then
Cls();
else
f = math.modf(JY.Person[pid]["武功等级"..r]/100+1)
if f > 10 then
f = 10
end
QZXS(JY.Wugong[JY.Person[pid]["武功"..r]]["名称"].."已经被遗忘"..f.."级。")
kfid=JY.Wugong[JY.Person[pid]["武功"..r]]["代号"]
local i=nil
for i=0,JY.ThingNum-1 do
if JY.Thing[i]["练出武功"]==kfid then
AddPersonAttrib(pid, "内力最大值", -f*JY.Thing[i]["加内力最大值"])
AddPersonAttrib(pid, "攻击力", -f*JY.Thing[i]["加攻击力"])
AddPersonAttrib(pid, "轻功", -f*JY.Thing[i]["加轻功"])
AddPersonAttrib(pid, "防御力", -f*JY.Thing[i]["加防御力"])
AddPersonAttrib(pid, "医疗能力", -f*JY.Thing[i]["加医疗能力"])
AddPersonAttrib(pid, "用毒能力", -f*JY.Thing[i]["加用毒能力"])
AddPersonAttrib(pid, "解毒能力", -f*JY.Thing[i]["加解毒能力"])
AddPersonAttrib(pid, "抗毒能力", -f*JY.Thing[i]["加抗毒能力"])
if pid == 56 or pid == 0 and JY.Person[pid]["姓名"] == JY.DFWM and GetS(4, 5, 5, 4) == 7 and GetS(4, 5, 5, 5) == 8 then --黄蓉和东方未明 双倍兵器值
AddPersonAttrib(pid, "拳掌功夫", -f*JY.Thing[i]["加拳掌功夫"] * 2)
AddPersonAttrib(pid, "御剑能力", -f*JY.Thing[i]["加御剑能力"] * 2)
AddPersonAttrib(pid, "耍刀技巧", -f*JY.Thing[i]["加耍刀技巧"] * 2)
AddPersonAttrib(pid, "特殊兵器", -f*JY.Thing[i]["加特殊兵器"] * 2)
elseif pid == 0 and JY.Person[pid]["姓名"] == JY.XQS and GetS(4, 5, 5, 4) == 6 and GetS(4, 5, 5, 5) == 8 then
AddPersonAttrib(pid, "拳掌功夫", -f*JY.Thing[i]["加拳掌功夫"])
AddPersonAttrib(pid, "耍刀技巧", -f*JY.Thing[i]["加耍刀技巧"])
AddPersonAttrib(pid, "特殊兵器", -f*JY.Thing[i]["加特殊兵器"])
AddPersonAttrib(pid, "御剑能力", -f*JY.Thing[i]["加御剑能力"] * 2)
elseif pid == 590 then --李文秀 双倍特殊兵器值
AddPersonAttrib(pid, "拳掌功夫", -f*JY.Thing[i]["加拳掌功夫"])
AddPersonAttrib(pid, "御剑能力", -f*JY.Thing[i]["加御剑能力"])
AddPersonAttrib(pid, "耍刀技巧", -f*JY.Thing[i]["加耍刀技巧"])
AddPersonAttrib(pid, "特殊兵器", -f*JY.Thing[i]["加特殊兵器"]*2)
else
AddPersonAttrib(pid, "拳掌功夫", -f*JY.Thing[i]["加拳掌功夫"])
AddPersonAttrib(pid, "御剑能力", -f*JY.Thing[i]["加御剑能力"])
AddPersonAttrib(pid, "耍刀技巧", -f*JY.Thing[i]["加耍刀技巧"])
AddPersonAttrib(pid, "特殊兵器", -f*JY.Thing[i]["加特殊兵器"])
end
--蓝烟清：StarShine萧中慧的天赋，额外增加三围
if pid == 77 then -- 萧中慧天赋
AddPersonAttrib(pid,"攻击力",-f*JY.Thing[i]["加耍刀技巧"]);
AddPersonAttrib(pid,"轻功",-f*JY.Thing[i]["加耍刀技巧"]);
AddPersonAttrib(pid,"防御力",-f*JY.Thing[i]["加耍刀技巧"]);
end
AddPersonAttrib(pid, "暗器技巧", -f*JY.Thing[i]["加暗器技巧"])
AddPersonAttrib(pid, "武学常识", -f*JY.Thing[i]["加武学常识"])
AddPersonAttrib(pid, "品德", -f*JY.Thing[i]["加品德"])
AddPersonAttrib(pid, "攻击带毒", -f*JY.Thing[i]["加攻击带毒"])
end
end
if r>0 then
local i=nil
for i=r,12 do
if JY.Person[pid]["武功"..i]==0 then break end
if JY.Person[pid]["武功2"]==91 and i==1 then
JY.Person[pid]["武功等级1"]=JY.Person[pid]["武功等级3"]
JY.Person[pid]["武功1"]=JY.Person[pid]["武功3"]
elseif JY.Person[pid]["武功2"]==91 and i==2 then
elseif i==12 then
JY.Person[pid]["武功等级"..i]=0
JY.Person[pid]["武功"..i]=0
else
JY.Person[pid]["武功等级"..i]=JY.Person[pid]["武功等级"..i+1]
JY.Person[pid]["武功"..i]=JY.Person[pid]["武功"..i+1]
end
end
end
end
end
|
|
发表于 2017-11-20 10:47
发表于 2017-11-20 11:35
呼叫大神解答
发表于 2017-11-20 13:03