Optimizing Workflow with Loop Controls and Data Management

[maahee]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CASE 1
(setq ss (ssadd))
(if (not (ssmemb n ss))
  (ssadd n ss)
;code
);if


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



CASE 2

(setq flag T)

  (while flag
    (setq obj (ssget "_:S"))
    (cond
      (obj
       ;CODE
      )					;ar
      (t
       (princ "\nNo selection made.")
       (initget "X")
       (setq
	 bm (strcase
	      (getstring
		"\nEnter 'X' to exit or press Enter to continue [X]: "
	      )
	    )
       )
       (if (= bm
	      "X"
	   )
	 (setq flag nil)		; Exit the loop if user types 'x'
	 (princ "\nInvalid input. Please try again.")
       )				;if
      )
    )
    );WHILE
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

CASE 1: If the dataset is large, it will slow down the process. alternatives or tricks.

CASE 2: Press the Enter key once to continue the loop, and press it twice to exit.

or 

Only the letter "x" and empty inputs are acceptable.

[mhupp]

I'm not quite sure what your asking to optimize. 

[maahee]

@mhupp

Case 1: I want to reduce the time. I use the "not (ssmemb n ss)" function, but it takes a long time when the selection set is large.

case 2: Press the Enter key once to continue the loop, and press it twice to exit. ( empty selection set handle)

The above two cases do not relate to each other. Please

Edited 1 hour ago by maahee

[mhupp]

I understand what your asking for in case1 case2. I am asking is why your using them. might be a better optimization in how your selecting things. just asking for a higher level of what your trying to do.