[討論]如何給一個數值，自動在線上繪製相對距離的垂直線

請教各位大大
目前工作上面有一個需求
就是我有一條聚合線總長假如是128
我想要寫個程式
假設我選取一條線後，輸入58，程式可以自動
從起點處到58的地方，繪製一條垂直該線的線段
我剛開始是想用等距去寫
但是卻無法只給一點
想請問各位是否有辦法解決
謝謝

發表文章!請注意以下
主題前請加<問題>並將主題顏色改藍色,期限為1個月
落為討論請加<討論>顏色改綠色,期限無限期!
稍後!管理會將問題你置頂!
「教學」討論區-發表主題使用方法
http://autocad.bestoforum.net/forum-f6/topic-t2698.htm

PS.顏色沒設定!請注意下次要設定

我看是 OFFSET 比較快 ..........

swcforest 寫到:請教各位大大
目前工作上面有一個需求
就是我有一條聚合線總長假如是128
我想要寫個程式
假設我選取一條線後，輸入58，程式可以自動
從起點處到58的地方，繪製一條垂直該線的線段
我剛開始是想用等距去寫
但是卻無法只給一點
想請問各位是否有辦法解決
謝謝

一條聚合線總長128 是單純的一條直的無轉折的聚合線 ? 還是會有轉折的聚合線呢 ?


ccxsw ~ OFFSET 比較快 .......... 繪製一條垂直該線的線段 ,offset並不能達到他的要求喔

不好意思 可能我的問題說的不太詳細
我的需求是 一條聚合線ok+000~ok+128
(有轉折或無轉折或是道路中心線有曲線)
要加一個樁號 比如 ok+023 我必須要找出距離起點
23m的地方劃一條垂直線 然後標示樁號上去
標示樁號的寫法 我會寫
就是如何找出該點讓我想不出來
請大大再給各方向思考 謝謝

先將一條線作成block,在下指令measure之後選擇聚合線在
指定分段長度或 [圖塊]，再給你要的距離即可完成，希望對你有幫助。

第一種方式：道路週圍有鄰進水溝邊線使用(在使用前須先將點型式先行設定)

^C^C_MEASURE;\\;'OSMODE;169;+^C^C_line;\\;'OSMODE;183;;;

上述巨集畫出第一條線再搭配點清除的LISP(來源自AUTOCAD顧問)

代碼:

(defun C:ERASENODE()
 (setvar "cmdecho" 0)
 (setq errn "")
 (princ "\n ")
 (princ "\n ")
 (setq eset(ssget "X" (list (cons 0 "POINT"))))
 (setq elen(- (sslength eset) 1))
 (if (/= (sslength eset) 0)
  (progn
  (while (/= (sslength eset) 0)
    (progn
    (setq en (ssname eset (- (sslength eset) 1)))
    (command "erase" en "")
    (setq eset(ssdel en eset))
    )
  )
  )
  (setq errn "No Nodes In Selection Set.")
 )
 (setvar "cmdecho" 1)
 (princ "\n..圖面總共有..")(princ elen)(princ " - 點被刪除Nodes Erased.")
 (princ "\n ")(princ errn)
 (princ)
)

第二種方式：使用圖塊畫線的方式

^C^C_MEASURE;\B;1;Y;\;^C^CXPLODE;\;E;TRIM;\\\\\\

1.圖塊名稱：1 線畫90度，長度自訂
2.接著分解修剪第一個連接的線段
3.之後部份要整批刪掉圖塊1的線，可能要請會LISP的人幫忙了...因為不會LISP


不知道合不合用，但願有幫到你，如果需要改良的話，也請各位高手幫忙修正，謝謝

adslwang 寫到:第一種方式：道路週圍有鄰進水溝邊線使用(在使用前須先將點型式先行設定)

^C^C_MEASURE;\\;'OSMODE;169;+^C^C_line;\\;'OSMODE;183;;;

Spoiler（用來隱藏帖子內容）:

不知道合不合用，但願有幫到你，如果需要改良的話，也請各位高手幫忙修正，謝謝

******************************************************
謝謝熱心回覆~< 積分 +1>

[公告]關於團隊成員的回文及貢獻