如何制作menu菜单

xxxx111

     我做了一些小程序。想加在cad菜单后面，做一个下拉菜单，该如何做。

  谢谢，那位高手帮帮忙。

Andyhon

http://afralisp.net/
==>
AutoLisp and Menu's

job_ho

***MENUGROUP=JOB_HO_Survey
***POP11
**Survey1
ID_Survey1          [測量1]
ID_Totalimage    [影像框功能表]^C^C^P$I=acad.image_survey $I=*
ID_Totalline       [路線測量(無高程多重線)]^C^C^P(IF (NOT C:TOTALLLINE)(LOAD "D:/CAD/HLISP/attdpr16")(princ))^P TOTALLINE
ID_Totalline1       [路線測量(有高程單線)]^C^C^P(IF (NOT C:TOTALLLINE1)(LOAD "D:/CAD/HLISP/attdpr15")(princ))^P TOTALLINE1

***HELPSTRINGS
ID_Totalimage    [影像框功能表:提供全功能的LISP影像框功能表]
ID_Totalline  [路線測量(無高程多重線):TOTALLINE]
ID_Totalline1  [路線測量(有高程單線):TOTALLINE1]

假設上面是JOB_HO.MNU,進入AUTOCAD後,以MENULOAD載入

xxxx111

 我是初学，上面的还是有点看不懂，高手能不能一步一步再详细点。

谢谢了，非常感谢。