Ney_Paula

Rotina exemplificando a seleção com (SSGET "_F" ...) invertido (DEFUN C:ORDER-SEL () (setq LIST_PT (list '(-1 1 0) '(1 1 0))) (setq SEL_LINES (ssget "_F" LIST_PT)) (setq CONTADOR 0) (while (< CONTADOR (sslength SEL_LINES)) (setq LINHADAVEZ (ssname SEL_LINES CONTADOR)) (alert "A seguir vou deletar a linha na sequencia") (command "erase" LINHADAVEZ "") (setq CONTADOR (+ CONTADOR 1)) ) )

About

Username
Ney_Paula
Joined
Visits
61
Last Active
Roles
Member

Activity

  • Ney_Paula

    Rotina exemplificando a seleção com (SSGET "_F" ...) invertido

    (DEFUN C:ORDER-SEL ()
    (setq LIST_PT (list '(-1 1 0) '(1 1 0)))
    (setq SEL_LINES (ssget "_F" LIST_PT))
    (setq CONTADOR 0)
    (while (< CONTADOR (sslength SEL_LINES))
    (setq LINHADAVEZ (ssname SEL_LINES CONTADOR))
    (alert "A seguir vou deletar a linha na sequencia") (command "erase" LINHADAVEZ "")
    (setq CONTADOR (+ CONTADOR 1))
    )
    )

    June 2020
  • Ney_Paula

    Prezados,

    Estou tentando resolver uma provável incompatibilidade entre o Bricscad e o Autocad na seleção pelo (SSGET "_F" ....)

    Para facilitar o entendimento fiz uma rotina apenas para exemplificar: desenhei manualmente 4 linhas verticais e a rotina irá apagar as linhas da esquerda para a direita. As linhas  serão selecionadas através do (SSGET "_F" list-pts), onde a variável list-pts é uma lista de pontos que cruzam as linhas e estão ordenados  da esquerda para direita. 

    Quando executo a mesma rotina com o mesmo DWG no Autocad a ordem das linhas selecionadas está da esquerda para direita, enquanto no Bricscad está da direita para esquerda. 

    Sei que poderia testar previamente a  plataforma e depois decidir com "IF" qual a ordem a usar. Mas quero uma solução global,  sem precisar testar a plataforma, pois tenho diversas rotinas com esse processo de seleção.

    Gostaria de saber se alguém já teve esse problema ou eu estou deixando passar algum detalhe.

    Obrigado

    Ney Paula

    June 2020
Default Avatar

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!