Filtar textos

Ver el tema anterior Ver el tema siguiente Ir abajo

Filtar textos

Mensaje por amc.dicsac el Miér Sep 07, 2016 5:57 pm

Hola que tal nesecito su ayuda porfavor, tengo el siguiente lisp que me permite filtrar textos por ejemplo si tengo los siguientes textos H: 1.20m yo solamente lo abrevio en el lisp y lo pongo de la siguiente forma H: * y así sucesivamente pero ahora da la casualidad que quiero filtrar el siguiente texto Ø15 y no se como lo puedo filtrar.

[code](defun c:MECANICO ( )
(setq sspases (ssget "_X" (list (cons 0 "TEXT,MTEXT") (cons 1 "H: *,SUBE *,SUBEN *,DUCTO *,TERRAJEADO *,VIENE *,TUBERIA,LLEGA,RR *,DIF *,RE *,*X*,LLEGA *,EXTRACCION *,RS *,BAJA *,* S.N.P.T,DIFUSOR *,* CFM,* MBH,BAJAN *,* GPM,*
TR,*gpm*,*R.P.*,*R.E.*,*cfm,*kg"))))
(sssetfirst sspases sspases)
(princ))[/code]

avatar
amc.dicsac

Mensajes : 77
Fecha de inscripción : 17/03/2016
Edad : 26
Localización : Lima - Perú

Ver perfil de usuario http://axprogramlisp.blogspot.pe/

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 12:23 am

Hola

Yo cuando quiero agregar el simbolo de diametro y el 5 utilizo esto...

Código:
(strcat (chr 0248)(chr 53))

si este codigo lo tecleas en la linea de comando vas a obtener el simbolo de diametro y el numero 5....
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 12:46 am

Ahora si la intencion es seleccionar algun numero que contenga el simbolo de diametro, pues entonces yo utilizo este codigo....checalo...

Código:
(sssetfirst nil (ssget "_X" '((0 . "*TEXT") (1 . "*%%C*"))))
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 12:54 am

Ahora finalmente lo acomode de la siguiente manera:

Código:
(defun c:MECANICO ( )
(setq sspases (ssget "_X" (list (cons 0 "TEXT,MTEXT")
(cons 1 "H: *,SUBE *,SUBEN *,DUCTO *,TERRAJEADO *,VIENE *,TUBERIA,LLEGA,RR *,DIF *,RE
*,*X*,LLEGA *,EXTRACCION *,RS *,BAJA *,* S.N.P.T,DIFUSOR *,* CFM,* MBH,BAJAN *,* GPM,*
TR,*gpm*,*R.P.*,*R.E.*,*cfm,*kg,"))))
(sssetfirst sspases sspases)
(princ)

(sssetfirst nil (ssget "_X" '((0 . "*TEXT") (1 . "*%%C*"))))

)

Checalo haber si te sirve

y lo comentas.

Saludos
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 2:54 pm

Ahora bien, como noté que el codigo que puse no esta completo entonces aqui pongo el mismo pero con un  pequeño ajuste, haber si asi te sirve, es posible que alguien pueda dar una mejor opinion, pero yo puedo contribuir con esto.

Codigo:

Código:
(defun c:MECANICO_01 ( )



(setq sspases (ssget "_X" (list (cons 0 "TEXT,MTEXT")

(cons 1 "H: *,SUBE *,SUBEN *,DUCTO *,TERRAJEADO *,VIENE *,TUBERIA,LLEGA,RR *,DIF *,RE

*,*X*,LLEGA *,EXTRACCION *,RS *,BAJA *,* S.N.P.T,DIFUSOR *,* CFM,* MBH,BAJAN *,* GPM,*

TR,*gpm*,*R.P.*,*R.E.*,*cfm,*kg,"))))



(sssetfirst sspases sspases)

(princ)
)

(defun c:MECANICO_02 ( )
(sssetfirst nil (ssget "_X" '((0 . "*TEXT") (1 . "*%%C*"))))

(princ)
)

Por lo tanto si quieres filtrar solo los textos que tu listaste en tu lisp pues corres el comando MECANICO_01
Pero si solo quieres filtrar los textos con el simbolo de Diametro pues corres el comando MECANICO_02

Ahi nos comentas haber como te fue

Saludos
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por amc.dicsac el Jue Sep 08, 2016 4:26 pm

Hola "saulo2016" gracias por la ayuda fue util, solamente basto con añadir el codigo "%%C*" a mi lista.

Me queda otra duda no se si se podran filtrar el siguiente texto 11"x12" tanto el número como las pulgadas, esta leyendo un poco y no si con la función wcmatch me puede ser util, lo malo es que no se como aplicarla al lisp anterior
avatar
amc.dicsac

Mensajes : 77
Fecha de inscripción : 17/03/2016
Edad : 26
Localización : Lima - Perú

Ver perfil de usuario http://axprogramlisp.blogspot.pe/

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 9:14 pm

Ok, es que yo pense que lo quq necesitabas era filtrar lo del simbolo de Diametro intependiente de los textos....

Bueno, ahora trata de incluir

(*\")

para ver como se comporta lo del simbolo de pulgadas...

y nos cuentas como te fue



saludos
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 9:39 pm

oye amigo
estoy observando que en tu listado tienes algo asi

*X*

y si en el plano tienes 11"X12"....te lo va a filtrar, pues depende de la X....
entonces dejame ver como solucionar lo de las comillas para las pulgadas...
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por saulo2016 el Jue Sep 08, 2016 9:44 pm

Ya esta!!!

solo debes incluir

*\"

, sin los parentesis...y vualaaaa!!!


checalo y nos dices


saludos
avatar
saulo2016

Mensajes : 99
Fecha de inscripción : 17/03/2016
Edad : 51
Localización : Monterrey, Nuevo León, Mexico

Ver perfil de usuario

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por amc.dicsac el Vie Sep 09, 2016 7:40 pm

saulo2016 escribió:Ya esta!!!

solo debes incluir

*\"


, sin los parentesis...y vualaaaa!!!


checalo y nos dices


saludos

Hola "saulo2016", mil gracias por la ayuda funciono perfecto..!!!
avatar
amc.dicsac

Mensajes : 77
Fecha de inscripción : 17/03/2016
Edad : 26
Localización : Lima - Perú

Ver perfil de usuario http://axprogramlisp.blogspot.pe/

Volver arriba Ir abajo

Re: Filtar textos

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.