1、根據工程需要定制AutoCAD程序 詳見網盤 QQ：191022107 電話程樁自動編號并提取坐標程序使用說明一、加載和執行程序用AutoCAD打開一個要編號的圖形，在命令行輸入appload命令加載xzbh9-4.vlx程序成功后，在命令行輸入xzbh回車，即可執行程序。第一次使用會彈出“申請注冊碼”對話框，注冊后不再彈出。圖1 申請注冊碼對話框取得注冊碼后，填入圖1相應位置點確定，即可注冊成功，隨即會進入程序主對話框，如下： 圖2 工程樁自動編號并提取坐標程序主對話框二、具體操作說明1、操作前準備工作首先要保證每根樁都是獨立的樁，假如所有的樁是一個整塊或每組承臺內

2、的樁是一個整塊，需要提前批量炸開后再執xzbh。2、必選項操作操作時，“樁所在圖層”和“樁型”這兩個是必選項，必須要根據當前圖設置正確，該程序就是根據這兩項來選擇符合條件的樁，如果這兩項設置和當前編號圖紙中的樁不對應，則會出現無法選擇到樁對象的情況。“樁所在圖層”可以通過點“選取”按鈕指定一個樁進行設置，或者在文本框內手工輸入樁所在的圖層名進行設置。點“選取”按鈕時，會關閉主對話框，并在命令行提示“指定一個樁對象：”，這時在圖面上點取一個樁后，程序會自動又返回主對話框，并在“樁所在圖層”文本框內顯示剛才點取那個樁的圖層名。 “樁型”可以在執行xzbh前，用list命令查看下樁是哪個對象類型，然

3、后將相應樁型勾選即可，當有多個樁型時可多選。3、主對話框中，除“樁所在圖層”和“樁型”兩項外，其它的都是可選項。下面一一說明（1）主對話框中“排序次序”一欄用于設置樁編號順序，例如:選擇的排序為：先從上到下、再從左到右，則所有選擇到的樁對象，按其中心點坐標Y值從大到小進行排序，假如坐標Y值相同（相當于同在一行），則會按其坐標X值再從小到大進行排序。選擇的排序為：先從上到下、再從左到右，且“并兼顧S形排序”也同時勾選時，則所有選擇到的樁對象，按其中心點坐標Y值從大到小進行排序，假如坐標Y值相同（相當于同在一行），則奇數行會按其坐標X值再從小到大進行排序，偶數行會按其坐標X值再從大到小進行排序。選

4、擇其它排序順序時，與以上類同。（2）主對話框中“排序次序”一欄，點“設置”按鈕，會彈出以下對話框：圖3 設置對話框“同行或同列幅度”功能用于當同一行或同一列的樁不嚴格在一條直線上時，通過設置幅度值大小，可對不嚴格在同行或同列的樁按順序進行編號并提取坐標。“相同點范圍半徑”功能用于調整刪除相同點的半徑范圍，也就是說在多大半徑范圍內的點為相同點。凡有相同點則程序保留一個，其它相同點則刪除；主要用于有重疊對象的時，可消除重疊對象；還可用于有些進行隔樁編號的情況（如三軸攪拌樁編號）。“消除重選編號”選項，當勾選此設置時，即使對已編號的樁因誤選重選，程序會自動消除，不會再對其進行編號。此功能在后面第4節

5、“操作提高部分”再詳細說明需注意事項。“編號文字朝向隨UCS變化”選項，當勾選此設置時，編號文字的朝向與當前UCS方向一致。當去掉勾選時，無論UCS如何變化，編號文字朝向始終為圖面的正南正北。（3）主對話框中，點“坐標格式”按鈕，會彈出以下對話框： 圖4 輸出坐標格式設置對話框輸出坐標為“用戶坐標系坐標”或“世界坐標系坐標”，主要用于當前ucs為自定義坐標系（相對坐標系）時，當選擇為“用戶坐標系坐標”時，輸出為相對坐標，當選擇為“世界坐標系坐標”時，則會輸出為絕對坐標。如果當前ucs為世界坐標系，選擇為“用戶坐標系坐標”或“世界坐標系坐標”，則輸出坐標相同，都為絕對坐標。設置分隔符一欄中“分隔

