![]() ![]() (setq (list nil "ANGLE VALVE" "BALL VALVE WITH BLEED VALVE" "BALL VALVE" "BUTTERFLY VALVE" "CHECK VALVE" "BUTTERFLY ON-OFF VALVE" "DIAPHRAGM VALVE" "GATE VALVE WITH BLEED VALVE" "GATE VALVE" "GLOBE VALVE" "NEEDLE VALVE" "PLUG VALVE" "ROTARY VALVE" "THREE-WAY VALVE" "THREE-WAY BALL VALVE" "FOUR-WAY VALVE") (if (not (member msg '("Function cancelled" "quit / exit abort"))) ![]() (defun c:manualvalves (/ Dcl_Id% Folder$ Slide1$ Slide2$ Slide3$ Slide4$ Slide5$ Slide6$ Slide7$ Slide8$ Slide9$ Slide10$ Slide11$ Slide12$ Slide13$ Slide14$ Slide15$ Slide16$ X# Y# ss a1 a2 a3 p2 p3 insertpt1 osm *error*) Have fun adapting this for your own needs/blocks. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |