Code:
(defun c:DPH()(asave)(command "-layer" "m" "center" "lt" "center" "" "c" "8" "" "m" "pipe" "lt" "continuous" "" "c" "4" "" "")(command "MLINE" "S" "21.34" PAUSE PAUSE "")(command "explode" "l")(command "offset" "10.67" pause pause "" )(command "change" "l" "" "p" "la" "center" "c" "bylayer" "lt" "bylayer" "" "")) 
 
(defun c:DP3F()(asave)(command "-layer" "m" "center" "lt" "center" "" "c" "8" "" "m" "pipe" "lt" "continuous" "" "c" "4" "" "")(command "MLINE" "S" "26.67" PAUSE PAUSE "")(command "explode" "l")(command "offset" "13.34" pause pause "" )(command "change" "l" "" "p" "la" "center" "c" "bylayer" "lt" "bylayer" "" ""))
Help to make Pipe in 2d double line