Esta rotina permite que você escreva e consulte tópicos de ajuda sem uma ordem específica.
Procedimentos, dicas, truques, sempre que você achar necessário escrever para uma posterior consulta, podem ser inseridos rapidamente com esta rotina.

O arquivo EFPAC0001.FAS insere um texto com o azimute obtido pela seleção de dois pontos, na direção do primeiro para o segundo. Você deve ajustar a altura da fonte, mas o estilo de texto a ser utilizado será o estilo corrente, assim como a camada...
Também a distância entre os pontos será colocada neste texto...
Veja também a rotina EFPAC0153 (Rumos)

Esta rotina calcula a área de círculos e polilinhas, caso a opção seja "Selecionar"
Se a opção "Somar" estiver assinalada, as áreas de todas as entidades selecionadas serão somadas e apresentada ao final.
Caso a opção seja "Pontos", você será solicitado a clicar sobre os vértices da poligonal a calcular a área...

A rotina EFPAC0003 conta os blocos inseridos em seu desenho e escreve um relatório em um arquivo de texto, que será aberto pelo Notepad.exe do Windows ao se fechar o quadro de diálogo com o resultado.
Caso não haja inserções de blocos em seu desenho, uma mensagem será apresentada... Veja tambem a rotina EFPAC0070

Esta rotina altera as coordenadas Z dos tipos de entidades selecionadas no quadro de diálogo que sejam selecionadas em seguida. Indique o novo valor para a coordenada Z no campo de edição, clique em "Prosseguir" e selecionar a entidades.
A rotina irá filtrar o conjunto selecionado e moverá as que pertençam a um dos tipos selecionados...

A rotina do arquivo EFPAC0005 solicita dois pontos, calcula o ponto médio e insere uma entidade POINT neste último.
Retorna as coordenadas X,Y,Z na linha de comandos do AutoCAD.

Digite um texto a procurar, responda a pergunta que se seguirá.
O texto pode ser digitado de qualquer modo, pois você deverá responder se a rotina deverá procurar por textos iguais, em letras maiúsculas, minúsculas, ou todos os textos existentes.
De acordo com a resposta, o conteúdo do quadro de diálogo da rotina será preenchido com os textos válidos encontrados em seu desenho.
Clique sobre um deles e o mesmo será levado para o centro da tela...

Esta rotina exporta as coordenadas de uma série de pontos para um arquivo de texto, com várias opções de formato.
Selecione o formato desejado e, após fechar o quadro de diálogo, clique na sequência dos pontos a enviar.
Ao final, o resultado será aberto com o Notepad.exe do Windows.

Esta rotina mede arcos, linhas e/ou polilinhas de um determinado layer, retornando o resultado em unidades de desenho.
Assinale as entidades a considerar, clique o botão \"Layer\" para selecionar a camada e tecle \"Prosseguir\".

A rotina EFPAC009 abre portas em planta, necessitando duas entidades do tipo \"LINE\" que sejam paralelas entre si. Informe os parâmetros através do prompt do AutoCAD© e selecione continuamente para criar as portas de mesma dimensão todas de uma só vez...

Esta rotina solicita a seleção de uma entidade tipo "ARC", calcula o seu comprimento e, em seguida, apresenta este comprimento em um quadro de diálogo, no qual você deverá informar a quantidade de segmentos no qual o arco deverá dividido. A rotina então desenhará estes segmentos sobre o arco, que será mantido em seu desenho.

Esta rotina desenha janelas em paredes em planta. Estas paredes devem ser representadas por duas entidades do tipo "LINE", e necessitam ser paralelas entre si.
A opção inicial é janela de canto ou central. Entre com as dimensões no prompt do AutoCAD© e, em seguida, clique continuamente as linhas da parede para criar todas as janelas de mesma dimensão de uma só vez.

Esta rotina cria seções de cantoneiras, uma vez selecionada uma delas no quadro de diálogo da rotina. Basta clicar um ponto que a cantoneira será inserida como bloco...

A rotina EFPAC0013 solicita a seleção de duas entidades do tipo "LINE" e desenha a linha de eixo entre as estas duas linhas.

Utilize a rotina EFPAC0014 para escrever textos numéricos sequenciais, em ordem crescente ou decrescente. Os valores iniciais deverão ser fornecidos através de um quadro de diálogo.

A rotina EFPAC0015 solicita dois pontos e desenha uma série de linhas com um comprimento previamente informado através de um quadro de diálogo, alinhadas entre os pontos fornecidos e espaçadas com uma lacuna equivalente a 20% do tamanho informado para o comprimento de cada segmento. Não será feito arredondamento, portanto a distância total poderá não ser preenchida pelos segmentos...

Esta rotina soma textos numéricos e permite escrever o resultado.

Esta rotina solicita a seleção de textos numéricos para arredondamento.
Depois de selecionados, informe como arredondar marcando uma das alternativas mostradas pelo quadro de diálogo. Informe a altura da fonte...

A rotina EFPAC0018 solicita um número e um operador (+ - * /). Em seguida, você deverá selecionar um texto numérico em seu desenho e este texto será somado, subtraido, multiplicado ou dividido pelo número informado no quadro de diálogo, atualizando o texto selecionado.

Esta rotina lê um arquivo de texto que contenha linhas representando as coordenadas dos vértices de coordenadas de polilinhas, que podem ser, por exemplo, curvas de nível.
Indique o formato dos pontos no arquivo, clique "Prosseguir" e, em seguida, localize o arquivo de texto. A curva será desenhada, caso não haja erro em seu arquivo...

A rotina EFPAC0020 transforma uma entidade do tipo SPLINE em uma polilinha.
Você deve selecionar a SPLINE e entrar com os parâmetros desejados no quadro de diálogo que será aberto após a seleção desta SPLINE.

A rotina EFPAC0021 transforma um texto comum em um atributo. Isto é útil para a agilizar a criação de blocos atributados, quando este já existe com textos que, de outra forma, teriam que excluidos para a inserção de atributos...

A rotina EFPAC0022 alinha um texto selecionado a um vetor definido por dois fornecidos após a seleção do texto.

Utilize a rotina EFPAC0023 como uma calculadora de 4 operações.
Ela permite efetuar somas, multiplicações, divisões e subtrações. Ao fim permite escrever o resultado em seu desenho.

Esta rotina irá solicitar uma série de polilinhas fechadas, com 3 ou mais vértices, e calculará volume e massa das mesmas, de acordo com os parâmetros fornecidos.
Solicitará um ponto de inserção e escreverá resultado...

A rotina EFPAC0025 apresenta um quadro de diálogo no qual você define a altura da fonte e o número de casas decimais, bem como pode escolher a camada na qual serão inseridos os textos dimensionais.
Fechado o quadro, selecione as linhas que serão medidas.
Sobre estas serão inseridos textos com os comprimentos destes segmentos.

Esta rotina abre o arquivo MEMO.TXT em um editor de textos 'FREE', para você fazer anotações sobre desenhos, projetos, etc...

A rotina EFPAC0027 permite inserir um bloco e criar um slide para posterior inserção, através de um quadro de diálogo no qual será exibido este slide, selecionado o nome deste arquivo. Permite criar uma biblioteca pessoal de forma rápida e simples...

Esta rotina solicita a seleção de um slide em uma pasta na qual existam arquivos do tipo .sld (slides do AutoCAD©).
Então a rotina irá carregar e apresentar estes slides na tela...

A rotina EFPAC0029 insere blocos de identificação de entidades do tipo "POINT".
Você pode escolher um entre três tipos de blocos, clicando sobre o tipo desejado em uma das imagens do quadro de diálogo. Ajuste a altura da fonte na escala desejada.

A rotina EFPAC0031 insere um bloco indicativo de código com no máximo dois caracteres.
Este bloco compõe-se de uma seta e um retângulo que envolve o texto.
A rotina solicita a altura da fonte a ser utilizada...

A rotina EFPAC0031 insere um bloco indicativo de código com no máximo dois caracteres.
Este bloco compõe-se de uma seta e um círculo. A rotina solicita a altura da fonte a ser utilizada...

A rotina EFPAC0032 insere um 'leader' com a dimensão radial em arcos e círculos.
Para os arcos, a rotina poderá inserir linhas do centro às extremidades.
O comando é contínuo, deste modo você poderá selecionar continuamente as entidades nas quais deverão ser inseridos os 'leaders'.

Esta rotina insere uma linha de corte com textos indicativos do corte.
Necessita de dois pontos. As entidades serão criadas nas camadas EFPAC-002 e EFPAC-004, onde 2 e 4 serão os números das cores originais das entidades originais.
Você pode mudar as cores e renomear as camadas, pois uma vez inserido os blocos no seu desenho, estes serão utilizados como se encontram. Os blocos são: "EFP0033-A" e "EFP0033-B"

Esta rotina desenha um furo oblongo, fornecidos os pontos centrais e o raio do furo.
As entidades serão criadas nas camadas Oblongo-Furos e Oblongo-Linhas, que serão automaticamente criados ao se usar a rotina...

Esta rotina permite fazer a paginação de uma área retangular, seja fornecendo as dimensões pelo quadro de diálogo ou clicando os vértices opostos de um retângulo na tela. Nx e Nx devem ser ambos maiores que zero!

Esta rotina traça uma poligonal, à medida em que forem sendo fornecidos a distância reduzida e o ângulo da deflexão, bem como o lado da deflexão.
Desenhada a poligonal, a rotina irá inserir todos os dados na mesma, a saber:

• Os comprimentos de cada divisa.
• Os ângulos internos, em GMS.
• Os ângulos das deflexões (complementos).
• Os azimutes de cada divisa.
• A área da poligonal, na unidade informada (mm2, cm2, m2, hectares)

Esta rotina apresenta uma biblioteca de blocos, separada em famílias, com blocos feitos todos na camada "0", adequadamente orientados, todos desenhados em centímetros, e com ponto base sempre nas coordenadas 0,0,0.
Você pode inseri-los em milímetros, centímetros ou metros, alem de poder presselecionar a camada na própria rotina, sem ser necessário tornar esta camada corrente.
Estas opções serão armazenadas em arquivo de configuração, para uma utilização posterior.

Esta rotina insere um retângulo nas dimensões do formato escolhido ou com as dimensões informadas.
Você deverá entrar com estas sempre em milímetros, mas a rotina irá converter estas dimensões para centímetros ou metros, o que for assinalado no quadro de diálogo.

Esta rotina solicita o valor de uma área e um ponto e, em seguida, desenha um círculo com esta área.

Uma rotina para alterar os nomes de TAGs, PROMPTs e VALUEs de atributos de blocos já inseridos em seu desenho, sem a necessidade de explodir o bloco.

A rotina EFPAC0041 desenha a representação de talude, selecionada uma entidade válida para a crista e outra, também válida, para o pé do talude.
As entidades válidas são arcos, linhas e/ou polilinhas...
Importante:
As entidades deverão ter sido desenhadas no mesmo sentido, caso contrário o resultado não será adequado. Se necessário, desfaça com Undo.

Esta rotina permite alterar altura e largura de textos existentes em seu desenho.
Insira os valores desejados e assinale o caso a considerar, na coluna à esquerda do quadro de diálogo.
Assinale pelo menos um dos dois 'toggles', clique "Prosseguir" e siga as instruções do prompt de comandos do AutoCAD©.

A rotina EFPAC0043 conta as instâncias de blocos inseridos em seu desenho e apresenta o resultado em um quadro de diálogo, no qual a lista da esquerda é esta contagem, em ordem alfabética.
Você poderá selecionar, desta lista, os blocos que lhe interessa saber a quantidade e, clicando no botão "Acrescentar", estes serão incluidos na lista da direita, se nela já não estiverem. Esta lista será armazenada em um arquivo externo, para que da próxima rodada você não necessidade de recompor a mesma...
Para eliminar a lista, basta clicar no botão "Limpar lista".
Se o toggle "Atualizar log" estiver assinalado, a contagem será impressa em um arquivo de texto e aberto no Notepad++Portable.

Esta rotina oferece 16 blocos de norte. Todos foram desenhados em centímetros, portanto você deve informar se deseja inseri-los em mm, cm ou m, para a devida conversão. O fator de escala permite ampliar/reduzir o bloco, caso seja maior ou menor que 1.0

Esta rotina faz cópias múltiplas em qualquer direção, como um array de uma única fila. Você pode entrar com os dados distância e ângulo através do quadro de diálogo ou pela tela, seja clicando ou digitando...

Utilize esta rotina para escrever textos de revisão.
Ela insere os textos de baixo para cima, justificados pelo meio, à esquerda ou à direita.
Você deve informar a altura da célula, a altura da fonte e escolher uma das justificações...

A rotina EFPAC0047 lista os blocos definidos em seu desenho e, se fornecido um ponto, gera uma tabela com seus nomes. Será verificada a existência de blocos efetivamente inseridos, que serão contados. O resultado será listado nesta tabela.
Caso só exista a definição do bloco, a quantidade para este bloco será listada como zero.

A rotina EFPAC0048 lê quatro arquivos de textos, que você pode editar a vontade, e lista as linhas destes arquivos em quadro colunas no quadro de diálogo da rotina.
Clique sobre uma das linhas, escolha a camada, o estilo, a altura da fonte e a justificação e, em seguida, insira o texto em seu desenho, sem a necessidade de digitação. Uma vez que você pode escrever todos os textos corretamente nos arquivos, não haverá erros de ortografia em seus desenhos.
Coloque os textos em ordem alfabética para facilitar sua busca nas colunas.
A rotina é entregue com textos aleatórios, para que você os altere de acordo com as suas necessidades...

Esta rotina lista todas as camadas de seu desenho e faz uma contagem de todas as entidades de cada camada.
O resultado é escrito no arquivo "H:\GR-PACK-USB\Contagem-Entidades.csv" (onde o drive H pode ser outra letra), para ser aberto no EXCEL.

Com esta rotina você poderá digitar coordenadas de pontos (X Y Z) e salvá-los em um arquivo, que posteriormente poderá ser importado para o desenho da polilinha.
Também poderá optar por selecionar uma polilinha, e neste caso a rotina irá listar automaticamente todos os vértices da mesma, colocando a lista de pontos no quadro de diálogo.

Esta rotina solicita a seleção de uma polilinha, fechada ou não, e extrai suas propriedades, a saber:

• As coordenadas de seus vértices
• Os comprimentos de seus segmentos
• Os ângulos (no sistema AutoCAD©) destes segmentos.

Esta rotina solicita a máscara de um texto a substituir, um prefixo e/ou um sufixo para acrescentar aos textos equivalentes encontrados, e modifica todos os encontrados ou, caso seja solicitado verificar um a um, sòmente os expressamente informados...

Esta rotina solicita a máscara de um texto a alterar e um novo texto, onde parte pode ser equivalente à mascara fornecida.
Por exemplo, para alterar os textos abaixo:

• KM 123 para km 123
• PC 145 para km 145
• DT 300 para km 300
• AB 450 para km 450

@ significa um caracter alfa (uma letra), # um caracter numérico (algarismo) e o . (ponto) qualquer caracter não alfa-numérico.

Esta rotina permite calcular o volume a partir da informação das áreas de duas seções e da distância entre elas.
A unidade deve ser em metros, obrigatoriamente...

Esta rotina insere um bloco originalmente de dimenões 1x1x1 nas dimensões fornecidas no quadro de diálogo. Este bloco foi desenhado com 3DFACEs e as inserções destes blocos poderão ser listadas pela rotina EFPAC0056.
O objetivo de ambas é uma rápida quantificação de volumes semelhantes, sendo que seu uso depende da imaginação/criatividade do usuário...

Esta rotina conta os blocos inseridos pela rotina EFPAC0055 e lista suas quantidades pelas dimensões, alem de informar as maiores e menores dimensões (largura, comprimento e altura) destes blocos.

Esta rotina solicita a seleção de arcos, linhas, polylines e/ou lwpolylines (abertas), calcula o comprimento total de cada grupo de entidades, apresenta um quadro de diálogo no qual você deverá selecionar um tipo de material, que terá informações como área da seção e peso específico para então calcular o comprimento total e peso total destas peças.
Utilize para conhecer a metragem e peso total de um tipo de material a ser orçado: madeira, ferro, perfis, etc...

Esta rotina salva a vista atual, que você poderá restaurar a qualquer momento com o comando RVI.
É uma forma de agilizar o comando VIEW do AutoCAD©.

Esta rotina permite que você crie uma grande biblioteca de blocos com seus respectivos slides, mas necessita que você domine um pouco este assunto.
Entre na rotina e utilize o arquivo de ajuda da mesma. Leia cuidadosamente para entender o que deverá modificar e quais arquivos deverá incluir nos caminhos indicados, para que a rotina funcione adequadamente...

Utilize esta rotina para inserir setas indicativas de fluxo em arcos, linhas e polilinhas.
Ao fim da rotina você poderá escolher entre manter o sentido ou inverter os blocos inseridos...

Esta rotina permite determinar as áreas de corte ou aterro em um perfil representado por uma ou mais poligonais...
Preencha os parâmetros no quadro de diálogo e siga as instruções que aparecerão no prompt de comandos após sair deste quadro...

Esta rotina insere estacas sobre uma polilinha 2d, a partir dos dados informados no quadro de diálogo inicial.

Esta rotina solicita a seleção de uma polilinha tipo LWPOLYLINE fechada, extrai seus dados (coordenadas de vértices, comprimentos dos segmentos retos e em arcos, coordenadas dos centros de arcos, se houver). Estes dados serão escritos no arquivo MEMO_TEMP.DOC, para abertura no WinWord.exe.
Embora com extensão .DOC, este arquivo é originalmente um arquivo de texto, sendo aberto ao final da rotina no NotePad.exe do Windows.
Você deve então salvá-lo com outro nome, porque se a rotina for executada novamente com outra polilinha, os dados atuais serão perdidos.

