モデルの作り方
マップ画面を画像出力し動画を作成する
概要
マップ画面を毎ステップ画面キャプチャし、連番をつけてpngファイルに出力します。
出力したpngファイルから、ムービーメーカーを使って動画ファイルを作成します。
方法
毎ステップ画面キャプチャして、pngファイルを出力するために、UniverseのUniv_InitとUniv_Step_Endの最終行に次のコードを追加します。
// 追加 ScreenShotPNG("Streets", "map" & format_number(GetCountStep(), 4) & ".png")
また、Universeのツールとして、次の関数を定義します。
Function format_number(count As Long, num As Integer) As String { Dim newStr As String Dim i As Integer newStr = "" For i=0 To (num - Len(CStr(count))) - 1 newStr = newStr & "0" Next i newStr = newStr & CStr(count) Return(newStr) }
参考までに、サンプルモデルを修正し、「segregation_png.model」を作成しました。
segregation_png.model
このモデルを実行すると、各ステップに対応した「mapXXXX.png」が作成されます。
次に、動画を編集します。
動画編集方法
Windows ムービーメーカーの場合
ムービーメーカー」を起動します。
出力したpngファイルをムービーメーカーにドラッグして追加します。
編集タブの「再生時間」に「1.00」を指定します。(1秒毎のコマ送り)
ファイルタブの「ムービーの保存」をクリックし、任意のサイズのファイル形式(例えば、高解像度ディスプレイ用)を指定して、動画ファイルを作成します。
◯もっと高速に表示したいとき
再度ムービーメーカーを起動し、作成した動画ファイルをドラッグして追加したのち、編集タブの「速度」を指定し(例えば、8x)、動画ファイルを作成してください。