Question

我有一个椭圆形。（创建时具有垂直方向）我想在圆形轮廓上放置几个这样的形状它们应该以彼此相同的距离放置

;x,y - circle center coordinates
;r - radius
to draw-ellipses [x y r elNum ]
  if  elNum > 0 [
    let theta 0
    let delta 360 / elNum
    loop[
      if  elNum = 0 [ stop ]
      crt 1 [
        setxy (x + r * cos theta) (y + r * sin theta)
        set shape "ellipse"
        set heading 90 + theta
        set size 7
      ]
      set theta  (theta + delta)
      set elNum (elNum - 1)
    ]
  ]
end

正确放置椭圆形状，但方向错误。我希望椭圆具有径向方向。即是半径到放置形状的点的延续。但是方向不好仅在0度和180度时，方向是可以的。

一些建议我缺少什么？

Answer 1

我是否正确理解您希望海龟背对半径？如果是这样，请尝试将标题行替换为：

set heading atan xcor ycor

以与您的角度数学一致的方式进行操作。另外，您可以使用facexy，然后将标题行替换为以下内容：

facexy x y
rt 180

netlogo-乌龟的径向方向

1 个答案: