. 1 ;;; - ACET sysvar- SET 2 ;;; Función: el valor de la variable de sistema, devuelve una lista, cada elemento de la tabla de las variables del sistema ACET-sysvar-set antes de la función de edición previa almacenada valor original, finalmente, un último elemento modificado indica el valor anterior de la variable de sistema 3 ;;; sintaxis: (ACET-sysvar- SET '( "sysvar" valor "sysvar" ... valor)) 4. ;;; EG: . 5 (acetosella sysvar- SET (Lista "CMDECHO" 0)) . 6 . 7 ;;; - ACET sysvar- restaurar 8. ;;; función de rendimiento: restaurar las variables del sistema 9 ;;; sintaxis: (ACET-sysvar- restaurar ) 10 11. ;;; SS-redibujo-ACET 12 es ;;; función de rendimiento: similar a volver a dibujar, redibujar pero los parámetros de nombres de entidad, conjunto de parámetros ACET-ss-redibujo para la selección de 13(Ss ACET-ss-redibujo 1 ); una pantalla 14 (ACET-SS-el redibujo SS 2); Ocultar 15 (ACET-SS-el redibujo SS 3.); Resaltada 16 (ACET-SS-la SS redibujo 4.); No resaltado . 17 18 es ;;; ACET-conseguir-UCS 19. ;;; función de rendimiento de: obtener una corriente de la UCS 20 es ;;; sintaxis: (UCS-conseguir-ACET nil) 21 es ;;; valor de retorno de una mesa, tres tablas elemento es de tres puntos, un primer punto de origen, el segundo punto en el eje X positivo desde el origen hasta el punto 1, y el tercer punto sobre el eje y la distancia positiva desde el punto de origen para el eje 1 22 es 23 es ;;; ACET-nuevo nuevo SS- 24 ;;; sintaxis: (setq SS (SS-new new-ACET (CAR (entsel)))) 25 ;;; devuelve un valor de un conjunto de selección, el conjunto de elementos seleccionados patrón de la figura para el documento después de que los elementos de los parámetros de la base de datos (excluido) elemento 26 es ;;; (defun nuevo nuevo-SS-ACET (ename /) ...);Ent nueva nueva SelectionSet con el Crear 27 ;;; la SS-NEW-de ACET -> Selección ACETUTIL.FAS Crea SET se inicien ENT 28 29 ;;; (ACET-nombre-tabla-List "Capa") 30 ;;; devuelve una tabla , cada elemento en la tabla es una cadena, la cadena del nombre contenido de la capa presente en la Fig. 31 es (tabla-ACET-nombre-List "LTYPE") 32 (tabla-ACET-nombre-List "estilo") 33 es (ACET Lista-nombre - tabla "DIMSTYLE") 34 es (tabla-ACET-nombre-List "Block") 35 ;;; versa 36 37 [ ;;; (ACET-currentviewport-ename) 38 es ;;; Si esta pestaña se modelo, devuelve nil 39 ;;;Si la pestaña de diseño actual para volver a la disposición de los nombres de entidad 40 41;;; (ACET la vista - Frozen-Layer-List (ACET-currentviewport-ename)) 42 es ;;; devuelve una tabla en la que cada elemento es una cadena, la cadena de los contenidos actuales de la disposición ha sido congelada nombre de la capa 43 es 44 es ;;; relación es la misma para ambas cadenas 45 ;;; (ACET-STR-igual "C" "C") 46 es 47 ;;; como C # formato de marcador de posición 48 ;;; (ACET-STR- el formato "\ n-Layers han se han aislado. 1%. 2% es la capa actual." (Itoa (longitud LAYLST)) LAY)