Esta rotina calcula a área de polígonos fechados.
Preencha os parâmetros no quadro de diálogo e siga as instruções que aparecerão no prompt de comandos após sair deste quadro...

A rotina EFPAC0065 solicita a seleção de uma polilinha não suavizada, fechada ou aberta.
Feita a seleção, serão inseridos pontos nos vértices, que serão numerados sequencialmente.
Também serão inseridos textos com as dimensões dos segmentos retos bem como os valores dos raios dos arcos, se houver, além de pontos nas interseções das tangentes destes arcos.
Os azimutes dos segmentos retos serão sempre considerados na direção da criação da polilinha.

A rotina EFPAC006 gera o analítico da polilinha, enviando os dados para um arquivo de texto e desenhando uma tabela em seu desenho. Para ser usada em conjunto com a rotina EFPAC0065

Clique em "Escrever" para gerar o arquivo de pontos para o perfil ou, se este já estiver digitado, em "Perfil" para desenhá-lo.
O arquivo gerador do perfil pode ser feito em etapas, pelo software oferecido por esta rotina...

Esta rotina insere as cotas em polilinhas 2D, suavizadas ou não, abertas ou fechadas.
Não funciona com SPLINES.
O sistema de coordenadas deve ser obrigatoriamente o WCS e as polilinhas devem pertencer a planos paralelos ao plano X,Y deste sistema.

Esta rotina gira textos em 180 graus sobre seu ponto de inserção, se e sòmente se seus ângulos de rotação forem maior que 90 graus e menores que 270 graus, para torná-los legíveis.
Para desfazer, utilize o comando UNDO.

Esta rotina extrai os valores dos blocos atributados, podendo escrever um arquivo separado por tabulação para o Excel, ou para um arquivo .txt ou ainda gerar uma tabela em seu desenho, ou mesmo todas estas opções.

Os arquivos para Excel ou txt terão sempre o mesmo nome e endereço, portanto você deve salvá-los em outra pasta imediatamente após sua criação, pois em uma nova chamada da rotina eles serão reescritos...

Estes arquivos ficam na pasta ..\GR-PACK-USB\ATR\ do seu pendrive original e tem os nomes Atributos_Excel.csv e Atributos_Text.txt

O arquivo Atributos_Excel.csv é na verdade um arquivo de texto com formatação em tabulações. Abra-o no Excel e formate-o de acordo com a sua preferência.

Veja tambem a rotina EFPAC0003

Esta rotina solicita a seleção de um ou mais textos. Se selecionados, os mesmos serão apresentados em um quadro de diálogo no qual você poderá selecionar cada um deles e digitar um novo texto que, ao final da rotina, irá substituir o original.
Isto melhora a performance do comando DDEDIT.

Esta rotina permite:

• 1. Criar visores para a geração de comandos para zoom automático destes visores.
• 2. Criar as rotinas automàticamente, caso abra um desenho que já contenha estes visores.
• 3. Executar os zooms, bastando digitar C1, C2, C3, Cn, onde n é o número do visor.

Esta rotina cria e insere um bloco com o nome de EFPAC0073, no qual serão inseridos até 100 registros, cada um contendo 2 campos.
A rotina EFPAC0074 extrai estes dados, possibilitando escrever os mesmos em um arquivo para o Excel, para o Notepad ou Word (txt) ou ainda gerar uma planilha no próprio desenho.

Esta rotina complementa a rotina EFPAC0073.
Ela localiza os blocos "EFPAC0073 KITs" que tenham sido inseridos pela rotina EFPAC0073, pois estes obrigatoriamente conterão 1 ou mais registros com 2 campos (identificação e descrição).
Clones destas inserções serão também consideradas, mas caso você insira um bloco pelo comando INSERT do AutoCAD©, este não será considerado...

Esta rotina insere um bloco com 3 atributos e uma seta indicativa.
Os três atributos são:

• a. Uma descrição qualquer, podendo ser um texto vazio, se se teclar enter
• b. A coordenada Y do ponto clicado, representando o Norte
• c. A coordenada X do ponto clicado, representando o Leste

Esta rotina foi feita a pedido de um cliente, exatamente como solicitado.

Esta rotina insere visores de impressão no ambiente MODEL SPACE.
Estando no ambiente PAPER SPACE, chame a rotina EFPAC0077 para localizar estes visores e reconstruí-los neste ambiente...
O objetivo é enquadrar rapidamente porções de seu desenho, através de retângulos guia para a criação das janelas (MVIEW).

Selecione os visores de impressão na lista à direita. Eles estão listados de cima para baixo na ordem inversa de sua criação. Os visores selecionados serão colocados na lista à esquerda. Caso você queira refazer a lista, tecle o botão "Reset...".
Os visores selecionados serão colocados nos pontos que você fornecer, ou clicando com o mouse ou digitanto suas coordenadas...
Estes visores são MVIEWs nas dimensões dos retângulos inseridos no MODEL SPACE.
Após a sua criação, será efetuado um zoom Window nas dimensões do retângulo correspondente.

Utilize esta rotina para corrigir de forma automática os textos de Norte e Leste das inserções de blocos EFPAC0075
A rotina exige que o plano cartesiano ativo esteja com o UCS WORLD e a direção de extrusão em (0.0 0.0 1.0)
Caso não esteja, a rotina irá apresentar uma mensagem.
Altere para este plano com os comandos PLAN -> WORLD e UCS -> WORLD

Esta rotina transforma entidades 3DPOLY em LWPOLYLINES.
Serão mantidas as propriedades originais (camada e cor).
O valor da elevação será perguntado no decorrer da rotina, e o valor informado será aplicado a todas as novas entidades a serem criadas.
As entidades originais poderão ou não ser eliminadas...

A rotina EFPAC0080 cria um bloco temporário de um grupo de entidades selecionadas pelo usuário, insere este bloco em modo isométrico, purga o mesmo e o recria contendo somente um ponto.
Normalmente, os objetos selecionados devem estar rotacionados em 45 graus, embora isto não seja exigido. Para permitir esta rotação, é feita uma pergunta sobre este ângulo.
O bloco isométrico é inserido sem necessidade de ponto base, pois ele será imediatamente explodido e purgado, sendo então substituido pelo bloco contendo somente o ponto, acima descrito.

Esta rotina apresenta partes do curso E.Fernal de Autolisp, que é fornecido em cd.
São listadas uma série de subrotinas do AutoLISP e VisualLisp, com exemplos de utilização, para seu aprimoramento, caso ainda não domine esta linguagem.

Esta rotina permite escrever um arquivo .mnu para o seu AutoCAD©, com um pop-down e uma barra de ferramentas. Para isto, digite o nome do menu (sòmente letras, sem espaços), clique no botão "Ferramentas" e/ou no botão "Pop-Down".
Nos quadros seguintes, preencha os dados e retorne ao quadro principal.
Clique em "Prosseguir" para gerar o menu e para carregá-lo... Utilize as ferramentas do AutoCAD© para trocar os ícones da barra, caso esta tenha sido criada...

Esta rotina permite carregar um menu criado com a rotina EFPAC0082 desde que o seu arquivo fonte (.mnu) esteja na pasta H:\GR-PACK-USB\MNU\ (entenda H: como a letra que identifica do drive do PEN-DRIVE deste aplicativo).

Esta rotina abre um executável cuja finalidade é calcular a vazão de um vertedor, baseado em exemplo da página 101 do livro "Exercícios de Topografia", de autoria de Alberto de Campos Borges, 3a. edição, 9a. reimpressão, 1997, da Editora Edgard Blucher Ltda.

A rotina EFPAC0085 desenha uma malha de eixos na camada "Malha de Eixos".
Ajuste cor e tipo de linha através do comando LAYER.

Esta rotina insere um 'jumper' na interseção de duas linhas ou polilinhas, quebrando o segmento selecionado e inserindo um arco com diâmetro previamente informado no intervalo da quebra.

Esta rotina solicita a seleção de um grupo de textos (entidades 'TEXT') que tenham justificação normal, verifica a menor coordenada X deste grupo de seleção e então faz o alinhamento vertical destas entidades, considerando como coordenada X dos pontos de alinhamento o valor desta menor coordenada X encontrada.

Biblioteca de blocos para instalações elétricas : tomadas, campainhas, interruptores, chaves, etc...

Esta rotina cria vagas de estacionamento entre dois pontos clicados.
Caso a distância entre estes dois pontos seja insuficiente para inserir uma vaga, pelo menos uma será desenhada. Caso seja suficientes para mais vagas, estas serão inseridas. Um bloco chamado "CarroPadrao" será inserido em cada uma delas, e duas camadas serão criadas:

