如何在NetLogo中录制模拟视频

如何在NetLogo中录制模拟视频,netlogo,Netlogo,我正在尝试使用vid扩展在NetLogo中录制模型模拟的视频。 我在模拟开始时开始录制,并要求录制每个视图更新。 然而,我的视频只有1秒1分。 因为我最后要求保存文件。 如何记录模拟的200个滴答声 extensions [ vid bitmap ] to setup clear-all ask patches [ set pcolor black ] ask patch 0 0[set pstatus 10 set

我正在尝试使用vid扩展在NetLogo中录制模型模拟的视频。 我在模拟开始时开始录制,并要求录制每个视图更新。 然而,我的视频只有1秒1分。 因为我最后要求保存文件。 如何记录模拟的200个滴答声

extensions [ vid bitmap ]



      to setup
      clear-all
      ask patches [
    set pcolor black
      ]
        ask patch 0 0[set pstatus 10 set pcolor 5 set homeX pxcor set homeY pycor]
    create-turtles 10 [
     set breed ricos
     setxy random-ycor random-xcor
     decrease-value
     decrease-price
      ]

 set view-mode "pstatus"
  reset-ticks
end
to go

  vid:start-recorder
    locate-ricos

    ask infras [
    if counter > residents-per-infra
    [locate-infras
      evaluate-infra
      set counter 0]
    ]

  if count (ricos) >= 100 [kill-ricos]
  if count (medias) >= 80 [kill-medias]
  if count (pobres) >= 20 [kill-pobres]


  update-patch-color
  vid:record-view
  tick
  vid:save-recording "filme.mp4"
end

试着这样做:

extensions [ vid bitmap ]

to setup
  ca
  crt 10
  reset-ticks
end

to go
  if vid:recorder-status = "inactive" [
    vid:start-recorder
  ]
  vid:record-view
  ask turtles [ 
    rt random 50 - 25
    fd 1
  ]
  tick
  if ticks = 200 [
    vid:save-recording "filme.mp4" 
    print vid:recorder-status   
    stop
  ]
end

关键是你只需要在满足某些条件时调用vid:save recording,否则它会被调用,报告一帧,并在每一个刻度上重置。

我尝试了你的建议。不起作用。仍在录制1秒钟的视频。是否仅使用我的代码尝试新文件?它对我有用。您必须调整它以适合您的代码。另外,你能显示你的安装程序块吗?我只是用你的代码尝试了一个新文件,但它显示了一个错误Netlogo无法向你提供有关此错误的详细信息。@AgnesdeAraujo-你能把它编辑到你的问题中吗?您使用的Netlogo版本是什么?此外,您可能想查看询问指南,尤其是提供可复制代码的提示-任何未包括的内容,例如查找ricos、查找媒体、查找POBRE等,都不会立即适用于其他用户。通常,您希望剪切与您遇到的问题不直接相关的任何代码。抱歉!我编辑了我的问题,添加了设置块。我正在使用NetLogo 6.0。但即使当我试图复制你的代码时,我还是出错了。