单向递增阵列

荒野孤行

请看图片演示，再确定是否需要此功能吧

tangjunasd58

阵列方向 可以记忆上次的方向就好了

荒野孤行

tangjunasd58 发表于 2015-4-20 15:32
阵列方向 可以记忆上次的方向就好了

增加如下代码即可记录阵列方向角度。

leedun

收藏，单向递增阵列

荒野孤行

tangjunasd58 发表于 2015-5-21 13:52
(if (not backup_angx)
  (setq backup_angx 45)
)

180°镜像是什么意思？太高深的表达，表示语文考试基本及格的我实在理解仁兄的意思。
难道你要求的是从左下角往右上角阵列，但是实际上是从右上角往左下角阵列的？那是因为你选择的角度的时候是从右上角往左下角的。

tangjunasd58

荒野孤行 发表于 2015-4-23 23:06
增加如下代码即可记录阵列方向角度。

(if (not backup_angx)
  (setq backup_angx 45)
)
(initget 4)
(if (not (setq angx (getangle (strcat "\n\n指定阵列方向与X轴的角度<"
                                        (rtos backup_angx 2)
                                          ">"
                                          )
                          )
                 )
       )
    (setq angx (angtof (rtos backup_angx)))
  )
(setq backup_angx
          (/(* angx 180.0) PI)
)

帮忙看看，为什么我的要与之前的方向是成180的镜像的

荒野孤行

bookish 发表于 2015-4-13 23:08
如图所示

实现，点击起点和终点，阵列的物体自动排列出来

第一，阵列的物体不一定是单一的，可能有多个
第二，若阵列的物体是多个，再让用户增加一个指定物体基准点的输入，然后通过距离的计算再取整得出阵列的个数，自行修改下程序就可以实现了。

bookish

荒野孤行 发表于 2015-4-13 22:57
没明白你说的，物体所在位置就是起点，起点和终点距离相等是什么意思？

如图所示

实现，点击起点和终点，阵列的物体自动排列出来

荒野孤行

bookish 发表于 2015-4-13 22:53
能否考虑实现在两点之间，物体阵列个数会自己计算布置多少了，第一个物体距离起点的距离（L1）和最后一个物 ...

没明白你说的，物体所在位置就是起点，起点和终点距离相等是什么意思？

bookish

能否考虑实现在两点之间，物体阵列个数会自己计算布置多少了，第一个物体距离起点的距离（L1）和最后一个物体距离终点的距离（L2）相等，即L1=L2