// INICIO DO ARQUIVO TESTE.MNU
// Atenção : toda linha que comece com // é um comentário e é como se
// não existisse para o menu...
// Utilize para escrever suas observações, para entender posteriormente
// porque algo foi feito ou como funciona...
// Um menu parcial começa com a linha abaixo, onde TESTE é o nome do
// menu parcial ( O nome do deste arquivo também é TESTE, com a extensão
// .mnu, mas isto não é obrigatório. Mas é MUITO RECOMENDADO que o nome
// do arquivo tenha o nome do MENUGROUP
***MENUGROUP=TESTE
// Criando um menu popdown
// Este menu será carregado para a linha de menus no arquivo teste.mnl
// Portanto, leia cuidadosamente este arquivo para entender o processo...
***POP0
ID_T000 [TESTE]
ID_T101 [Ícones 1]^C^Ct1
ID_T201 [Ícones 2]^C^Ct2
ID_T301 [Ícones 3]^C^Ct3
ID_T401 [Ícones 4]^C^Ct4
[--]
[->Sobre...]
[Escrito por Eduardo Fernal]
[<-http://www.gr-acad.com.br]
// Colocando uma barra de ferramentas...
// Se você não tiver os icones, deverá criá-los ou editar com os recursos do
// autocad, em customize...
***TOOLBARS
**TESTE
ID_T000 [_Toolbar("Teste_A", _Floating, _Show, 120, 120, 1)]
ID_T101 [_Button("T1 - Ícones 1", "c:/teste/bmps/t1.bmp", "c:/teste/bmps/t1b.bmp")]^C^Ct1
ID_T201 [_Button("T2 - Ícones 2", "c:/teste/bmps/t2.bmp", "c:/teste/bmps/t2b.bmp")]^C^Ct2
ID_T301 [_Button("T3 - Ícones 3", "c:/teste/bmps/t3.bmp", "c:/teste/bmps/t3b.bmp")]^C^Ct3
ID_T401 [_Button("T4 - Ícones 4", "c:/teste/bmps/t4.bmp", "c:/teste/bmps/t4b.bmp")]^C^Ct4
// etc... coloque quantos quiser e crie as funções T1, T2, T3, ... no arquivo
// teste.lsp
// Aqui é a sessão de ícones: no caso, não foi criada uma biblioteca de
// slides. Assim, deve-se passar o path completo de cada um deles...
***ICON
// Aberta a sessão de ícones, criamos um menu de ícones chamado T1
**T1
// O nome que irá aparecer no quadro de diálogo vem a seguir...
[Nome que aparece no quadro de diálogo]
// Em seguida devemos criar, linha a linha, a sequência dos slides
// que serão exibidos no menu de ícones, bem como o comando a ser
// executado para cada um deles...
// A sintaxe é:
// [biblioteca(SLIDE,NOME QUE VAI APARECER)]^C^Ccomando
// Observar que o AutoCAD é muito rigoroso sobre onde pode haver
// espaços e onde não pode haver...
// Portanto, para que apareça TESTE 01 e não TESTE01 na primeira
// linha da lista do quadro de diálogo do menu de ícones, a linha
// deve ser exatamente como abaixo. Os espaços sõmente são permitidos
// após a primeira palavra depois da vírgula em [TESTE(TESTE01,TESTE ....)]
// Para que a biblioteca de slides TESTE.SLB seja localizada, você
// deve copiá-la para a pasta de seu AutoCAD ou inserir o path
// no caminho de busca do mesmo (OPTIONS, FILES, SUPPORT FILE SEARCH PATH)
[TESTE(TESTE01,TESTE 01)]^C^C-insert;c:/teste/dwg/teste01.dwg;\1.0;1.0;0.0
[TESTE(TESTE02,TESTE 02)]^C^C-insert;c:/teste/dwg/teste02.dwg;\1.0;1.0;0.0
[TESTE(TESTE03,TESTE 03)]^C^C-insert;c:/teste/dwg/teste03.dwg
[TESTE(TESTE04,TESTE 04)]^C^C-insert;c:/teste/dwg/teste04.dwg
[TESTE(TESTE05,TESTE 05)]^C^C-insert;c:/teste/dwg/teste05.dwg
[TESTE(TESTE06,TESTE 06)]^C^C-insert;c:/teste/dwg/teste06.dwg
[TESTE(TESTE07,TESTE 07)]^C^C-insert;c:/teste/dwg/teste07.dwg
[TESTE(TESTE08,TESTE 08)]^C^C-insert;c:/teste/dwg/teste08.dwg
[TESTE(TESTE09,TESTE 09)]^C^C-insert;c:/teste/dwg/teste09.dwg
[TESTE(TESTE10,TESTE 10)]^C^C-insert;c:/teste/dwg/teste10.dwg
[TESTE(TESTE11,TESTE 11)]^C^C-insert;c:/teste/dwg/teste11.dwg
[TESTE(TESTE12,TESTE 12)]^C^C-insert;c:/teste/dwg/teste12.dwg
[TESTE(TESTE13,TESTE 13)]^C^C-insert;c:/teste/dwg/teste13.dwg
[TESTE(TESTE14,TESTE 14)]^C^C-insert;c:/teste/dwg/teste14.dwg
[TESTE(TESTE15,TESTE 15)]^C^C-insert;c:/teste/dwg/teste15.dwg
[TESTE(TESTE16,TESTE 16)]^C^C-insert;c:/teste/dwg/teste15.dwg
[TESTE(TESTE17,TESTE 17)]^C^C-insert;c:/teste/dwg/teste17.dwg
[TESTE(TESTE18,TESTE 18)]^C^C-insert;c:/teste/dwg/teste18.dwg
[TESTE(TESTE19,TESTE 19)]^C^C-insert;c:/teste/dwg/teste19.dwg
[TESTE(TESTE20,TESTE 20)]^C^C-insert;c:/teste/dwg/teste20.dwg
// Aqui, vamos alterar e fazer outras coisas...
[TESTE(TESTE21,TESTE 21)]^C^C(ALERT "Veja, estamos executando uma outra coisa nesta linha...")
[TESTE(TESTE22,TESTE 22)]^C^Cfuncao_teste
// a função teste está definida no arquivo teste.lsp, que será 'tomaticamente'
// carregada pelo arquivo teste.mnl, pois este também é carregado 'tomaticamente',
// sempre que o menu TESTE.MNU estiver presente no seu ´tocad´
[SAIR]^C^C
// etc.. você pode acrescentar quantos quiser, mas quando tiver muito é melhor
// fazer outro quadro (T2, T3, T4, etc...)
// FIM DO ARQUIVO DO MENU DE EXEMPLO
// Para carregar este menu, copie a linha abaixo para o prompt de comandos de seu AutoCAD©
//
// (COMMAND "_.MENULOAD" "C:\\TESTE\\TESTE.MNU")
//
// Obs.: Copiar sòmente de parenteses de abertura (inclusive) a parênteses de fechamento (inclusive).
Como criar a biblioteca de slides
O arquivo .MNL (MeNu Lisp)
O arquivo TESTE.LSP
Download do exemplo