• 1. Estac_Faixas para as faixas demarcatórias
• 2. Estac_Carros para os blocos 'CarroPadrao'

As dimensões devem ser fornecidas sempre em centímetros, mas você poderá escolher desenhar em mm, cm ou metros, de acordo com o adotado em seu desenho.
Para escolher o tipo de vaga (perpendicular, paralelas ou inclinadas, clicar no botão "Outro tipo..."

Use esta rotina para inserir, especificar, verificar e quantificar chapas retangulares.
A rotina permite a geração de uma tabela das chapas inseridas.

Esta rotina trabalha em conjunto com a rotina EFPAC0092 e seu objetivo é permitir criar um banco de dados de rotinas .lsp, .fas, .vlx e/ou .arx que você porventura tenha em seu computador.
Uma vez que muitos usuários de AutoCAD© costumam armazenar arquivos baixados na internet, depois de um certo tempo este mesmo usuário já não sabe para o que serve ou, se sabe, às vezes não se lembra onde foram armazenados.
Portanto, usando estas duas rotinas você poderá gravar o path, o(s) nome(s) dos comandos criados por estas rotinas, bem como fazer uma descrição com até 600 caracteres em 5 linhas.

Assim ficará mais fácil para você gerenciar seus arquivos...

Esta rotina chama um executável que permite selecionar arquivos do tipo .LSP, .FAS, .VLX e/ou .ARX, digitar dados e inserir em uma tabela de dados.
Você pode selecionar quantos arquivos quiser.
Salve os dados antes de fechar o aplicativo.

Esta rotina cria um menu de ícones e lança uma barra de ferramentas com sòmente um ícone na mesma, para que o quadro de diálogo seja lançado.
Para utilizar, você deve antes definir uma pasta com uma subpasta chamada DWG e outra chamada SLB. Por exemplo, criada a pasta C:\CARROS, teríamos:

• C:\CARROS
• C:\CARROS\DWG
• C:\CARROS\SLB

Coloque os arquivos .DWG que farão parte desta biblioteca na pasta C:\CARROS\DWG

Agora execute a rotina EFPAC0093 de seu GRPACK
Os arquivos a serem inseridos neste menu de ícones deverão ser selecionados, após você selecionar o drive (C:\), digitar o nome da pasta (CARROS), e fornecer um nome para o menu (por exemplo, CARROS1).
Então bastará clicar Prosseguir e, no próximo quadro de diálogo, selecionar quais arquivos deverão fazer parte da biblioteca.
Isto se deve ao fato de que, neste mesmo endereço, você poder ter mais de uma biblioteca de ícones, tal como:

• C:\CARROS\CARROS1
• C:\CARROS\CARROS2
• C:\CARROS\CARROS3

etc...

Para cada biblioteca serão gerados os arquivos .mnl, .lsp, .mnu, .cui e .mnr necessários para a biblioteca. A barra de ferramentas de cada uma delas será automaticamente carregada para a tela, e todas terão um mesmo ícone, mas uma dica (tool tip) diferente, com o nome da biblioteca.

Esta rotina tem como complemento a rotina EFPAC0094, na qual você poderá definir as escalas em X e Y, bem como o ângulo de rotação do bloco.
Assim, não haverá necessidade de entrar com estes parâmetros na tela.
Entretanto, caso prefira no modo usual do AutoCAD©, basta nesta segunda rotina clicar no botão Reset para que estes parâmetros sejam eliminados e, assim, mudar o modo tradicional.

Como usar:

Esta rotina ajusta os parâmetros necessários para a inserção de blocos através das rotinas de menus de ícones criados pela rotina EFPAC0093 do GRPACK.
Para eliminar estes parâmetros e assim solicitar os mesmos pelo prompt de comandos clique o botão "Reset"
Os valores das escalas em X e Y devem ser ambos maiores que zero, mas o ângulo de rotação poderá ser um número entre -360.0 e 360.0

Esta rotina insere chaves em linhas e/ou segmentos retos de polilinhas 2D. Para isto, determine a dimensão da chave (default : 10.0). Em seguida, selecione a linha/polilinha na qual deseja inserir uma chave e, em seguida, clique sobre esta linha/polilinha na posição que deseja colocar a chave. O comando é contínuo, portanto ele irá pedir por outra (poli)linha. Para encerrar o comando, tecle ENTER

Esta rotina ajusta a escala em uma VIEWPORT, no ambiente PAPER SPACE.
Você deve informar se o desenho foi desenvolvido em mm, cm ou metros e e selecionar a escala desejada. Isto feito, prima o botão "Prosseguir".
Ajuste o desenho na VIEWPORT com o comando PAN, para que a escala escolhida não seja modificada...

Esta rotina solicita graus, minutos e segundos para rotação de objetos, mantendo estes valores na memória, para uma posterior reutilização do comando.
Deste modo você não necessita guardar os números, bastando confirmar pressionando o botão 'Prosseguir'

Esta rotina permite substituir um grupo de blocos previamente selecionados por outro, selecionado ou na tela ou na lista de nomes deste quadro de diálogo.

Esta rotina permite dividir uma área delimitada por uma polilinha fechada a partir de dados fornecidos em sequência, a saber:

• 1. Se a divisão será em n partes iguais ou a partir de uma área fixa.
• 2. Se a divisa entre esta nova área e a remanescente será paralela a uma linha ou se terá um fixo qualquer.

Para executar, haverá a necessidade de se clicar dois pontos, os dois os mais afastamentos possíveis da linha inicial de divisão, para que não haja a possibilidade se sobreposição desta linha (que será móvel, para ajuste da área desejada) sobre um destes dois pontos, caso em que será gerado um erro na rotina...
Para ver o vídeo desta rotina, entrar no internet e visitar a página

http://www.gr-acad.com.br/pacote/divarea.html

Esta rotina apresenta um quadro de diálogo no qual você deverá selecionar uma das imagens, clicando sobre a desejada. Isto definirá as posições das cotas horizontal e vertical a serem colocadas em conjuntos de 2 pontos. Informe o afastamento das cotas em relação ao ponto mais próximo do lugar da colocação das cotas. O estilo de dimensionamento a ser utilizado será o estilo corrrente.

Esta rotina insere uma polilinha representando uma fiação, com bitola e quantidade de fios previamente informados. Tambem é necessário informar a unidade do desenho, se em centímetros ou metros. Dados são inseridos nesta(s) polilinha(s), para uma posterior quantificação com a rotina EFPAC0111.

Esta rotina solicita a seleção de objetos em 3DSOLID e, se selecionado, calcula os dados do objeto, tais como volume, centroide, momento de inércia, etc... Se informada a densidade, calcula a massa. Permite escrever em um arquivo temporário estes dados, que podem então serem salvos com outro nome...

Esta rotina abre um executável externo para que você digite uma caderneta descritiva de uma poligonal, com rumos e distâncias. Depois de digitada a caderneta e salvo o conteúdo em um arquivo ASCII de extensão .RUM, execute a rotina EFPAC104 para gerar a poligonal no AutoCAD©. Se informadas as coordenadas UTM do ponto inicial (X Y) então a poligonal poderá ser desenhada com as demais coordenadas dos vértices também em coordenadas UTM.

Esta rotina gera a poligonal no AutoCAD©, a partir de um arquivo ASCII escrito e salvo com um executável externo chamado pela rotina EFPAC0103 do "Pacote de rotinas em pen drive" Se informadas as coordenadas UTM do ponto inicial (X Y) então a poligonal poderá ser desenhada com as demais coordenadas dos vértices também em coordenadas UTM.

Esta rotina abre um executável externo para que você digite uma caderneta descritiva de uma poligonal, com azimutes e distâncias. Depois de digitada a caderneta e salvo o conteúdo em um arquivo ASCII de extensão .AZM, execute a rotina EFPAC106 para gerar a poligonal no AutoCAD©. Se informadas as coordenadas UTM do ponto inicial (X Y) então a poligonal poderá ser desenhada com as demais coordenadas dos vértices também em coordenadas UTM.

Esta rotina gera a poligonal no AutoCAD©, a partir de um arquivo ASCII escrito e salvo com um executável externo chamado pela rotina EFPAC0105 do "Pacote de rotinas em pen drive" Se informadas as coordenadas UTM do ponto inicial (X Y) então a poligonal poderá ser desenhada com as demais coordenadas dos vértices também em coordenadas UTM.

Esta rotina insere símbolos com cotas de nível em corte. Para isto, forneça a cota inicial, e clique no ponto correspondente à esta cota para inserir o primeiro bloco. Em seguida, ao se clicar em pontos sucessivos a rotina calculará as diferenças de coordenadas Y e inserirá novos blocos com os níveis adequados...

Esta rotina insere um bloco de formato A1 padrão Incra, em complemento às rotinas EFPAC014 e EFPAC0106. Você poderá editar seus atributos posteriormente com os comandos ATE, DDATTE ou ATTEDIT do AutoCAD©

Esta rotina desenha a tabela MARCOS, AZIMUTES e DISTÂNCIAS a partir de um arquivo .AZM escrito com a rotina EFPAC0105. Ela criará o bloco atributado chamado EFPAC0109 e inserirá cada marco em uma linha, formando portanto uma única coluna. Você poderá dividir esta coluna única em tantas quanto quiser, pois os blocos são individuais...

Esta rotina solicita ao usuário uma série de pontos, clicados ou digitados. Nestes pontos inserirá uma entidade 'POINT' e uma entidade 'TEXT', numerados sequencialmente a partir de um número inteiro inicial fornecido em um quadro de diálogo, com altura também fornecida no mesmo quadro de diálogo. Ao se encerrar o fornecimento dos pontos, a rotina então solicita um ponto de inserção e desenha a tabela descritiva destes pontos. Caso você mova algum ponto depois de gerada a tabela descritiva, execute novamente a rotina EFPAC0110, porem utilize a opção "Atualizar" para que a tabela seja corrigida. Se você apagar algum ponto, a tabela não deletará o item correspondente, mas emitirá um aviso de bloco ausente...

Utilize esta rotina para quantificar os fios elétricos inseridos com a rotina EFPAC0101.

Esta rotina insere símbolos de Fase, Neutro, Retorno e Terra com até 10 deles, de acordo com uma lista composta através de um quadro de diálogo, no qual ao se clicar o botão correspondente o nome do símbolo será acrescentado a uma lista. O comprimento do traço que representa a Fase pode ser definido tambem neste quadro de diálogo e será salvo no registro, para que em um próxima rodada este valor se repita...

Esta rotina insere blocos de disjuntos monopolar, bipolar ou tripolar. Informe os parâmetros no quadro de diálogo da função e selecione o ponto de inserção.

Esta rotina insere um bloco com 4 atributos, a saber: 1. O código de identificação do objeto 2. A potência do objeto, em Watts 3. O número do circuito do objeto 4. A especificação do objeto Os atributos 2, 3 e 4 são invisíveis. Insira todos os blocos juntos aos blocos de elétrica fornecidos com o Pacote de Rotinas em Pen Drive e, ao final, execute a rotina EFPAC0115 para gerar o quadro de cargas...

Esta rotina gera uma tabela com um quadro de cargas a partir dos blocos inseridos com a rotina EFPAC0114.

Esta rotina apresenta um editor de memorial descritivo, visando agilizar a redação destes documentos. Seu funcionamento é muito simples, pois consta apenas de alguns campos de edição que verificam dados para azimutes, distâncias e marcos os quais, uma vez digitados, são compostos com parte do texto ao se pressionar um botão. Então são transferidos para outro campo de edição que, ao ser terminado, terá seu conteudo transferido para o texto final, bastando clicar em um botão de transferência. Uma vez salvo o arquivo com a extensão .mem, abra este arquivo no WordPad ou mesmo Word e formate-o de acordo as suas preferências...

Esta rotina constroi uma viga de aço em planta, dados os pontos inicial e final e informadas a largura da aba e espessura da alma.

Esta rotina desenha uma seção de viga (ou pilar) I ou H, em polilinha, de forma contínua. Defina as dimensões no quadro de diálogo e clique continuamente nos pontos de inserção destas vigas. Para encerrar a rotina, tecle ENTER.

Esta rotina constroi polilinhas de seções de perfis U, U duplo, U enrijecido e U enrijecido duplo, a partir de dados armazenados em arquivo externo. Você poderá inserir novos dados através da própria rotina...

Esta rotina insere um bloco identificador de uma quadra de lotes. O identificador deve ser um número inteiro maior que zero...

Para identificar os lotes de uma quadra, clique no bloco da quadra, previamente inserido com a rotina EFPAC0120. Informe o menor número dos lotes e clique seguidamente nas áreas internas de cada lote. Faça isto na ordem numérica crescente dos lotes. Verifique antes se a área de cada um deles não contem linhas, arcos ou círculos que constituam ou áreas internas ou subdivisões deste terreno, pois será utilizado o comando BOUNDARY do AutoCAD© para calcular a área e dimensões das divisas. Estas serão inseridas no ponto clicado e o identificador do lote será vinculado ao bloco identificador da quadra, para posterior geração de quadro descritivo da quadra.

Esta rotina deve ser utilizada para inserir os nomes de ruas e avenidas do loteamento, pois ela contem instruções especiais para a inserção de textos apropriados para o aplicativo...

Esta rotina solicita a seleção de um ou mais nomes de logradouros vinculados a uma quadra...

Esta rotina lista os números dos blocos identificadores válidos para quadras e, se selecionado um deles, efetua um zoom sobre o bloco identificador desta quadra.

Esta rotina lista os nomes válidos de logradouros, inseridos pelo aplicativo, e apresenta a quantidade de textos existentes em seu desenho. Para ser um nome de logradouro válido, o texto deve estar na camada "Gr-Acad-Memo-Logradouros" e deve pertencer ao estilo de texto "Gr-Acad-Memo-A", alem de possuir dados inseridos pelo aplicativo.

Utilize esta rotina para gerar a planilha descritiva dos lotes e quadras previamente inseridas com as rotinas do Pacote de Rotinas em Pen Drive.

Utilize esta rotina para verificar área de quadras trabalhadas com as rotinas do aplicativo.

Esta rotina abre um relatório dos lotes e quadras detalhadas pelo aplicativo.

Para saber como utilizar as rotinas de loteamento, veja o arquivo html com textos, imagens e videos explicativos...

Para visitar o site http://www.gr-acad.com.br e conhecer outros aplicativos deste autor...

A rotina EFPAC0131 solicita a seleção de arcos, de forma contínua e, a cada arco selecionado, insere um bloco com os seguintes dados:

• Norte : Coordenada Y do ponto central
  
• Leste : Coordenada X do ponto central
  
• Raio do arco
  
• Ângulo incluso, em GMS
  
• Comprimento do arco
  
• Comprimento da Tangente (distância das extremidades ao ponto de interseção entres as tangentes que passam por estes pontos das extremidades)

Esta rotina permite a inserção de estacas de fundação em uma planta de locação. Defina o diâmetro, a altura da fonte e o número inicial. Clique na ordem crescente (estaca n, n+1, n+3, n+n...) ou tecle ENTER para encerrar. Na próxima chamada, estes dados continuarão na memória. Você poderá confirmá-los ou ajustá-los para as inserções seguintes...

Esta rotina permite a inserção de blocos de fundação em planta. Informe as dimensões dos lados LA (em X) e LB (em Y), bem como a altura (LC) do bloco. Esta última só será utilizada para o atributo do bloco identificador que será colocado ao lado do bloco de fundação.

Esta rotina insere um pilar retangular em forma. Informe as dimensões dos lados e o número do pilar e, em seguida, clique no ponto central para inseri-lo.

Esta rotina solicita a seleção de textos e/ou mtext e insere um fundo colorido através de retângulo feitos com hachuras sólidas. Informe os parâmetros desejados no quadro de diálogo e, após sair deste quadro, selecione as entidades nas quais deseja inserir estes fundos coloridos.

Esta rotina faz um offset duplo de uma polilinha aberta, representando um curso d'água. Para executar, você deve informar (ou confirmar) os valores da faixa de proteção e do raio do círculo da cabeceira, no início da rotina. Então deverá selecionar uma polilinha, clicar no vértice da polilinha que corresponde à cabeceira e a rotina irá criar as polilinhas da faixa de proteção, inserir o círculo e, se possível, executar os trims e transformar tudo em uma só polilinha na camada "APP"

Esta rotina insere tubulões e base com um bloco identificador. Você deve informar o diâmetro do fuste em centímetros, a área da base em centímetros quadrados, o número inicial do tubulão e a altura da fonte (em valor absoluto). A rotina é contínua e irá acrescer a numeração em uma unidade a cada ponto de inserção fornecido. Para encerrar, teclar ENTER. Jamais encerrar uma rotina do Gr-Pack-Usb teclando ESC

Esta rotina foi solicitada por um usuário, para criar sólidos 3D a partir de objetos 3D desenhados em MESH, com o comando PFACE. Ela solicita 4 pontos, a saber: dois pontos representando a linha de base de uma das faces retangulares verticais do paralelepípedo a desenhar, um ponto sobre o vértice do qual o segundo ponto é a sua projeção no plano horizontal e, finalmente, um quarto ponto a partir do segundo. Será criado um 'path' entre estes segundo e quarto pontos, e será extrudado uma face retangular no qual a base será a distância entre os primeiro e segundo pontos e a altura a distância entre os segundo e terceiro pontos.

Esta rotina solicita as dimensões de um paralelepípedo, lados e altura. Clique no ponto central e o objeto será criado em 3DSolid. Rotacione o objeto fornecendo o ângulo de rotação, seja digitando o valor do ângulo ou clicando um ponto referencial.

Esta rotina solicita as dimensões de uma coluna: raio e altura. Clique no ponto central e o objeto será criado em 3DSolid.

Esta rotina fornece outra alternativa para inserção de estacas, com diâmetros de 20, 25, 30, 35, 40, 45 e 50 centímetros, conforme solicitação de um usuário. Insira as estacas e posteriormente utilize as opções Legenda, Tabela, Excel, etc.

Esta rotina permite alterar o ângulo de inserção de blocos e textos, no ângulo fornecido pelo quadro de diálogo, acrescido ou não de 90 graus, ou por um ângulo definido na tela, por 2 pontos clicados, se esta opção estiver assinalada. O comando é contínuo. Para encerrar, tecle ENTER sem selecionar um bloco ou um texto. Evite usar a tecla ESC para encerrar comandos...

Esta rotina permite verificar a área de uma polilinha que represente o perímetro de uma quadra. Esta deve ser inserida pela rotina EFPAC0120, que permite selecionar uma polilinha fechada já existente ou construi-la por uma série de pontos clicados em seus vértices.

Esta rotina utiliza o comando SWEEP do AutoCAD© para gerar tubos a partir de entidades do tipo LINE, ARC, CIRCLE, LWPOLYLINE, POLYLINE e HELIX. Informe o diâmetro do tubo e selecione as entidades que deverão servir como paths. Obs.: Estas entidades serão deletadas, caso os tubos possam ser criados

Esta rotina calcula a área de polilinhas fechadas de uma determinada camada. Para informar qual é esta camada, basta selecionar uma entidade que pertença à esta camada. O resultado será apresentado na página de textos do AutoCAD© com opção para escrever o mesmo em um arquivo de texto, que ficará na mesma pasta do arquivo dwg, com o nome de "Areas_EfPac0145.txt"

Esta rotina calcula o comprimento ou perímetro de entidades do tipo LINE, ARC, CIRCLE, POLYLINE, LWPOLYLINE e SPLINE.
Permite escrever o resultado de cada uma delas, se definida esta opção no início da rotina e se fornecido o ponto de inserção para o texto, após a seleção da entidade. Para encerrar o comando, tecle ENTER. Jamais encerre uma rotina com o botão ESC.

Esta rotina permite inserir um perfil metálico, viga ou pilar, em seção ou 3D, de acordo com os parâmetros preenchidos no quadro de diálogo.
Caso queira inserir entre dois pontos pontos conhecidos, clique no botão 2 pontos, clique no ponto de origem e, em seguida, no ponto final.
O comprimento medido será apresentado no campo correspondente.
Siga as instruções no prompt de comandos.

Esta rotina permite inserir textos com notação de vértices de acordo com as normas do INCRA.
Entre com o seu código de credenciado, o tipo de vértice e a numeração inicial.
Esta última se repetirá, bastando você alterar o último carater para um próximo vértice...

Esta rotina executa um software que permite identificar a versão do AutoCAD© na qual o arquivo DWG foi salvo, além de mostrar seu tamanho em bytes.

Esta rotina permite desenhar uma série de elementos estruturais em concreto prefabricado, a partir de dados catalogados ou digitados em quadros de diálogo próprio para cada caso.

Esta rotina permite eliminar vértices de polilinhas. Evidentemente, desde que esta polilinha possua mais de 2 vértices.
Selecione a polilinha JUNTO ao vértice a ser eliminado.
O comando é contínuo, portanto para encerrá-lo você deve teclar ENTER ao ser solicitado a clicar sobre a polilinha...

Esta rotina permite inserir novos vértices em polilinhas.
Clique sobre o trecho a partir em 2 segmentos e, em seguida, clique no ponto no qual deseja que este novo vértice seja inserido.
A rotina é contínua: para encerrá-la, tecle enter ao ser solicitado a clicar sobre um trecho da polilinha.

Esta rotina pede continuamente 2 pontos, calcula o rumo e a distância entre eles.
Então insere um texto com estes dados, com a altura da fonte conforme especificado no início da rotina.
O estilo de texto e a camada serão as correntes em seu desenho...
Veja também a rotina EFPAC0001 (Azimutes)

A rotina EFPAC0154 deve ser utilizada para extração de atributos de blocos.
Ela pede que o usuário clique em um bloco atributado e, se atendida, pergunta se o usuário deseja extrair todos os blocos iguais existentes no desenho ou se deseja selecionar um grupo deles.
Então envia dados para um arquivo de texto, como no exemplo abaixo:

Resultado para 10 blocos "CC" encontrados em
C:\Documents and Settings\Eduardo\Meus documentos\Drawing1.dwg
_____________________________________________________________________
	X		Y		Z
1 	1443.7862	1066.4099	0.0	1	B2	434
2	1439.1676	1071.5841	0.0	2	B2	34
3 	1433.7092	1076.6185	0.0	3	B2	43
4 	1424.612  	1077.1779	0.0	4	B2	435
5 	1429.6505	1070.0459	0.0	5	B2	437
6 	1425.0319	1075.2201	0.0	6	B2	439
7 	1419.5735	1080.2545	0.0	7	B2	500
8 	1410.4763	1080.8138	0.0	8	B2	600
9 	1426.0116	1086.5474	0.0	9	B2	700
10  	1421.393 	1091.7217	0.0	10	B2	800
_____________________________________________________________________
Fim do relatório

Esta rotina executa o script criado pela rotina EFPAC0155. Seu objetivo é purgar todos os arquivos dwg de uma determinada pasta, selecionada previamente com a rotina EFPAC0155.

Para rodar esta rotina EFPAC0156 você deverá fechar todos os desenhos exceto o corrente.

Observar que poderá haver erros se na pasta selecionada houver arquivos dwg salvos em uma versão acima da versão de seu AutoCAD©.

O autor não se responsabiliza por danos em arquivos, se:

• O usuário interromper o processamento teclando ESC ou qualqueroutra forma de abortar a rotina...
• Se houver uma queda de energia que cause interrupção do processamento.
• Se houver arquivos de versões superiores à versão de seu AutoCAD©.

Esta rotina permite partir uma dimensão em duas, bastando para isto selecionar a linha de cota e em seguida o ponto referencial a inserir.
Para que as duas novas cotas fiquem alinhadas é necessário que o ponto referencial esteja alinhado com os pontos definidores da cota original.

Utilize esta rotina para alterar o comprimento das linhas de chamada.
Selecione as entidades DIMENSION (cotas) e informe o comprimento desejado.
Todas elas serão alteradas de uma só vez...

Esta rotina insere continuamente entidades tipo POINT em pontos clicados.
Foi criada para permitir o uso contínuo do comando POINT do AutoCAD.
Os pontos serão inseridos na camada GR-PACK-USB-POINTS e poderão posteriormente ser identificados com a rotina EFPAC0029, que insere um bloco atributado com as coordenadas N, L e Cota (ou X,Y,Z)

Esta rotina complementa a rotina EFPAC0159, permitindo ligar, deletar, identificar e/ou gerar uma tabela descritiva destes pontos.
Caso a opção seja identificar ou gerar tabela, será pedida a altura da fonte...

Esta rotina permite escrever textos com molduras retangulares, circulares, oblongas, triangulares, pentagonais, hexagonais e/ou octgonais.
Para as quatro últimas o texto é limitado a 4 caracteres sem espaço, mas para as três primeiras não há esta limitação.
Após inserir o texto e a moldura a rotina solicita um ângulo para rotacionar texto e moldura (para esta última, sòmente se retangular ou oblonga).

Esta rotina foi criada para permitir a alteração da altura da fonte de atributos de um conjunto de blocos atributatos, de um mesmo tipo.
Caso o bloco tenha mais de um atributo e estes tenham alturas diferentes, todas as alturas passarão para a nova altura informada.
Serão mantidas as demais propriedades (ponto de inserção, camada, etc...)

Esta rotina foi desenvolvida para permitir a inserção de uma definição de blocos em múltiplos pontos, todos de uma só vez.
Existem 3 opções :

• clicar nos pontos de inserção
• selecionar entidades tipo POINT existentes
• importar coordenadas x;y;z de um arquivo .CSV

Esta rotina insere um bloco de tabelas de sapatas retangulares, com dados fornecidos através de um quadro de diálogo. Neste quadro você poderá inserir dados para quantas sapatas quiser.

Os dados são:

5. Altura do rodapé

Os valores não serão verificados quanto à impossibilidade de construção: isto será responsabilidade do usuário.

---

Utilize esta rotina para gerar um corte a partir de curvas de níveis que estejam desenhadas em polilinhas, abertas ou fechadas.
Você deverá ter uma linha (LINE) ou polilinha (LWPOLYLINE) representando a linha de corte.
As curvas de níveis deverão estar nas suas cotas (coordenadas Z) corretas.
Se a linha de corte for uma polilinha, esta poderá ter mais de um segmento, mas todos os vértices desta polilinha deverão ter uma distância crescente em relação ao primeiro vértice da mesma, isto é: a distância entre os vértices 3 e 1 deverá ser maior que a distância entre os vértices 2 e 1, ou seja:

D(Vn -> V1) > D(V[n-1] -> V1)

Uma rotina que soma, multiplica ou arredonda entidades do tipo 'TEXT', desde que representem números (ex.: 1.23 , -45.56 , 100 , -100 , etc).

Soma: Selecionados os textos numéricos, a rotina apresenta uma lista com os números selecionados e o resultado, na página de textos do AutoCAD©.

Idem para Multiplicação e/ou Soma.

Para arredondamento: Informe o número de casas decimais, entre 0 e 8. A rotina então ajustará as casas decimais destes textos numéricos para o número de casas informado. Se necessário, completará com zeros para atingir a quantidade desejada.

Exemplo:

Textos        	Para duas	Para cinco
originais     	casas         	casas

1.234         	1.23          	1.23400
5.87          	5.87          	5.87000
-100.1        	-100.10       	-100.10000
34.15555      	34.16         	34.15555
100.451       	100.45        	100.45000

Esta rotina gera uma tabela de coordenadas, a partir de pontos clicados sequencialmente ou a partir de polilinhas selecionadas, que podem ser do tipo 2 ou 3D
O modo de saída pode ser uma própria tabela no seu desenho ou então exportação para arquivos ascii, extensão TXT ou CSV ou ainda no formato XLS para abertura no Excel.

Uma rotina para desenhar faixas ao longo de um vetor definido por 2 pontos clicados pelo usuário.

Esta rotina exibe um quadro de diálogo no qual você define a altura da fonte, o número inicial e, opcionalmente, um prefixo para a descrição do objeto. Ao fechar o quadro, percorra o mouse passando sobre entidades 'POINT' para que um bloco identificador seja inserido. Caso um bloco do tipo definido pela rotina já tenha sido inserido neste ponto, não haverá nova inserção.

1: Subtrair N2 de N1 e colocar o resultado em N3
2: Somar N1 a N2 e colocar o resultado em N3
3: Dividir N1 por N2 e colocar o resultado em N3
4: Multiplicar N1 por N2 e colocar o resultado em N3

Esta rotina permite alterar 4 propriedades de textos iguais, nos ambientes MODEL e LAYOUTS. Você deve antes selecionar o modelo do texto a modificar. Serão conhecidas as propriedades altura, camada, cor e largura.
A rotina apresentará um quadro de diálogo no qual estas propriedades serão informadas. Você deverá indicar pelo menos um novo valor de qualquer uma destas propriedades, para que os textos sejam alterados. Você pode alterar uma, duas, três ou mesmo as quatro propriedades.

Esta rotina chama o aplicativo CONVERSOR.EXE. Ele permite converter números entre os sistemas binário, octal, decimal e hexadecimal.

Esta rotina chama o aplicativo Gr_NewNames.exe. Ele permite alterar os nomes de todos os arquivos de uma pasta selecionada para letras minúsculas, maiúsculas e/ou com nomes capitalizados.

Linha de interrupção com dimensões fornecidas pelo usuário.

Uma rotina para 'limpar' o desenho. Selecione as entidades a permanecer, o restante será deletado.

Utilize para desenhar ao mesmo tempo uma polilinha que signifique uma rede (água, elétrica, esgoto...). Você pode selecionar um bloco na pasta .:\Gr-Pack-Usb\180\ que será inserido em cada vértice desta polilinha. Cada segmento da polilinha será medido e um texto com esta dimensão será colocado no ponto médio deste segmento. Você deve informar a altura da fonte e a escala do bloco. Insira seus blocos na pasta referenciada: desenhe-os em metros e ajuste a escala para inseri-los ou em milímetros ou em centímetros, ou mesmo para alterar seu tamanho original.

Esta rotina oferece alguns blocos 3D free, obtidos na internet. Ressalte-se que na fonte de origem não consta nenhuma restrição contra o seu uso e/ou distribuição.

Esta rotina foi solicitada por um usuário do aplicativo.
Consiste em selecionar uma pasta para que seus arquivos sejam listados em um arquivo de texto,
como um relatório de envio para um cliente.
Este relatório escreve o nome do arquivo com até 60 caracteres.
Se o nome tiver mais de 60 caracteres, ele será truncado. O cursor é colocado no fim do nome,
para que você possa editar mais facilmente este arquivo, acrescentando versão, descrição
e data para cada um deles.
Estes dados poderiam ser obtidos nas propriedades dos arquivos, mas isto implicaria na obrigação
do usuário de alterar estas propriedades de todos os arquivos da pasta.

Esta rotina solicita a seleção de pontos (entidades POINT), com cotas (coordenadas Z) diferentes,
para fazer a triangulação com entidades 3DFace.

Esta rotina permite renomear arquivos de uma pasta selecionada.
Você deve digitar o texto a ser renomeado e o novo texto.
A rotina procurará pelos arquivos que contenham o texto a renomear e, se encontrados,
estes arquivos serão renomeados.

Esta rotina lista as definições de blocos em seu desenho e cria uma rotina com o mesmo nome do bloco selecionado, para que o mesmo seja inserido automaticamente ao se digitar seu nome no prompt de comandos do AutoCAD®, tal como um comando qualquer.
Defina se serão perguntadas as escalas e ângulo de rotação...

Esta rotina apresenta um quadro de diálogo no qual você informa o valor do deslomento na direção do eixo Z (elevação). Um valor positivo move a entidade para cima e um valor negativo, para baixo.
Não se aceitará o valor zero.
Sua finalidade é alterar as cotas de curvas de níveis, que podem ser em polilinhas (LWPOLYLINE e/ou POLYLINE) ou SPLINE.
Atenção: a rotina não verifica se as entidades selecionadas são coplanares. O plano cartesiano deverá ser obrigatoriamente o WCS. Se você estiver trabalhando com um UCS, deverá acionar antes o comando UCS e efetivar a opção WORLD.

Utilize esta rotina para mover curvas de nível desenhadas ou com polilinhas ou com splines coplanares para a elevação especificada por um texto com o nível da cota. Você deverá clicar primeiro no texto, para obtenção desta cota e, em seguida, no elemento que representa a curva de nível.
O comando é contínuo. Para encerrá-lo, tecle ENTER quando esta mensagem aparecer na tela.
À medida em que você for modificando, as cores das curvas serão alteradas, para que você saiba quais já foram modificadas.

Após selecionar uma polilinha 2d fechada, informe a altura da fonte e o espaçamento da malha de coordenadas.
A rotina não verifica se ambos os valores são adequados para a área selecionada.
Isto será de responsabilidade do usuário, portanto verifique antes as dimensões que melhor se ajustam à polilinha...

Esta rotina pede as dimensões horizontal/vertical de um retângulo e em seguida que o usuário forneça o vértice inferior esquerdo da janela.
Então faz um zoom desta janela, desenha um retângulo, corta (trim) as entidades que cruzem com a polilinha do retângulo desenhado e em seguida apaga as entidades que não estejam dentro do retângulo ou que não cruzem com suas arestas.
Finalmente, purga o desenho todo, depois de descongelar, ligar e destrancar todas as camadas existentes.
Seu objetivo é limpar um desenho geral para salvar como um mapa ou prancha. Para desfazer, utilizar o comando UNDO do AutoCAD©.

Esta rotina converte ângulos, a saber:

• de graus decimais para radianos
• de radianos para graus decimais
• de graus decimas para GMS
• de radianos para GMS
• de GMS para graus decimais
• de GMS para radianos

Esta rotina lê um arquivo de texto gerado por ET Leica TCR 805, com a formatação tipo NXYZD (Número, Coordenada X (ou Leste), Coordenada Y (ou Norte), Cota e Descrição.
Os campos devem ser separados por um espaço e o separador decimal deve ser um ponto (.)
Não deve haver separador de milhar.
Se houver pelo menos dois registros válidos, será desenhada uma poligonal 3D (3dpoly) em seu desenho.

Há a opção de se inserir a descrição (ao lado esquerdo de cada vértice) e/ou um bloco com as coordenadas de cada vértice.
Você deverá informar a altura do texto, iguais tanto para a descrição quanto para as coordenadas. O valor adotado pela rotina é de 0.10, mas você pode alterá-lo no quadro de diálogo inicial da rotina.
Textos e blocos serão colocados na camada Efpac0192 e a poligonal será desenhada na camada corrente.
Você deve aguardar pela mensagem final de encerramento, para que variáveis de ambiente modificadas possam ser restauradas.
Jamais interrompa esta rotina com o uso da tecla ESC.

Esta rotina restaura as dimensões originais de cotas que tenham sido editadas.
Selecione as dimensões que deseja restaurar por qualquer processo de seleção do AutoCAD, seja clicando ou por janela implícita ou explícita.

Esta rotina pretende inserir dados em entidades à escolha do usuário.
Será como um pequeno banco de dados, onde os dados estarão nas entidades.
Você deverá iniciar com a rotina EFPAC0194, na qual será definido o número de campos (de 1 até 10).
Definida a quantidade, preencha o nome de referência seguido dos nomes dos campos.
Em seguida, preencha os dados a inserir e clique na entidade.
A rotina EFPAC0195 recupera e informa os dados inseridos em uma entidade.
As rotinas EFPAC0196, EFPAC0197 e possivelmente outras estarão reservadas para
funcionalidades complementares para esta rotina.

Complemento da rotina EFPAC0194.
Recupera dados já inseridos em entidades quaisquer com a rotina EFPAC0194.

Uma vez definida uma tabela com a rotina EFPAC0194 e/ou inserido pelo menos um registro em seu desenho, esta rotina permite inserir novos registros ou, em havendo já pelo menos 1 registro inserido, gerar relatórios em formato html (que será aberto imediatamente após a sua criação), no próprio arquivo .dwg (uma tabela com blocos), ou em formatos .txt e/ou .csv. Também estes serão abertos após sua criação.
Se o arquivo .csv for aberto no Excel, você não poderá executar novamente a rotina para outra gravação desta tabela neste formato, pois o Excel estará usando o arquivo e isto irá gerar um erro.
Portanto, antes de atualizar, ou encerre o Excel ou feche o arquivo .csv.

Esta rotina permite editar as tabelas com os nomes dos campos para os bancos de dados criados com a rotina EFPAC0194
Isto tem efeito nas rotinas EFPAC0195 e EFPAC0196, que retornam dados, permitem alterar dados e gerar relatórios em diversos formatos, inclusive no próprio arquivo .dwg.

Esta rotina permite localizar uma entidade com dados inseridos pelas rotinas EFPAC0194 e/ou EFPAC0196, sob uma tabela definida pela rotina EFPAC0194.
Isto serve ou como uma tabela de banco de dados, podendo estes dados serem editados com a rotina EFPAC0197 e conferidos com a rotina EFPAC0195 ou como uma assinatura digital, caso a tabela do banco de dados contenham dados de sua empresa.
O video Efpac0194 exemplifica este último uso...

Esta rotina retira o registro inserido em uma entidade pelas rotinas EFPAC0194 e/ou EFPAC0196. Outros dados de aplicações de terceiros serão preservadas.
A rotina apresenta os dados do registro em um quadro de diálogo.
Assinale o campo de opção para que seja feita a limpeza, ao final do comando.

Permite selecionar uma barra de ferramentas do Pacote de Rotinas e exibi-la na tela.

A rotina EFPAC0201 solicita a seleção de uma ou mais entidades do tipo LINE,
POLYLINE (2 ou 3D) e LWPOLYLINE.
O objetivo desta rotina é ler as coordenadas dos vértices destas entidades, NA ORDEM DE SUA SELEÇÃO, e
então escrever estas coordenadas em um arquivo de texto no formato CSV para Excel.

Neste arquivo terá cinco campos:

1. O número do ponto (iniciado em 1, com sufixo P)
2. A coordenada X ou Leste
3. A coordenada Y ou Norte
4. A coordenada Z ou Cota
5. A descrição do ponto, que você poderá ou inserir no arquivo, no Excel.

Editado e salvo o arquivo (no mesmo formato .CSV), você poderá utilizar a rotina EFPAC0202 para,
a partir deste arquivo, desenhar uma única 3dPoly, inserindo (ou não, é opcional) dados
para cada vértice, a saber:

1. O número do ponto
2. As coordenadas
3. A descrição

A rotina permite a inserção de 1, 2 ou 3 dados acima, ou ainda nenhum deles.

---

A rotina EFPAC0202 utiliza um arquivo .CSV gerado pela rotina EFPAC0201
para desenhar uma 3dPoly, com inserção ou não de blocos identificadores
de cada vértice.
Este arquivo será sempre salvo na pasta "x:\Gr-Pack-Usb\Pts\" com o nome de "_3dPoly.csv".
(Substitua o "x" acima pela letra do drive do Pen Drive em seu computador)
Se for necessário preservar este arquivo, salve-o com outro nome, no seu disco rígido,
pois em caso de nova chamada da rotina EFPAC0201 ele será reescrito e os dados anteriores serão perdidos.

---

Esta rotina permite inserir um formato preexistente na pasta x:\Gr-Pack-Usb\For\, 
desenhado em milímetros, com uma escala informada.
Se o bloco tiver atributos, após a sua inserção será aberto o quadro de edição padrão do AutoCAD,
para que você insira os valores desejados.
Insira quantos formatos quiser na pasta referida, mas sempre desenhados em Milímetros.

---

Esta rotina solicita a seleção de 3 pontos, representando os vértices A, B e C de um polígono 
A, B, C e D, onde AB = CD e BC = DA
Então a rotina calcula a área deste polígono e mostra a mesma em um quadro de diálogo, no qual você pode
informar os dados necessários de dois modos:

1. Inserindo o número de lotes
2. Inserindo a área desejada para cada lote

Preencha o campo de edição da opção desejada e clique no botão "Calcular" ao lado.
Clique no botão "Prosseguir" para dar continuidade à rotina.

---

Esta rotina cria lotes a partir da seleção de 4 pontos de um polígono e informada a área (em m2) desejada.
Será colocado um texto no centro do lote, com o número do mesmo. Veja o vídeo explicativo Efpac0206.

---

Esta rotina existe no Gr-Arqui há bastante tempo, e foi colocada no
Pacote de Rotinas em Pen Drive por achá-la adequada para este aplicativo.
Basta deslocar o cursor do mouse sobre a entidade a verificar e pausar sobre esta entidade.

Para verificar outra, repita o procedimento.
Tecle uma letra qualquer para encerrar.

---

Esta rotina serve para recriar blocos com todas as suas entidades na camada 0 (zero) e com cores ByLayer.
Permite assim limpar o seu desenho de intermináveis nomes de camadas e cores, quando se utiliza blocos
de terceiros que, embora bons na forma, são perversos no conteúdo, enchendo o desenho com estes nomes
e utilizando cores indesejadas.
Todos os blocos já inseridos são automaticamente alterados, pois trata-se na verdade de uma redefinição
do bloco, com todas as suas entidades...
Basta selecionar o bloco para que a rotina faça o trabalho.

---

Esta rotina permite calcular a distância de um ponto sobre uma polilinha aberta até as suas extremidades.
Selecione a polilinha e em seguida o ponto sobre a mesma.
O resultado será apresentado em um quadro de diálogo e impresso na tela de textos do AutoCAD©.

Esta rotina permite numerar os vértices de polilinhas bem como inserir setas indicativas do sentido na qual estas
polilinhas foram desenhadas.
Defina os valores numéricos no quadro de diálogo e em seguida clique continuamente nas polilinhas a processar.
Para encerrar, tecle ENTER. Jamais encerre uma rotina do Pacote de Rotinas com a tecla ESC.

Esta rotina desenha um estribo helicoidal, calcula seu comprimento real e gera o desenho 2D do mesmo.
As dimensões devem ser fornecidas em cm.
Tambem o comprimento da barra será fornecido em centímetros, para compatibilidade com a rotina
geradora de lista de ferros do Gr-Acad (vide em http://www.gr-acad.com.br)

Esta rotina desenha um estribo circular, calcula seu comprimento real e gera o desenho 2D do mesmo.
As dimensões devem ser fornecidas em cm.
Tambem o comprimento da barra será fornecido em centímetros, para compatibilidade com a rotina
geradora de lista de ferros do Gr-Acad (vide em http://www.gr-acad.com.br)

Esta rotina desenha um tubulão em elevação, com sua armação.
Preencha os dados no quadro de diálogo, clique em Validar para checagem de dados.
Se OK, clique em Desenhar e forneça o ponto central do fuste, para geração do desenho.

Esta rotina cria uma malha de coordenadas em uma poligonal definida ou por polilinha fechada, círculo
ou por uma série de pontos clicados.
Preencha os dados no quadro de diálogo e siga as instruções no prompt de comandos.

Esta rotina insere um 'CallOut', fornecido dois pontos opostos, como no comando RECTANG do AutoCAD©.
A inserção é feita na camada corrente.

Utilize esta rotina para inserir o estaqueamento em entidades do tipo ARC, LINE, POLYLINE e/ou LWPOLYLINE.
Serão inseridos entidades do tipo POINT e TEXT

Utilize esta rotina para inserir o estaqueamento em entidades do tipo ARC, LINE, POLYLINE e/ou LWPOLYLINE.
Serão inseridos entidades do tipo BLOCK e TEXT

Esta rotina pede a seleção de uma polilinha que contenha arcos e insere pontos nos centros destes arcos.
Se a polilinha não tiver arcos, nenhuma ação será executada.