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




存档增加("ITG01",1)
存档增加("IKM01",1)
存档增加("IKM02",1)
存档增加("IKM03",1)
存档增加("IKM04",1)
存档增加("IKM05",1)
存档增加("IKM06",1)
存档增加("IKM07",1)
存档增加("IKM08",1)
存档增加("IDM01",1)
存档增加("IDM02",1)



--通关难度

总通关数=整数读取("ITG01")+40
ztgcs=总通关数
zbssl=总通关数

难度=40


gktj={}

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

gkA={}
gkA[101]=""
gkA[102]=""
gkA[103]=""
gkA[104]=""
for a=1,10,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[101]=gkA[101]..gktj[a]
end
补齐=21
gkA[101]="00"..gkA[101]..string.rep("0",补齐)

for a=11,20,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[102]=gkA[102]..gktj[a]
end
补齐=21
gkA[102]="00"..gkA[102]..string.rep("0",补齐)

for a=21,30,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[103]=gkA[103]..gktj[a]
end
补齐=21
gkA[103]="00"..gkA[103]..string.rep("0",补齐)

for a=31,40,1 do
gktj[a]=string.format("%04d",gktj[a])
gkA[104]=gkA[104]..gktj[a]
end
补齐=21
gkA[104]="00"..gkA[104]..string.rep("0",补齐)




存档保存("SWA1",""..gkA[101])--6位通关难度
存档保存("SWA2",""..gkA[102])--6位通关难度
存档保存("SWA3",""..gkA[103])--6位通关难度
存档保存("SWA4",""..gkA[104])--6位通关难

输出信息("运行流畅"..#gkA[101])


存档保存("IACQ3","999999")
存档保存("maptest2020","1")
存档保存("prebook2023","1")
输出信息("运行流畅")