複雑系コンサルティング
何度も質問すみません。
エージェントと同じセルにいる他のエージェントの整数値を取得したいのですがどのようにすればよいでしょうか。
例えば、レシピブック01の例で説明しますと、
p.8にて、
My.Neighbor
を定義し、
MakeAllAgtSetAroundOwn(My.Neighbor, 1, False)
により My.Neighbor に隣人を格納してますが、基本的にはこれと同じ手順で取得できます。
次に、
Dim 隣人 As Agt
Dim 色 As Integer
For Each 隣人 In My.Neighbor
色 = 隣人.Color
Next 隣人
という具合に整数値の「色」を取得できます。
例えば、レシピブック01の例で説明しますと、
p.8にて、
My.Neighbor
を定義し、
MakeAllAgtSetAroundOwn(My.Neighbor, 1, False)
により My.Neighbor に隣人を格納してますが、基本的にはこれと同じ手順で取得できます。
次に、
Dim 隣人 As Agt
Dim 色 As Integer
For Each 隣人 In My.Neighbor
色 = 隣人.Color
Next 隣人
という具合に整数値の「色」を取得できます。