6、符1”、“分隔符2”、“分隔符3”，用于設置編號、X坐標值、Y坐標值、Z坐標值之間的分隔符號，分隔符的值可以任意設置（但要注意“分隔符”的值不能完全包含在主對話框中“起始編號”的值中）,如圖4中的設置的分隔符，輸出坐標格式為：編號,X值,Y值,Z值 “XY坐標互換”用于設置輸出坐標格式中X值和Y值的前后位置，如：“XY坐標互換”勾選，圖4中輸出坐標格式為：編號,Y值,X值,Z值 “坐標縮放倍數”用于設置坐標值統一放大或縮小的系數（即圖形比例變化），可以根據樁基圖比例設置相應的值。通常cad樁基圖以毫米為單位，當設置此值為1000時，cad樁基圖中的樁位坐標XY值均除以1000，作為輸出的樁位坐

7、標，即輸出的坐標值以米為單位。如果樁基圖以米為單位，則設置此值為1，則輸出坐標值以米為單位。（4）主對話框中“起始編號”，可以輸入任意值，如：1、A1、BC1、MN-Y、ZC-1等等。這里要注意本說明圖4中“分隔符1”、“分隔符2”、“分隔符3”的值不能完全包含在“起始編號”的值中，否則會出錯。如：“起始編號”的值為A1，則“分隔符”的值為A 、A1、A2都不可以 。“分隔符”A和A1完全包含在“起始編號”的值A1中，不可以；“分隔符”A2雖未直接含在“起始編號”的值A1中，但“起始編號”A1經遞增后會出現A2編號，這樣造成“分隔符”A2會完全包含在后續編號A2中，所以也不可以。（5）主對話框

8、中“文字大小”，用于設置編號文字的大小，默認值為200。（6）主對話框中“編號文字位置”一欄，用于設置編號文字相對于樁的位置。當“在樁中心”勾選時，編號文字會在樁中心位置；當“在樁中心”去掉勾選時，“偏角”和“偏距”啟用，編號文字位置可以通過“偏角”和“偏距”任意設置，“偏角”是相對于當前坐標系X軸為零度，按逆時針旋轉的角度。“偏距”是指樁中心點到編號文字插入點的距離。（7）在主對話框中點“確定”按鈕后，會關閉主對話框，出現以下命令行提示：圖5 指定坐標成果文件名 這提示是指定一個文件名，用于將程序提取的樁位坐標保存到這個文件名內。有兩個參數：分別為n和o，當輸入n時，是新建一個文件名，將提取

9、的樁位坐標都保存在這個新文件內；當輸入o時,是打開一個已有樁位坐標文件，將當前提取的樁位坐標數據追加到已有樁位坐標文件內的數據之后，通常是用于第一次執行xzbh命令后未將樁位全部編號完，第二次再執行xzbh命令，將提取的樁位坐標數據再接著上一個樁位坐標文件數據之后寫入。圖5命令行提示，輸入參數n回車后（這里直接按回車鍵或空格鍵后，則會默認上一次的選擇參數），彈出以下對話框：圖6 指定一個新文件名圖6對話框中指定一個目錄和文件名后，點“保存”按鈕，則會進入下步選擇對象操作。圖5命令行提示，輸入參數o回車后（這里直接按回車鍵或空格鍵后，則會默認上一次的選擇參數），彈出以下對話框：圖7 打開一個已有

10、樁位坐標文件圖7對話框中指定一個目錄和已有樁位坐標文件后，點“打開”按鈕，則會進入下步選擇對象操作。（8）選擇對象命令行提示：圖8 選擇對象 這里在選擇樁對象時，可以單選或框選（框選時可輸入選擇模式：W、C、WP、CP、F、L等，且注意框選對象時，要使要選擇的對象盡量顯示在當前屏幕內，否則可能會出現未選擇到對象情況，這是AutoCAD平臺本身決定），選擇一次對象，按回車后在圖面對樁進行編號并提取樁位坐標至指定的文件內，接著再次循環提示選擇對象，直到選擇樁對象為零（未選擇對象）按回車結束程序，完成全部操作。4、操作提高部分（1）僅以“樁所在圖層”為過濾條件，不需要設置“樁型”，來選擇樁對象。假如

