for i=1,50 do
存档保存("IXH"..i,"0")

end


for i=1,50 do
if 整数读取("IN"..i)>1 then
存档保存("IXH"..i,"1")
end
end

存档保存("ICD1","")
存档保存("ICD2","")
存档保存("ICD3","")
存档保存("ICD4","")
存档保存("ICD5","")
存档保存("ICD6","")
存档保存("ICD7","")
存档保存("ICD8","")
存档保存("ICD9","")
存档保存("ICD10","")
存档保存("ICD11","")
存档保存("ICD12","")
存档保存("ICD13","")
存档保存("ICD14","")
存档保存("ICD15","")
存档保存("ICD16","")
存档保存("ICD17","")
存档保存("ICD18","")
存档保存("ICD19","")
存档保存("ICD20","")
存档保存("ICD21","")
存档保存("ICD22","")
存档保存("ICD23","")
存档保存("ICD24","")
存档保存("ICD25","")
存档保存("ICD26","")
存档保存("ICD27","")
存档保存("ICD28","")
存档保存("ISBZL","")