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

存档保存("IY1C1","999999")
存档保存("maptest2020","1")
存档保存("prebook2023","1")


--通关难度

总通关数=整数读取("IPZ01")
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])




存档增加("IPZ01",1)
存档增加("IPZ02",1)
存档增加("IPZ03",1)
存档增加("IPZ04",1)
存档增加("IPZ05",1)
存档增加("IPZ06",1)
存档增加("IPZ07",1)
存档增加("IPZ08",1)
存档增加("IPZ09",1)
存档增加("IPZ10",1)
存档增加("IPZ11",1)
存档增加("IPZ12",1)
存档增加("IPZ13",1)
存档增加("IPZ14",1)
存档增加("IPZ15",1)
存档增加("IPZ16",1)
存档增加("IPZ17",1)
存档增加("IPZ18",1)
存档增加("IPZ19",1)
存档增加("IPZ20",1)
存档增加("IPZ21",1)
存档增加("IPZ22",1)
存档增加("IPZ23",1)
存档增加("IPZ24",1)
存档增加("IPZ25",1)
存档增加("IPZ26",1)
存档增加("IPZ27",1)
存档增加("IPZ28",1)
存档增加("IPZ29",1)
存档增加("IPZ30",1)
存档增加("IPZ31",1)
存档增加("IPZ32",1)
存档增加("IPZ33",1)
存档增加("IPZ34",1)
存档增加("IPZ35",1)
存档增加("IPZ36",1)
存档增加("IPX01",1)
存档增加("IPX02",1)
存档增加("IPX03",1)
存档增加("IPX04",1)
存档增加("IPX05",1)
存档增加("IPX06",1)
存档增加("IPX07",1)
存档增加("IPX08",1)
存档增加("IPX09",1)
存档增加("IPX10",1)
存档增加("IPX11",1)
存档增加("IPX12",1)
存档增加("IPX13",1)
存档增加("IPX14",1)
存档增加("IPX15",1)
存档增加("IPX16",1)
存档增加("IPX17",1)
存档增加("IPX18",1)
存档增加("IPX19",1)
存档增加("IPX20",1)
存档增加("IPX21",1)
存档增加("IPX22",1)
存档增加("IPX23",1)
存档增加("IPX24",1)
存档增加("IPX25",1)
存档增加("IPX26",1)
存档增加("IPX27",1)
存档增加("IPX28",1)
存档增加("IPX29",1)
存档增加("IPX30",1)
存档增加("IPX31",1)
存档增加("IPX32",1)
存档增加("IPX33",1)
存档增加("IPX34",1)
存档增加("IPX35",1)
存档增加("IPX36",1)
存档增加("ISAW01",1)
存档增加("ISAW02",1)
存档增加("ISAW03",1)
存档增加("ISAW04",1)
存档增加("ISAW05",1)
存档增加("ISAW06",1)
存档增加("ISAW07",1)
存档增加("ISAW08",1)
存档增加("ISAW09",1)
存档增加("ISAW10",1)
存档增加("ISAW11",1)
存档增加("ISAW12",1)
存档增加("IXAW01",1)
存档增加("IXAW02",1)
存档增加("IXAW03",1)
存档增加("IXAW04",1)
存档增加("IXAW05",1)
存档增加("IXAW06",1)
存档增加("IXAW07",1)
存档增加("IXAW08",1)
存档增加("IXAW09",1)
存档增加("IXAW10",1)
存档增加("IXAW11",1)
存档增加("IXAW12",1)
存档增加("IBAW01",1)
存档增加("IBAW02",1)
存档增加("IBAW03",1)
存档增加("IBAW04",1)
存档增加("IBAW05",1)
存档增加("IBAW06",1)

z=0
for i=1,30 do
z=i
存档增加("IAZ001",z)
存档增加("IAZ002",z)
end

输出信息("运行流畅")