function chest4d_formatter(id)
for k, v in pairs(exvar[id].c4d) do
format_chest4d(nil, v)
end
-- 不要になった exvar を消去
exvar[id].c4d = nil
end
function move_chest4d(id)
-- 箱の中のアイテムを LIMBO の箱の中に移動
for iobj in dsb_in_obj(id) do
dsb_move(iobj, IN_OBJ, exvar[id].subst, VARIABLE, 0)
end
end