主题: 求老师帮忙
查看单个帖子
旧 2009-04-27, 10:42 AM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 求老师帮忙

求老师帮忙
www.dimcax.com
求老师帮忙
我用vb编了一段斜齿圆柱齿论的程序,现在需要在vb中调用编的lisp语言进行画图,
private sub command2_click()
open "chilun.dat" for output as #10
print #10, 100, 100
print #10, mn, z1, b
close 10
end sub
这个已经好了,那么在lisp中怎么读 阿,程序是什么?
单独做 lisp时是这样的开始
(defun c:chilun ()
(setq p (getpoint "\n enter point"))
(setq m (getreal "\n enter m"))
(setq z (getreal "\n enter z"))
(setq b (getreal "\n enter b"))
现在怎么改一下阿,p为点,坐标100,100
m为上面做出来的mn的值,z为z1的值,b为b的值
请问老师怎么做阿
d
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)