　　
質問掲示板は移転しました。新掲示板はこちら。

質問 (解決済み)

[artisocモデル] csvファイルの読み取りについて

質問者: paramaさん , 質問日時: 2020/01/22 11:51

csvファイルのデータから数値を読み取り，personエージェントの初期位置，説明変数にしたいと考えています
universeのルール記述に
univ_init

Dim data As String
Dim i as integer
i = 0
OpenFile("開くファイル名.csv", 1, 1)
data = ReadFile(1)
do while(IsEofFile(1) == false)
data = ReadFile(1)
MY.Map.Person.X = CDbl(GetToken(data, 0))
My.Map.Person.Y = CDbl(GetToken(data, 1))
MY.Map.Person.z0 = CInt(GetToken(data, 2))
MY.Map.Person.z1 = CInt(GetToken(data, 3))
MY.Map.Person.z2 = CInt(GetToken(data, 4))
MY.Map.Person.z3 = CInt(GetToken(data, 5))
MY.Map.Person.z4 = CInt(GetToken(data, 6))
MY.Map.Person.z5 = CInt(GetToken(data, 7))

loop
closefile(1)
}

このようにしているのですが，読み取り結果が反映されません
MASのコミュニティのartisocチュートリアル教材『artisoc中級チュートリアル GISデータを利用したシミュレーションモデル作成講習』を参考にしました
よろしくお願いします

▼解決した回答

以下はすべて意味不明です。MapにMYはつけてはいけないです。まずは「人工社会構築指南」をよく読んでartisocの構造を理解してください。
MY.Map.Person.X = CDbl(GetToken(data, 0))
My.Map.Person.Y = CDbl(GetToken(data, 1))
MY.Map.Person.z0 = CInt(GetToken(data, 2))
MY.Map.Person.z1 = CInt(GetToken(data, 3))
MY.Map.Person.z2 = CInt(GetToken(data, 4))
MY.Map.Person.z3 = CInt(GetToken(data, 5))
MY.Map.Person.z4 = CInt(GetToken(data, 6))
MY.Map.Person.z5 = CInt(GetToken(data, 7))
どうようのことをやるのながら、CreateAgt()でエージェントを作成し、そのエージェントのエージェント変数に読み取った値を代入することになります。

回答者: igaguri さん , 回答日時: 2020/01/22 11:56

▼ 全ての回答

回答者: igaguri さん , 回答日時: 2020/01/22 11:56