function 通关(z1)--读取数据
if(z1>=zbssl)then
bsss=zbssl
zbssl=0
else
bsss=z1
zbssl=zbssl-z1
end
if(bsss<=0)then
return "0"
end
if((bsss>=1))then
return I2S(bsss)
end
end


存档增加("IBZ001",1)
存档增加("IYBZ01",1)
存档增加("IYBZ02",1)
存档增加("IYBZ03",1)
存档增加("IYBZ04",1)
存档增加("IYBZ05",1)
存档增加("IYBZ06",1)
存档增加("IASQ01",1)
存档增加("IASQ02",1)
存档增加("IASQ03",1)
存档增加("IASQ04",1)
存档增加("IAVSQ05",1)
存档增加("IAVSQ06",1)
存档增加("IAVSQ07",1)
存档增加("IAVSQ08",1)
存档增加("IAVSQ09",1)
存档增加("IAVSQ10",1)
存档增加("IAVSQ11",1)
存档增加("IAVSQ12",1)
存档增加("IAVSQ13",1)
存档增加("IAVSQ14",1)
存档增加("IYK07",1)
存档增加("Ibtqd01",1)
存档保存("maptest2020","1")
存档保存("IZZC3","9999999")



难总=整数读取("IBZ001")
普通=整数读取("ITA001")
地狱=整数读取("ITB001")
噩梦=整数读取("ITC001")
修罗=整数读取("ITD001")
末日=整数读取("ITE001")
暗黑=整数读取("ITF001")
难和=普通+地狱+噩梦+修罗+末日+暗黑

if  难总>=难和   then

ndcs={400,320,320,320,320,320}
kye={"ITA001","ITB001","ITC001","ITD001","ITE001","ITF001"}
local t,k=9999,0
for i=1,#ndcs do

local n=整数读取(kye[i])
if n<ndcs[i] then
	if n<t then
		t,k=n,i
	end
end
end
if k>0 then
存档增加(kye[k],1)
输出信息("增加1次"..kye[k])
end
存档增加("IBZ001",1)

else
存档增加("IBZ001",1)
end






总通关数=整数读取("IBZ001")
ztgcs=总通关数
zbssl=总通关数

gktj={}

难度=48

if(总通关数<难度)then--10
for i=1,难度 do
x=难度+1-i
gktj[x]=通关(1)
end
输出信息("各1次")
else
if(总通关数<难度*10)then--10
zbssl=zbssl-难度
for i=1,难度 do
x=难度+1-i
gktj[x]=1+通关(9)
end
输出信息("各10次")
else
zbssl=zbssl-难度*10
for i=1,难度 do
x=难度+1-i
gktj[x]=10+通关(30)
end
输出信息("各40次")
end
end

gkA={}
gkA[101]=""
gkA[102]=""
gkA[103]=""
gkA[104]=""
gkA[105]=""
gkA[106]=""
for a=1,8,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[101]=gkA[101]..gktj[a]
end
for a=9,16,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[102]=gkA[102]..gktj[a]
end

for a=17,24,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[103]=gkA[103]..gktj[a]
end

for a=25,32,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[104]=gkA[104]..gktj[a]
end

for a=33,40,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[105]=gkA[105]..gktj[a]
end

for a=41,48,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[106]=gkA[106]..gktj[a]
end

存档保存("SAV1","00"..gkA[101].."00000000000000000000000000000")
存档保存("SAV2","00"..gkA[102].."00000000000000000000000000000")
存档保存("SAV3","00"..gkA[103].."00000000000000000000000000000")
存档保存("SAV4","00"..gkA[104].."00000000000000000000000000000")
存档保存("SAV5","00"..gkA[105].."00000000000000000000000000000")
存档保存("SAV6","00"..gkA[106].."00000000000000000000000000000")
输出信息(""..gkA[101])




z=0
for i=1,30 do
z=z+i
--存档增加("IQ001",z*150)
--存档增加("IZ100",z*150)
--存档增加("IY001",z*150)
--存档增加("IY002",z*150)
--存档增加("IV001",z*150)
存档增加("ICDHH01",z)
存档增加("ICDHH02",z)
存档增加("ICDHH03",z)
存档增加("ICDHH04",z)
存档增加("ICDHH05",z)
存档增加("ICDHH06",z)
存档增加("ICDHH07",z)
存档增加("ICDHH08",z)
存档增加("ICDHH09",z)
存档增加("ICDHH10",z)
存档增加("ICDHH11",z)
存档增加("ICDHH12",z)
存档增加("ICDHH13",z)
存档增加("ICDHH14",z)
存档增加("ICDHH15",z)
存档增加("ICDHH16",z)
存档增加("ICDHH17",z)
存档增加("ICDHH18",z)
存档增加("ICDHH19",z)
存档增加("ICDHH20",z)
存档增加("ICDHH21",z)
存档增加("Ibtdx01",z)
存档增加("IZNQSP01",z)
存档增加("IWJZ01",z)
存档增加("IWJZ02",z)
存档增加("IWJZ03",z)
存档增加("ISDSP01",z)
end
输出信息("12345")



--[[挂机时间：61分钟
ztg=整数读取("IBZ001")
ndk={"ITA001","ITB001","ITC001","ITD001","ITE001","ITF001"}
dqnd=1
for i=1,#ndk do
ztg=ztg-整数读取(ndk[i])
if 整数读取(ndk[i])<整数读取(ndk[dqnd]) then
dqnd=i
end
end
if ztg>0 then
存档增加(ndk[dqnd],1)
end

读1=整数读取("ITA001")
读2=整数读取("ITB001")
读3=整数读取("ITC001")
读4=整数读取("ITD001")
读5=整数读取("ITE001")
读6=整数读取("ITF001")
输出信息(""..读1)
输出信息(""..读2)
输出信息(""..读3)
输出信息(""..读4)
总通关数=整数读取("IBZ001")



读总1=读1+读2+读3+读4+读5+读6
读总2=读总1-总通关数

if 读总2>=1 then
删减=总通关数//6
存档保存("ITA001",""..删减)
存档保存("ITB001",""..删减)
存档保存("ITC001",""..删减)
存档保存("ITD001",""..删减)
存档保存("ITE001",""..删减)
存档保存("ITF001",""..删减)
输出信息("超出了"..删减)
输出信息("删减前"..读1)
输出信息("删减后"..删减)
end
]]--
--一张BT"老图
--一张BT老图
--一张BT老图
--一张BT老图
--一张BT老图
--一张BT老图
--一张BT老图