另类的菜单

lijiao

第二版:

在第一版的基础上增加了对图像的支持,不用多说,看看下图就明白
图像用bmp格式,图像大小建议30X30像素,其它图像格式没有验证
忘说了,用netload命令进行加载

......................................................................................................................
第一版:

刚出炉的,欢迎体验(估计实用于AutoCAD2013以上版本)
功能:在屏幕中间产生一个菜单共用户选择


调用格式csmenu [menu0 [menu1 [menu2 [menu3 [menu4 [menu5]]]]]])
参数:最多可以使用6个参数menu0~menu5,均为字符串,代表菜单上的文字信息

返回值:返回用户点击的菜单序号0~5
示例:1
示例:2
示例:3
示例:4
示例:5
示例:6
示例:7

lijiao

664571221 发表于 2024-8-2 16:56
怎么用啊大神

下载解压后得到csmenu.dll文件,启动cacd后输入netload来加载csmenu.dll
加载成功后就可以用了
调用方式
1.(csmenu [str0 [str1 [str2 [str3 [str4 [str5]]]]]])
2.(csmenu ['(str0 file0) ['(str1 file1) ['(str2 file2) ['(str3 file3) ['(str4 file4) ['(str5 file5)]]]]]])
两种方式可以混合使用

lijiao

depgfdepgf 发表于 2024-8-3 20:05
大佬，直线，圆这些命令在哪里设置呀？

给你举个例子吧:
(setq rev (csmenu "直线" "圆"))
(cond
   ((= rev 0) (command "line"))
   ((= rev 1) (command "circle"))
)

664571221

lijiao 发表于 2024-8-2 17:32
下载解压后得到csmenu.dll文件,启动cacd后输入netload来加载csmenu.dll
加载成功后就可以用了
调用方式 ...

好高级就是用不来

tranque

很棒，支持，感谢分享

自贡黄明儒

很有创意   

gble119

这个看上去  蛮不错

cghdy

; : no function definition: CSMENU

lijiao

还做了一个lisp+VBA版的,效果和这差不多,由于实现起来很麻烦,也没法单独剥离出来,所以这里就不展示了,有兴趣的朋友可以私聊

664571221

怎么用啊大神

bai2000

怎么点击调用命令？？？？

muai2010

新东西啊，有点意思