I am trying to preparedmy 1st lisp in my life in command and draw Equal Tee I wrote Like this for 4" Equal Tee without Wall Thickness
(defun c:DET4()(asave)(command "PLINE" PAUSE "@114.30<270" "@210<0" "@114.30<90" "@47.85<180" "@47.85<90" "@114.30<180" "@47.85<270" "C"))
But Whenever i try this lisp i have to zoom small area and insert than it will come proper other wise it come in one pline.
I know you are the king of experts. please help me. & give some gide line to make Lisp for Single line/Double Line Pipe (without Wall thickness), Single line/Double Line Elbow (90°LR, 90°SR, 45°LR) (with center line), Single line/Double Line Tee/Reducing Tee (with center line), Reducer (Concentric, Eccentric [Flat Side-up or Flat side Down)(with center line), Weldneck Flange, Socket weld Flange, Blind Flange (Ansi B16.5 & B16.47A, B)(75#, 125#, 150#, 300#, 400#, 600#, 900# 1500#, 2500#), Valves with small to big size& all Ratings (Gate, Globe, Ball, Plug, Butterfly, Diapharm), Steel section plan & elevations, Civil works 2d door/windows And Electrical symbols.
I need your help& guidline to complete my all lisp. After Completing my lisp i will post also.