|
本帖最后由 jenchess 于 2012-12-15 14:26 编辑
在下是DIY新手,最近刚好有研究CBWS大大的蛋碎江湖,我是在function UseThing_Type1(id)中添加几句话达到物品装备后消失在物品栏,人物卸下装备后回到物品栏,给大家参考一下
function UseThing_Type1(id)
DrawStrBox(CC.MainSubMenuX, CC.MainSubMenuY, string.format("谁要配备%s?", JY.Thing[id]["名称"]), C_WHITE, CC.DefaultFont)
local nexty = CC.MainSubMenuY + CC.SingleLineHeight
local r = SelectTeamMenu(CC.MainSubMenuX, nexty)
local pp1, pp2 = 0, 0
if r > 0 then
local personid = JY.Base["队伍" .. r]
if CanUseThing(id, personid) or T2SQ(personid) then
if JY.Thing[id]["装备类型"] == 0 then
if JY.Thing[id]["使用人"] >= 0 then
if (JY.Person[JY.Thing[id]["使用人"]]["姓名"] == JY.SQ) then
..省略..
end
JY.Person[JY.Thing[id]["使用人"]]["武器"] = -1
end
local i = JY.Person[personid]["武器"] --jenchess:判断人物身上装备的武器
if JY.Person[personid]["武器"] >= 0 then
if (T2SQ(personid)) then
..省略..
end
JY.Thing[JY.Person[personid]["武器"]]["使用人"] = -1
instruct_32(i, 1) --jenchess:人物身上的武器卸下后回到物品栏
end
JY.Person[personid]["武器"] = id
if (T2SQ(personid)) then
..省略..
end
elseif JY.Thing[id]["装备类型"] == 1 then
if JY.Thing[id]["使用人"] >= 0 then
if (JY.Person[JY.Thing[id]["使用人"]]["姓名"] == JY.SQ
or math.floor(JY.Person[JY.Thing[id]["使用人"]]["无用"] / 100) == 2) then
..省略..
end
JY.Person[JY.Thing[id]["使用人"]]["防具"] = -1
end
local d = JY.Person[personid]["防具"] --jenchess:判断人物身上装备的防具
if JY.Person[personid]["防具"] >= 0 then
if (T2SQ(personid) or MPPD(personid) == 2) then
..省略..
end
JY.Thing[JY.Person[personid]["防具"]]["使用人"] = -1
instruct_32(d, 1) --jenchess:人物身上的防具卸下后回到物品栏
end
JY.Person[personid]["防具"] = id
if (T2SQ(personid) or MPPD(personid) == 2) then
..省略..
end
end
--[[JY.Thing[id]["使用人"] = personid]]--删除
instruct_32(id, -1) --jenchess:装备后物品消失在物品栏
else
DrawStrBoxWaitKey("此人不适合配备此物品", C_WHITE, CC.DefaultFont)
return 0
end
end
return 1
end
|
|