登录【网站注册】点击左边“微信账号登陆”图标,微信扫描即自动注册并登陆
搜索
查看: 1691|回复: 2

[CAD] CAD画抛物线

[复制链接]
发表于 2014-1-14 14:18:06 | 显示全部楼层 |阅读模式
CAD画抛物线的方法,,请具体点,谢谢!
该会员没有填写今日想说内容.
发表于 2014-1-16 20:04:16 | 显示全部楼层
用LISP编程实现:
;;定义x和t的函数 (defun x-t(t)   (setq x (* 4.0 t)) ) ;;定义y和t的函数 (defun y-t(t)   (setq y (+ (* 3.0 t) (* 5.0 t t))) ) ;;定义绘制程序 (defun c:draw-x-y(lower-limit upper-limit step)   (setvar "osmode" 0)   (setq i lower-limit)   (setq x (x-t i))   (setq y (y-t i))   (setq p1 '(x y))   (while (< i upper-limit)     (setq i (+ i step))     (setq x (x-t i))     (setq y (y-t i))     (setq p2 '(x y))     (command "_line" p1 p2 "")     (setq p1 p2)   ) )
【温馨提示】技术问题请优先发到问答专栏,优胜教师团队将及时回复,谢谢!
回复 支持 反对

使用道具 举报

发表于 2014-1-16 22:02:37 | 显示全部楼层
不难,参考教材!
优胜专注教学 技术实力最强 www.ysug.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则


快速回复 返回顶部 返回列表