请飞哥和龙兄等高手帮忙

tukuitk

请问：
用TransformBy方法时，TransformationMatrix怎样决定？我若要对某对象进行同时缩放和旋转，那么需要的矩阵怎样确定？

龙龙仔

;;BY 龙龙仔(LUCAS)
;;缩放转换矩阵_应用
(defun C:TT ()
  (setq E (car (entsel)))
  (setq C (getpoint "\n指定基准点: "))
  (setq B (getreal "\n指定比例系数: "))
  (vla-transformby
    (vlax-ename->vla-object E)
    (vlax-tmatrix
      (MREV B C)
    )
  )
  (princ)
)

;;建立缩放转换矩阵
;;USAGEMREV 10 '(2 2 0))
;;B=缩放倍率,C=基准点
(defun MREV (B C / U V W)
  (append
    (mapcar '(lambda (V W)
               (reverse
                 (cons (- W (* B W))
                       (cdr (reverse (mapcar '(lambda (U) (* B U)) V)))
                 )
               )
             )
            '((1.0 0.0 0.0 0.0)
              (0.0 1.0 0.0 0.0)
              (0.0 0.0 1.0 0.0)
             )
            C
    )
    '((0.0 0.0 0.0 1.0))
  )
)

tukuitk

龙兄，你的那个矩阵是怎样得来的呢？

龙龙仔

;;你看清楚下列函數了嗎?
;;建立缩放转换矩阵

tukuitk

不好意思，我是说下面的表
'((1.0 0.0 0.0 0.0)
              (0.0 1.0 0.0 0.0)
              (0.0 0.0 1.0 0.0)
             )
和
‘((0.0 0.0 0.0 1.0))
是怎样得来的呢？我发这个话题就是不明白上面的表是怎样确定！？
还有：旋转的矩阵呢？我记得只用一个矩阵就可同时旋转和缩放对象，那么又是怎样的呢？我实在不知道，还要麻烦龙兄指点迷津！！！

tukuitk

龙龙仔

查看:
http://easyweb.easynet.co.uk/~mrmeanie/matrix/matrices.htm

tukuitk

谢谢龙兄！

tukuitk

另外，请问：只用一个矩阵就可同时旋转和缩放对象吗？

龙龙仔

那当然可以,只是我也没有研究,想想看一个图块当它放大+旋转+移动时的转置矩阵!
參考nentselp)