|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
function 注册()
var is=isregister("dm.dmsoft")
if(is>0)
else
traceprint("not reg")
regdll("rc:dm.dll",true)
end
//fileopen不能建立文件
var ex=fileexist("rc:set.txt")
var ex1=fileexist("./set.txt")
traceprint(ex1)
if(ex>0)
var read=filereadlineex("rc:set.txt",2)
traceprint(read)
traceprint("有文件")
else
traceprint("没有 文件 ")
filecopy("./set.txt","rc:set.txt",true)
ex=fileexist("rc:set.txt")
end
if(ex>0)
var line=filegetline("rc:set.txt")
if(line==1)
traceprint("0k")
for(var i = 0; i < 99; i++)
fileaddtext("rc:set.txt","\r\n")
sleep(10)
end
line=filegetline("rc:set.txt")
traceprint(line)
else
traceprint(line)
end
if(line==100)
threadbegin("write","")
else
traceprint("数据错误,请检查")
filedelete("rc:set.txt")
exit()
end
end
end
function write()
for(var i = 0; i < 99; i++)
filedeleteline("rc:set.txt",i)
fileinsertline("rc:set.txt",i&"abv",i)
end
var line=filegetline("rc:set.txt")
traceprint(line)
var read=filereadlineex("rc:set.txt",2)
traceprint(read)
fileclose(op)
if(line==100)
else
traceprint("数据错误,请检查")
var del=filedelete("rc:set.txt")
traceprint(del)
exit()
end
end
|
|