如何将txt文件中的每一行存储到netlogo中的新列表中？

set file-content file-read filename

let lines split-string file-content "\n"

let new-list []

foreach lines [line ->
  set new-list lput line new-list
]

extensions [file]

to read-txt-file
  let filename "path/to/your/txt/file.txt"
  let file-content file-read filename
  let lines split-string file-content "\n"
  let new-list []
  
  foreach lines [line ->
    set new-list lput line new-list
  ]
  
  ; 打印或处理 new-list 中的数据
  print new-list
end