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


存档保存("BGift1","1")
存档保存("BGift2","1")
存档保存("BGift3","1")
存档保存("prebook2023","1")
存档保存("maptest2020","1")
存档保存("pretest2024","1")
存档增加("ISIGNDAY",1)
存档保存("SEGGCJ","8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&8&")
存档保存("IIWARG1","220")
存档保存("IIWARG2","220")
存档保存("IIWARG3","220")
存档保存("IIWARG4","220")
存档保存("IIWARG5","220")
存档保存("IIWARGTOP","880")

存档增加("IJGBOSS",3)
存档增加("IJGBOSS",6)

存档增加("IS1EXPTG",150)
存档增加("IS1EXPSJ",150)
存档增加("IS2EXPTG",150)
存档增加("IS2EXPSJ",150)
存档增加("IS3EXPTG",150)
存档增加("IS3EXPSJ",150)

ztg=整数读取("IJGBOSS")
ndk={"IJGBOSS1","IJGBOSS2","IJGBOSS3","IJGBOSS4","IJGBOSS5","IJGBOSS6"}
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

存档增加("ITGALL",1)


tgcs={}


ND={3,3,5,10,15,20,30,30,30,50,50,50,50,50,999}

dq=#ND
通关难度=整数读取("ITGALL")
for i=1,#ND do
通关难度=通关难度-整数读取("IZCTG"..i)
end
for  i=1,#ND do
if 整数读取("IZCTG"..i)<ND[i] then
dq=i
break
end
end
if 通关难度>0 then
存档增加("IZCTG"..dq,1)
输出信息("IZCTG"..dq.."次数+1")
end




ztg=整数读取("ISATANALL")
ndk={"ISATAN1","ISATAN2","ISATAN3","ISATAN4","ISATAN5","ISATAN6","ISATAN7"}
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
存档增加("ISATAN1",1)
存档增加("ISATAN2",1)
存档增加("ISATAN3",1)
存档增加("ISATAN4",1)
存档增加("ISATAN5",1)
存档增加("ISATAN6",1)
存档增加("ISATAN7",1)
end



ztg=整数读取("IISUIT")
ndk={"IISUIT1","IISUIT2","IISUIT3","IISUIT4","IISUIT5","IISUIT6"}
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
存档增加("IISUIT1",1)
存档增加("IISUIT2",1)
存档增加("IISUIT3",1)
存档增加("IISUIT4",1)
存档增加("IISUIT5",1)
存档增加("IISUIT6",1)
end

ztg=整数读取("IWXZDJF")
ndk={"IWXZDJF1","IWXZDJF2","IWXZDJF3","IWXZDJF4","IWXZDJF5","IWXZDJF6","IWXZDJF7"}
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
存档增加("IWXZDJF1",1)
存档增加("IWXZDJF2",1)
存档增加("IWXZDJF3",1)
存档增加("IWXZDJF4",1)
存档增加("IWXZDJF5",1)
存档增加("IWXZDJF6",1)
存档增加("IWXZDJF7",1)
end


存档增加("IIWAR",1500)
存档增加("IIWAR",2000)
ztg=整数读取("IIWAR")
ndk={"IIWAR1","IIWAR2","IIWAR3","IIWAR4"}
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
存档增加("IIWAR1",400)
存档增加("IIWAR2",400)
存档增加("IIWAR3",400)
存档增加("IIWAR4",400)
存档增加("IIWAR5",400)
end







for h=1,6 do
总通关数=整数读取("IISUIT"..h)
ztgcs=总通关数
zbssl=总通关数

gktj={}

if(总通关数<5)then--10
for i=1,5 do
gktj[i]=通关(1)
gktj[i]=string.format("%d",gktj[i])
end
else
if(总通关数<100)then--10
zbssl=zbssl-5
for i=1,5 do
gktj[i]=1+通关(19)
gktj[i]=string.format("%d",gktj[i])
end
else
if(总通关数<250)then--10
zbssl=zbssl-100
for i=1,5 do
gktj[i]=20+通关(30)
gktj[i]=string.format("%d",gktj[i])
end
else
zbssl=zbssl-250
for i=1,5 do
gktj[i]=50+通关(49)
gktj[i]=string.format("%d",gktj[i])
end
end
end
end

gkA={}
gkA[101]=""
for a=1,5,1 do
gkA[101]=gkA[101]..gktj[a].."&"
end
存档保存("SSUIT"..h,""..gkA[101].."&0&0&0&0&0&")
end


地狱图鉴=整数读取("ICOOKEXP2")//24
图鉴分配=string.format("%d",地狱图鉴)

gkA={}
gkA[101]=""
gkA[102]=""
for a=1,12,1 do
gkA[101]=gkA[101]..图鉴分配.."&"
end

存档保存("SSCOOK1",""..gkA[101])
存档保存("SSCOOK2",""..gkA[101])


for h=1,7 do
地狱图鉴=整数读取("ISATAN"..h)//7
图鉴分配=string.format("%d",地狱图鉴)

gkA={}
gkA[101]=""
for a=1,7,1 do
gkA[101]=gkA[101]..图鉴分配.."&"
end
存档保存("SSTRMW"..h,""..gkA[101])
end




存档增加("ICOOKEXP",600)
存档增加("ICOOKEXP2",300)
存档增加("IOCTHDJF1",1000)
存档增加("IOCTHDJF2",4)
存档增加("ICOOKEXP2",600)

存档保存("IHSQROLL2","1")--神器之灵消耗
z=0
for i=1,30 do
z=z+i
存档增加("IISUIT",z)
存档增加("IISUIT",z*3)
存档增加("IISUIT",z*6)
存档增加("IWXZDJF",z)
存档增加("ISATANALL",z)
存档增加("ISATANALL",z*3)
存档增加("ISATANALL",z*6)
存档增加("ITDBYALL",z)
存档增加("IHSQEXP",z)
存档增加("IHSQROLL",z)
end

输出信息("1232341")
--苍天陨落
--苍天陨落
--苍天陨落
--苍天陨落
--苍天陨落
--苍天陨落