1. 令 Text = File.ReadFileEx(文本路径)
2. 令 MyArray = Split(Text,"|")
3. 令 i = 0
4. 循环开始
5.     令 Key = WaitKey
6.     如果 i = UBound(MyArray) 则
7.         跳出循环
8.     条件结束
9.     如果 key = 109 则
10.         输入文本 MyArray(i)
11.         令 I = I + 1
12.     条件结束
13. 循环结束
14. 注释：这个是读取文本的内容 然后分行输出的脚本 是我在论坛里面给兄弟回答的时候写的 估计对新手会有帮助
15. 注释：馒头脚本,QQ 2651161556