モデルの作り方(自習用)

マップ画面を画像出力し動画を作成する

概要

マップ画面を毎ステップ画面キャプチャし、連番をつけて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)、動画ファイルを作成してください。