11、用list命令查看樁對象類型后，不在主對框樁型所列的7種樁型之列，則可以將樁型全部去掉，7種樁型全部不勾選，這時會僅以圖層為過濾條件，符合“樁所在圖層”要求的對象都將被選取。當7種樁型全部不勾選，點主對話框中的“確定”按鈕后，會彈出以下消息框：圖9 消息框1（2）本說明圖3對話框中“消除重選編號”選項勾選時，會彈出以下消息框：圖10 消息框2要注意此消息框中顯示的兩項內容，“消除重選編號”功能才起作用，該功能主要用于當樁比較密集時，連續選擇樁對象時，容易對已編號的樁重新選擇編號，當“消除重選編號”勾選時，即可消除這種狀況。（3）消除相同編號功能，此功能程序內部隱含，主要用于編號編錯位置時（即不

12、該在此時編號的對象已誤選并編號），方便修改數據。如編號時從A1編號到A76時（指定保存數據的文件假如為：1.txt），發現A70到A76編號編到其它樁上更合適，這時可以正常結束xzbh。然后命令行再次執行xzbh，在主對話框中“起始編號”文本框內輸入A70，然后點主對話框中“確定”按鈕，關閉主對話框并在命令行提示“選擇成果文件新建文件(N)/打開已有文件(O):”時，此時且記輸入參數o回車，然后在彈出本說明圖7對話框時，選擇剛才生成的坐標數據文件（如：1.txt）并點“打開”按鈕，命令行提示“選擇對象”時，這時重新指定要編號的樁，則程序會在圖面上將先前標注A70編號刪除，再在新指定的位置重新編

13、號A70，并更改坐標文件內A70坐標數據為當前位置的坐標，然后依次將圖面先前標注A71編號刪除，再在新指定的位置重新編號A71，并更改坐標文件內A71坐標數據為當前位置的坐標,依次類推直到將所有相同編號更改完。（4）斜向規律排列的群樁編號時，假如當前ucs坐標系軸方向與斜向規律排列的群樁方向不一致時，無論怎么改變排序方式，一次框選所有斜方向樁進行編號時，圖面顯示編號順序都可能會亂（當然如果是一行一行的選或一列一列的選、或單選不會存在編號亂的問題，但這樣選擇樁對象工作效率相對較低），因為排序方式是嚴格按坐標Y值的從大到小或X值的從小到大排序（或其它排序方式）。為解決這一問題，可以先自定義ucs，

14、使當前ucs的軸方向與斜向規律排列的群樁方向一致，然后再執行xzbh，提示選擇對象時，一次框選樁對象即可快速編號。在命令行輸入ucs回車，按提示操作指定ucs原點和軸方向，即可定義ucs（相當于指定了一個新的坐標系）。當自定義ucs，使當前ucs的軸方向與斜向規律排列的群樁方向一致后，為方便框選對象，可用Plan命令使圖形擺正。當圖形局部有斜向樁，改變ucs進行編號時，要注意提取樁位坐標的變化，因坐標系不統一了。如果本說明圖4“輸出坐標為”一欄選擇中是“用戶坐標系坐標”，則此時輸出的坐標和改變坐標系前輸出的坐標不是統一坐標系坐標。如果本說明圖4“輸出坐標為”一欄選擇中是“世界坐標系坐標”，則此時輸出的坐標和改變坐標系前輸出的坐標是統一坐標系坐標（即選中輸出坐標為世界坐標系坐標時，無論何時改變ucs進行編號操作，提取樁位坐標均為統一坐標系坐標，即絕對坐標）。這里還有一方法就是先編號，暫時不管在改變ucs前后生成的坐標，當全部樁編完號后，用“工程樁自動編號并提取坐標程序”的配套程序tqbh“批量提取樁編號文字插入點坐標程序”來快速提取樁位的統一坐標系坐標，提取的統一坐標系坐標可為相對坐標，也可為絕對坐標，這個要根據用戶當前定義的坐標系來決定。使用tqbh程序時，要注意編號文字插入點必須在樁中心，如果不在樁中心可以批量選擇文字后將其移