请求添加一个关于大文本文件随机读取一行内容的命令

小爬虫

本地一300多万行数据,秒读出数据,建议添加

  

子程序名	返回值类型	公开	备 注
子程序_随机读入一行内容	文本型
参数名	类 型	参考	可空	数组	备 注
文件号	整数型				已打开文件的文件号

变量名	类 型	静态	数组	备 注
当前位置	整数型
最大位置	整数型
当前位置右内容	文本型

移到文件尾 (文件号)
最大位置 ＝ 取读写位置 (文件号)
移动读写位置 (文件号, #文件首, 汇编_取随机数 (0, 最大位置))
当前位置 ＝ 取读写位置 (文件号)
判断 (当前位置 ＝ 0)
返回 (读入一行 (文件号))
判断 (当前位置 ＝ 最大位置)

读入一行 (文件号)
移动读写位置 (文件号, #现行位置, -2)

循环判断首 ()
当前位置 ＝ 当前位置 － 1
移动读写位置 (文件号, #文件首, 当前位置)
如果真 (当前位置 ＝ 0)
跳出循环 ()
当前位置右内容 ＝ 读入文本 (文件号, 2)
处理事件 ()
循环判断尾 (当前位置右内容 ≠ #换行符 )
如果真 (当前位置 ≠ 0)
移动读写位置 (文件号, #文件首, 当前位置 ＋ 2)
返回 (读入一行 (文件号))

.版本 2<br /> <br /> .子程序 子程序_随机读入一行内容, 文本型<br /> .参数 文件号, 整数型, , 已打开文件的文件号<br /> .局部变量 当前位置, 整数型<br /> .局部变量 最大位置, 整数型<br /> .局部变量 当前位置右内容, 文本型<br /> <br /> 移到文件尾 (文件号)<br /> 最大位置 ＝ 取读写位置 (文件号)<br /> 移动读写位置 (文件号, #文件首, 汇编_取随机数 (0, 最大位置))<br /> 当前位置 ＝ 取读写位置 (文件号)<br /> .判断开始 (当前位置 ＝ 0)<br />     返回 (读入一行 (文件号))<br /> .判断 (当前位置 ＝ 最大位置)<br /> <br /> .默认<br />     读入一行 (文件号)<br />     移动读写位置 (文件号, #现行位置, -2)<br /> .判断结束<br /> <br /> .循环判断首 ()<br />     当前位置 ＝ 当前位置 － 1<br />     移动读写位置 (文件号, #文件首, 当前位置)<br />     .如果真 (当前位置 ＝ 0)<br />         跳出循环 ()<br />     .如果真结束<br />     当前位置右内容 ＝ 读入文本 (文件号, 2)<br />     处理事件 ()<br /> .循环判断尾 (当前位置右内容 ≠ #换行符)<br /> .如果真 (当前位置 ≠ 0)<br />     移动读写位置 (文件号, #文件首, 当前位置 ＋ 2)<br /> .如果真结束<br /> 返回 (读入一行 (文件号))

895012320

随机读一个文件怎么写？

muyy0211

666666666666666666

paulz2022

学习了，这个易的写法感觉没有 其他的方便

小小神g

666666666666666666666

萧阳天

这个可以有，，

小爬虫

@冰点 @萧阳天 @小磊 看看,命令看还能不能修改精简优化