I am seeking the routine DIMBAL.LSP before it was modified. I know there is a thread on this forum where the routine was modified. I seek the orginal, however I do seek a way to modify one of the arrow heads to match the normal solid fill arrowhead in Autocad rather than the one offered in the program. I believe the following is the routine for the arrowhead I speak of......
((= %e 6)
(setq pt1 (polar %a (+ (angle %a %b) (* pi 0.5)) (* %c 0.5))
pt2 (polar %a (+ (angle %a %b) (* pi 0.5)) %c)
) ;_ end of setq
(command "arc" %a "_c" pt1 pt2)
(if (/= 1 (abs bci_use_force))
(command "change" (entlast) "" "p" "la" %f "")
)
(setq pt1 (polar %a (- (angle %a %b) (* pi 0.5)) (* %c 0.5))
pt2 (polar %a (- (angle %a %b) (* pi 0.5)) %c)
) ;_ end of setq
(command "arc" %a "_c" pt1 pt2)
(if (/= 1 (abs bci_use_force))
(command "change" (entlast) "" "p" "la" %f "")
)
)
Any assistance would be greatly appreciated. The routine above was taken from the modified routine mentioned earlier in this forum.
Thanks