筑龙首页

怎样画三角函数?

发表于2005-07-17    3561人浏览    41人跟帖    复制链接  只看楼主

筑龙币+0

longkun0426

标签: 关键点
我是一个教师 想自己画些三角函数SIN的图片给学生看
我用2004版的AUTOCAD
首先我用命令point 然后 指定点 (0,0)( 二份之派,1)然后用“样条曲线”把关键点连在一起!
可是怎么输入这个“派”呢?
如果没有这种输入的方法的话
怎么画三角函数?
分享至

分享到微信朋友圈 ×

打开微信"扫一扫",扫描上方二维码
请点击右上角按钮 ,选择 

 当前离线   发表于2005-07-17  | 只看该作者      

2

举例,画正玄函数
(defun c:tt_line ()
(setvar "osmode" 0)
(setvar "cmdecho" 0)
(princ "n请指定X的定义域:")
(setq tt_mt (getreal "n请指定X轴的最小单位:"))
(setq tt_mt (abs tt_mt))
(setq tt_x_min (getint "n请指定X的最小值:"))
(setq tt_x_max (getint "n请指定X的最大值:"))
(while (<= tt_x_max tt_x_min)
(princ "n最大值必须大于且不等于最小值!")
(setq tt_x_min (getint "n请指定X的最小值:"))
(setq tt_x_max (getint "n请指定X的最大值:"))
)
(setq tt_nsp (/ (- tt_x_max tt_x_min) tt_mt))
(Setq nn 0)
(setq aaa (atoi (rtos tt_nsp 2 0)))
(Setq pt_x tt_x_min)
(command "line")
(repeat aaa
(Setq pt_x (+ nn pt_x))
(setq pt_y (sin pt_x)) ;关键是这句,你可以自已变成自己想要的公式
(setq pt (list pt_x pt_y))
(setq nn tt_mt)
(command pt)
)
(command "")
(command "line" ppy1 "0,0" ppx1 "")
(command "text" "J" "TR" ppx1 "" "" "x" "")
(command "text" "J" "TR" ppy1 "" "" "y" "")
(princ)
)

 当前离线   发表于2005-07-17  | 只看该作者      

3

把这个程序下载到任意文件夹,然后直接拖到CAD的绘图窗口中,输入命令
tt_line

 当前离线   发表于2005-07-17  | 只看该作者      

4

关键是这句,改成你需要的函数就行乐

 当前离线   发表于2005-07-17  | 只看该作者      

5

转贴
用excel和word在cad中画曲线

 当前离线   发表于2005-07-17  | 只看该作者      

6

请问:fzfzfz1968
"把这个程序下载到任意文件夹,然后直接拖到CAD的绘图窗口中"
是下载哪个程序??? 什么个拖到CAD绘图窗口中???
请解释,谢谢了!

 当前离线   发表于2005-07-17  | 只看该作者      

8

其实,直接选种,复制到CAD的命令就行了

 当前离线   发表于2005-07-17  | 只看该作者      

9

拈帖后

 当前离线   发表于2005-07-17  | 只看该作者      

10

在命令行输入tt_line

 当前离线   发表于2005-07-17  | 只看该作者      

11

在命令行输入tt_line回车后

登录后才能评论,评论超过10个字,有机会获得筑龙币奖励!

试听课程

猜你爱看

筑龙学社APP扫码

立即免费下载资料