hi everyone
,
;; can somebody give me some help with this simple lisp i did,,,
;; im not so good at it as im new to it, but im very willing to learn.
;; here it is.
;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; this routine will purge, image detach, zoom & start plot;
;
(prompt "\n use command:pizp")
(defun c:pizp ()
(setvar "cmdecho" 0)
(command ".-layer" "s" "0" "" "")
(command "tilemode" "0")
(command "pspace")
(command "zoom" "all")
(command "-image" "d" "*" )
;; can anyone show me how to fixed this line as when the drawing has no image it return with error, can this line check the drawing for any image/s and if "found" detach them, if "none" exit image command and proceed with the next task. (command "-purge" "all" "" "n")
(prompt "\nPurging #1")(terpri)
(command "-purge" "all" "" "n")
(prompt "\nPurging #2")(terpri)
(prompt "...done")(terpri)
;; is there a string to ensure that all the above run and finish completely before invoking the "plot" command, as right now when i type in "pizp" it go straight to plot, dunno if the above is already completed. (command "plot")
;; i need this to show me the standard plot configuration table and not the command line plot.(princ))
;;;;;;;;;;;;;;;;;;;;;;;;
thank you in advance
,
excuse my grammar