求cad的一个lisp程序,要求鼠标点击一点后,在其旁输出坐标值(x,y,z)也就是在取点的旁边绘出坐标值(x,y,z)

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 03:34:59
求cad的一个lisp程序,要求鼠标点击一点后,在其旁输出坐标值(x,y,z)也就是在取点的旁边绘出坐标值(x,y,z)

求cad的一个lisp程序,要求鼠标点击一点后,在其旁输出坐标值(x,y,z)也就是在取点的旁边绘出坐标值(x,y,z)
求cad的一个lisp程序,要求鼠标点击一点后,在其旁输出坐标值(x,y,z)
也就是在取点的旁边绘出坐标值(x,y,z)

求cad的一个lisp程序,要求鼠标点击一点后,在其旁输出坐标值(x,y,z)也就是在取点的旁边绘出坐标值(x,y,z)
其实很简单的,不用三楼那么麻烦的.
(defun c:pt()
  (setvar "cmdecho" 0)
  (while (setq pt1 (getpoint "\n请指定点位置:"))
    (setq point_x (rtos (car pt1) 2 2))
    (setq point_y (rtos (cadr pt1) 2 2))
    (setq point_z (rtos (caddr pt1) 2 2))
    (command "_text" pt1 "" "" (strcat "(" point_x "," point_y "," point_z ")"))
    )
(princ)
  )
效果如图所示

求cad的一个lisp程序,要求鼠标点击一点后,在其旁输出坐标值(x,y,z)也就是在取点的旁边绘出坐标值(x,y,z) 求cad lisp.cad有很多数字,想同时做乘法,并且在原位置替换,第三点要求是能控制小数点后的位数.谁能帮忙写个程序,cad有很多数字,想同时做乘法,并且在原位置替换,第三点要求是能控制小数点 CAD 只改变X或Y轴的比例 插件求一个lisp的插件,比如用scxy可以单独按比例更改x或y轴的大小. CAD lisp 如何实现框选两条直线,然后得到两条直线的端点坐标?图上有两条相交直线,我想通过一次点击或者框选,得到两条直线端点的坐标.这个用lisp语言如何实现 求CAD lisp 程序,选择一条或多条多段线,输出其上点的x,y,z坐标.list 输出的东西太多了,我只要三维坐标,求大虾们帮帮忙! 求一个JAVA编程,要求6个评委打分,去掉最高分和最低分后求平均分,最好除了代码有鼠标点击选项的的过程.本人未用过JAVA 求as3物体移动算法舞台上已有一个mc实例名称为sp,速度(speed) = 3,鼠标点击一下舞台的某个位置,sp慢慢的向鼠标点击的位置移动,求实例代码(as3) 求一个画化学仪器lisp程序,烧瓶,量筒,锥形瓶,坩埚什么的都可以,尺寸大小随意大概就是一个画单独化学常见仪器的程序我要的是可以画出仪嚣的直接的AUtoCAD的lisp代码啊 设备坐标到逻辑坐标的转换我在编程中在视频上通过鼠标点击画了一个矩形 画完要获取矩形的点在程序中进进行判断,鼠标点击获取的是设备坐标,判断中用到的是逻辑坐标,现在要转换,主要 什么命令可以将CAD的测量单位由毫米转化成米?我有一个lisp程序,可以测量多个对象的面积,可是测出来的单位是毫米,这样我每次都必须从最后一位向前数6位才能知道它的平米面积,很麻烦,能 求CAD中计算所有线段长度总和的方法补充下,省得瞎给答案.很多线段,不是首尾相连,一个个量然后相加太过麻烦.网上说有LISP程序可以直接框选全部就可以得出总长度,也有说贱人工具箱有这个 vb编写一个用于求随机数的程序要求:点击左侧的按钮,则在标签中显示一个(-50,50]的随机整数.点击右侧的按钮,则在标签中显示一个(0,99.99)范围内的随机浮点数,该浮点数具有两位小数. 用vb编写一个用于求随机数的程序,要求:点击左侧的按钮,则在标签中显示一个(-50,50]的随机整数.点击右侧的按钮,则在标签中显示一个(0,99.99)范围内的随机浮点数,该浮点数具有两位小数. 用vb编写一个用于求随机数的程序,要求:点击左侧的按钮,则在标签中显示一个(-50,50]的随机整数.点击右侧的按钮,则在标签中显示一个(0,99.99)范围内的随机浮点数,该浮点数具有两位小数. 我的word的表格中要设置 是 一个正方形.否 一个正方形,点击鼠标能在格子中打勾 找一个OPENGL的选择机制的小例子.比如说鼠标点击图形会变颜色,或者移动. cad平面坐标怎样转换成测量坐标我是说在cad中用鼠标点击的地方出现的是(500,400)平面坐标,怎么能获得像(2685123.456,501423.789)这样的测量坐标 英文翻译.用鼠标右键点击你的名字.