MOVE-TO ожидал, что вход будет агентом, но вместо этого получил НИКТО - PullRequest
Новая
       8

MOVE-TO ожидал, что вход будет агентом, но вместо этого получил НИКТО

0 голосов
/ 23 октября 2018

Что мой код делает, так это устанавливает внутреннюю зону серого патча и внешнюю зону черного патча, где черепахи могут размножаться (по одному на каждый патч).Когда черепаха достигла границы между серой и черной зонами, я назначил переменную энергию, чтобы задержать размножение черепахи некоторыми клещами (каждая энергия клеща увеличивается на одну единицу).Когда энергия достигает определенного числа, я хотел, чтобы черепахи вылупили новых черепах в одном из пустых черных участков, но после первого поколения новых черепах в черной зоне я получаю ошибку времени выполнения «MOVE-TO ожидал, что входной сигнал будет агентом, но получилНИКТО вместо этого. "

Это мой код 

breed [greens a-green]
breed [reds a-red]
greens-own[energy]

to setup
  clear-all
  ask patch 0 0 [ ask patches in-radius 15 [set pcolor 3]]
  ask n-of 20 patches with [pcolor = 3][sprout-greens 1 [set color green set energy 0]]
  ask n-of 20 patches with [pcolor = 3][sprout-reds 1 [set color red]]
  reset-ticks
end

to go
  division
  delay-expansion
  expansion
  tick
end

to division
ask greens[
    let empty-space neighbors with [pcolor = 3 and not any? turtles-here] ;crea un set llamado "empty-space" que son los patches negros q rodean a la celula verde y q no estan ocupados
    if any? empty-space [hatch 1 set color green move-to one-of empty-space] ; si existe algun patch negro alrededor, nace una celula verde y se ubica en ese patch
  ]

ask reds[
    let empty-space neighbors with [pcolor = 3 and not any? turtles-here] ;crea un set llamado "empty-space" que son los patches negros q rodean a la celula roja y q no estan ocupados
    if any? empty-space [hatch 1 set color red move-to one-of empty-space] ; si existe algun patch negro alrededor, nace una celula roja y se ubica en ese patch
  ]
end

to delay-expansion
  ask greens[
    let black-space neighbors with [pcolor = black and not any? turtles-here]
    if any? black-space [set energy (energy + 1 )]
  ]
end

to expansion
  ask greens[
    let black-space neighbors with [pcolor = black and not any? turtles-here]
    if energy > 5  [hatch 1 set color blue move-to one-of black-space]
  ]
end
...