Scout Alan

0愛的鼓勵 0訂閱站台

*************R-15M-A4.dwg & auto-insert.LSP**********
利用LISP寫入自訂的程式指令
建立圖塊時的INSERT POINT的設定很重要

**************geo-map.dwg***********************************
開啟舊檔碰到須開啟tp1k.shx時，可能需要開啟某個字體或造型，早期CAD沒有圖塊是使用SHAPE
指令STYLE: 建立/修改字型 (TEST > STYLE > 文字)
指令UCS: 改變座標軸
3P > (基準點,X軸,Y軸)
指令PLAN: 依座標軸轉正圖面
拿到一個圖檔應先注意到單位=? 比例尺=?
DIST: 量測距離
比例尺計算:  ( /  顯示倍率 實際螢幕顯示高度) {顯示倍率/ 實際螢幕顯示高度}

******************************************************************
LTSCALE: 線條型態比例
W: 匯出圖塊        

1. 正在重生模型。
2. AutoCAD 功能表公用程式 已載入。
   指令:
   指令:
   指令: _rectang
   指定第一個角點或 [倒角(C)/高程(E)/圓角(F)/厚度(T)/線寬(W)]: 0,0
   指定其他角點或 [標註(D)] : @420,297
3. 指令: z ZOOM
   指定視窗角點，輸入比例係數 (nX 或 nXP)，或
   [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: c
   指定中心點:
   輸入倍率或高度 <970.8763>: *取消*
4. 指令: z ZOOM
   指定視窗角點，輸入比例係數 (nX 或 nXP)，或
   [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: e
   指令: z ZOOM
   指定視窗角點，輸入比例係數 (nX 或 nXP)，或
   [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: 0.7x
5. 指令: l LINE 指定第一點: _endp 於
   指定下一點或 [復原(U)]: _endp 於
   指定下一點或 [復原(U)]:
   指令:
   指令:
   指令: _block 指定插入基準點:mid 於
   選取物件: 1 找到
6. 選取物件:
   指令: w WBLOCK
   指令: l LINE 指定第一點: mid 於
   指定下一點或 [復原(U)]: mid 於
   指定下一點或 [復原(U)]:
   指令: e ERASE
   選取物件: 1 找到
7. 選取物件:
   指令: l LINE 指定第一點: mid 於
   指定下一點或 [復原(U)]: mid 於
   指定下一點或 [復原(U)]:
   指令:
   指令:
   指令: _boundary
   選取內部點: 正在選取所有項目...
   正在選取任何可見的物件...
   正在分析選取的資料...
8. 正在分析內部的孤立物件...
9. 選取內部點:
   「邊界」建立了 1 聚合線
   指令: l LINE 指定第一點: end 於
   指定下一點或 [復原(U)]: ens
   需要點或選項關鍵字。
10. 指定下一點或 [復原(U)]: end 於
    指定下一點或 [復原(U)]:
    指令:
    指令:
    指令: _block 指定插入基準點:mid 於
    選取物件: 1 找到
11. 選取物件:
    指令:
    指令:
    指令: _block
    指令: e ERASE
    選取物件: all 5 找到
12. 選取物件:
    指令: inster 不明的指令「INSTER」。請按 F1 取得說明。
13. 指令: insetup
    不明的指令「INSETUP」。請按 F1 取得說明。
14. 指令:
    指令:
    指令: _insert
    指定插入點或 [比例(S)/X/Y/Z/旋轉(R)/預覽比例(PS)/PX/PY/PZ/預覽旋轉(PR)]: 0,0
    指令: z ZOOM
    指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: e
    指令: z ZOOM
    指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: 0
15. 數值必須是 正數且非零值。
16. 指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: 7x
17. 指令: _u ZOOM
    指令: z ZOOM
    指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: c
    指定中心點:
    輸入倍率或高度 <14.9970>: 0.7x
    指令: dist 指定第一點: end 於  指定第二點: end 於
    距離 = 21.0000，XY 平面內角度 = 0，與 XY 平面的夾角 = 0
    X 差值 =  21.0000，Y 差值 = 0.0000，Z 差值 = 0.0000
18. 指令:
    指令:
    指令: _block
    指令: scale
    選取物件: 1 找到
19. 選取物件:
    指定基準點: end 於
    指定比例係數或 [參考(R)]: 50
20. 指令: z ZOOM
    指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: e
    指令:
    指令:
    指令: _insert
    指令:
    指令:
    指令: _rectang
    指定第一個角點或 [倒角(C)/高程(E)/圓角(F)/厚度(T)/線寬(W)]:
    指定其他角點或 [標註(D)] :
    指令: _u 矩形(G) GROUP
    指令:
    指令:
    指令: _rectang
    指定第一個角點或 [倒角(C)/高程(E)/圓角(F)/厚度(T)/線寬(W)]:
    指定其他角點或 [標註(D)] : @120,80
21. 指令: (* 22 50)
    1100
22. 指令: z ZOOM
    指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: c
    指定中心點:
    輸入倍率或高度 <748.0025>: 1100
23. 指令:
    自動儲存到 C:\Documents and Settings\student\Local
    Settings\Temp\Drawing3_1_1_1234.sv$ ...
24. 指令:
    指令:
    指令: _dimlinear
    指定第一條延伸線原點或 <選取物件>:
    選取要標註的物件:
    指定標註線位置或
    [多行文字(M)/文字(T)/角度(A)/水平(H)/垂直(V)/旋轉(R)]:
    標註文字 = 120
    指令:
    指令:
    指令:
    指令: _refedit
    指令: '_dimstyle
    指令: '_style
    指令:
    指令:
    指令: _dtext
    目前的字型:「Standard」文字高度:  2.5000
    指定文字的起點或 [對正(J)/字型(S)]:
    指定高度 <2.5000>: 50
25. 指定文字的旋轉角度 <0>:
26. 輸入文字: 台大資工
    輸入文字: *取消*
    台大資工
    指令: '_style
    指令:
    指令:
    指令: _dtext
    目前的字型:「型式1」文字高度:  50.0000
    指定文字的起點或 [對正(J)/字型(S)]:
    指定高度 <50.0000>:
27. 指定文字的旋轉角度 <0>:
28. 輸入文字: 台大資工
    輸入文字: *取消*
    台大資工
    指令: dist 指定第一點:  <正交 打開>  指定第二點:
    距離 = 62.1522，XY 平面內角度 = 90，與 XY 平面的夾角 = 0
    X 差值 =  0.0000，Y 差值 = 62.1522，Z 差值 = 0.0000
29. 指令:  DIST 指定第一點:  指定第二點:
    距離 = 48.6734，XY 平面內角度 = 90，與 XY 平面的夾角 = 0
    X 差值 =  0.0000，Y 差值 = 48.6734，Z 差值 = 0.0000
30. 指令:
    指令:
    指令: _bhatch
    選取內部點: 正在選取所有項目...
    正在選取任何可見的物件...
    正在分析選取的資料...
31. 正在分析內部的孤立物件...
32. 選取內部點:
    指令:  <正交 關閉>
    指令: c CIRCLE 指定圓的中心點或 [三點(3P)/兩點(2P)/相切、相切、半徑(T)]:
    指定圓的半徑或 [直徑(D)]:
    指令:
    指令:
    指令: _bhatch
    選取內部點: 正在選取所有項目...
    正在選取任何可見的物件...
    正在分析選取的資料...
33. 正在分析內部的孤立物件...
34. 選取內部點:
    無法對邊界畫剖面線。
    點選或按 Esc 以返回對話方塊，或者 <按一下滑鼠右鍵以接受剖面線>:
    點選或按 Esc 以返回對話方塊，或者 <按一下滑鼠右鍵以接受剖面線>:
    點選或按 Esc 以返回對話方塊，或者 <按一下滑鼠右鍵以接受剖面線>:
    點選或按 Esc 以返回對話方塊，或者 <按一下滑鼠右鍵以接受剖面線>:
    自動儲存到 C:\Documents and Settings\student\Local
    Settings\Temp\Drawing3_1_1_1234.sv$ ...
35. 指令:
    指令:
    指令:
    指令: _hatchedit
    選取關聯的剖面線物件:
    指令: w WBLOCK
    指令:  <正交 打開>
    指令: l LINE 指定第一點:
    指定下一點或 [復原(U)]:
    指定下一點或 [復原(U)]:
    指定下一點或 [閉合(C)/復原(U)]:
    指令: LTSCALE 輸入新的線型比例係數 <1.0000>: 5 正在重生模型。
36. 指令: l LINE 指定第一點:
    指定下一點或 [復原(U)]:
    指定下一點或 [復原(U)]: *取消*
37. 指令: LTSCALE
    輸入新的線型比例係數 <5.0000>: 2.5
    正在重生模型。
38. 指令: z ZOOM
    指定視窗角點，輸入比例係數 (nX 或 nXP)，或
    [全部(A)/中心點(C)/動態(D)/實際範圍(E)/前次(P)/比例(S)/視窗(W)] <即時>: c
    指定中心點:
    輸入倍率或高度 <608.7923>: 1100
39. 指令: p PAN
    請按下 ESC 或 ENTER 結束，或按一下滑鼠右邊按鈕以顯示快顯功能表。