EXPLODE /* selecionar ponto do interior do pentagono */ PE /* PEDIT */ /* selecionar linha do pentagono */ JOIN /* selecionar as outras linhas do pentagono */ LA /* LAYER */ /* selecionar pentagono */ PE /* repetir os passos do pentagono no triangulo */ ST /* STYLE */ /* new; style name: sistemas; font name: garamond; set current */ DTEXT /* selecionar ponto abaixo do quadrado */ 0.005 /* escrever "Quadrado" */ PROPERTIES /* text: 0.007 */ M /* MOVE */ /* mexer quadrado para local desejado */ CO /* COPY */ /* selecionar texto "Quadrado", colar nos restantes poligonos e escrever o nome correto */ DIMSTY /* DIMSTYLE */ /* standard; new; new style; name: sistemas; symbols and arrows; arrowheads; first: architectural tick */ /* text; text style: sistemas; text alignment: aligned with dimension line; text placement; vertical: above */ /* fit; scale for dimension features: use overall scale of 0.001 */ /* primary units; precision: 0.000; suffix: m; decimal separator: comma */ DIM /* ligar F3 */ /* selecionar cantos superior e esquerdo do quadrado */ /* clicar algures no meio onde queremos que fique a linha de cota */ DIMSTY /* modify; fit: 0.03 */ E /* ERASE */ /* apagar a cota */ LA /* new layer "cotas"; cor: 252; tornar ativa */ DIM /* repetir o passo DIM anterior */ DIMSTYLE /* modify; text; text color: 100 */ LA /* layer do "texto"; cor: 6 */ DIM /* selecionar cantos inferior esquerdo e direito (fazer a cotagem diagonal) */ DIM A LINE /* selecionar lado inferior esquerdo do triangulo (fazer amplitude do angulo interno) */ DIM /* selecionar circulo (raio) */ (command "DIM") HOR /* selecionar ponto lateral esquerdo do pentagono e ponto superior e escolher posicao da linha de cotas */ CON /* selecionar terceiro ponto */ DIM ALI /* selecionar canto inferior esuerdo pentagono e ponto superior e escolher zona de cotagem */ (command "DIM") VER /* selecionar ponto superior pentagono e ponto inferior direito */ PAGESETUP /* modify; plot style table (pen assignments): acad.ctb; edit; properties; color 1; color: black; lineweight: 21100mm */ /* fazer o mesmo para dores ate 6 e 252 mas com outras espessuras */ /* display plot styles */ PRINT (PLOT)