專利名稱：一種用于幕墻不規(guī)則四邊形裝飾板批量展開圖的繪制方法
技術(shù)領(lǐng)域：
本發(fā)明屬于鈑金技術(shù)和計算機繪圖技術(shù)領(lǐng)域，特別涉及一種用于幕墻不規(guī)則四邊形裝飾板批量展開圖的繪制方法。
背景技術(shù)：
目前對于大批量不規(guī)則四邊形板的鈑金展開，所使用的方法一般為采用繪圖軟件中的參數(shù)驅(qū)動功能來實現(xiàn)，所需步驟大至為將原始數(shù)復(fù)制到繪圖軟件驅(qū)動參數(shù)表中；將數(shù)據(jù)與繪圖軟件中驅(qū)動尺寸相對應(yīng)；在同一工程圖中插入多個視圖；將每一個視圖對應(yīng)零件名稱改成驅(qū)動參數(shù)表中的零件名稱；將工程圖轉(zhuǎn)化為CAD格式；編輯驅(qū)動參數(shù)，將生成的工藝參數(shù)從驅(qū)動參數(shù)中復(fù)制出來。這種方法在操作過程中步驟較多，增加了誤操作的可能，在生成圖形較多時耗時較長并且容易出現(xiàn)遺漏。

發(fā)明內(nèi)容
針對現(xiàn)有技術(shù)存在的問題，本發(fā)明提供一種用于幕墻不規(guī)則四邊形裝飾板批量展開圖的繪制方法。該方法包括以下步驟1.定義存放盒板四個頂點數(shù)據(jù)數(shù)組；2.為盒板頂點坐標賦值；3.定義存入盒板四邊偏移量數(shù)組；4.把盒板四邊按偏移量數(shù)組值向內(nèi)偏移，偏移后的頂點坐標重新放回盒板頂點數(shù)組；5.定義存入翻邊頂點的數(shù)組；6.為翻邊各頂點賦值；7.定義鏡像點；8.為鏡像點賦值；9.對翻邊各點按鏡像點執(zhí)行鏡向操作；10.檢查翻邊點是否有新的極值變量，如果有放入極值點變量；11.定義Y方向的比例變量并賦初值；12.定義X方向的比例變量并賦初值；13.定義全局比例變量并賦初值；14.定義圖形左下角插入點并賦值；15.把翻邊各點坐標移到圖形插入點位置；16.定義存入極值點的變量；17.為極值點變量賦初值；18.定義折彎線四個頂點并把翻邊內(nèi)側(cè)四個頂點坐標賦給該數(shù)組；19.把翻邊各點坐標在CAD中以指定線形顏色畫閉合線；20.定義折彎線各邊偏移量并賦值；
21.將現(xiàn)有折彎線坐標偏移到實際位置；22.在CAD中畫出折彎線；23.添加長、寬尺寸標注；24.添加“板背面”文字25.添加A3標準圖框；26.把圖形插入點添加增量，實現(xiàn)圖形依次向上排布；27.定義存入返回參數(shù)的變量并賦值；28.將返回值返回；29.退出標準盒板繪圖程序HB。本發(fā)明采用計算機Microsoft VBA與LISP語言，在Windows操作系統(tǒng)下CAD2007 版本中運行。其中LISP開發(fā)部分主要用于加載VBA模塊與定義CAD命令行命令，VBA開發(fā)部分負責完成程序中的其余操作部分。本發(fā)明的方法通過直接在EXCEL中引入原始數(shù)據(jù)， 對應(yīng)圖形的參數(shù)形式為四條邊與一條對角線長、對應(yīng)板號、圖號，要求數(shù)據(jù)依次排列，每一行為一條數(shù)據(jù)，且第一行為參數(shù)簽行，本發(fā)明的方法采用對話框形式進行參數(shù)調(diào)整。在參數(shù)調(diào)整過程中采用在軟件程序的窗口中拖拽的形式，以應(yīng)對實際使用中成形圖參數(shù)名稱不確定的情況，直接在EXCEL中引用數(shù)據(jù)，在CAD中輸出圖紙，自動生成參數(shù)圖及1 1電子圖， 并實現(xiàn)了插入圖框與變換圖框比例并排版的操作(如無圖框?qū)?yīng)塊，則不插入圖框)，最后將工藝參數(shù)圖對應(yīng)參數(shù)返回到EXCEL中所選數(shù)據(jù)右側(cè)，并附有參數(shù)名稱行，最大程度上避免了由成形參數(shù)到工藝展開圖轉(zhuǎn)化過程中可能出現(xiàn)的錯誤。本發(fā)明所提供的一種用于幕墻不規(guī)則四邊形裝飾板批量展開圖的繪制方法與現(xiàn)有其他方法相比簡化了由成形參數(shù)到工藝展開圖轉(zhuǎn)化過程，在進行操作時大大減少了人工操作的部分，可以相對減少人為失誤所產(chǎn)生的影響，提高了由參數(shù)到展開圖的批量轉(zhuǎn)化效率。


圖1本發(fā)明方法流程圖；圖2本發(fā)明方法操作流程圖；圖3本發(fā)明方法窗口操作流程圖；圖4使用本發(fā)明方法的實施例的輸入數(shù)據(jù)用窗體圖；圖5使用本發(fā)明方法的實施例的所生成的展開圖；圖6使用本發(fā)明方法的實施例的所生成的工藝參數(shù)圖。
具體實施例方式本發(fā)明方法使用時將軟件壓縮包直接解壓到計算機D盤根目錄下。在CAD菜單中選擇工具/AutoLisp/加載應(yīng)用程序，選擇上一步解壓出的“盒板”文件夾中“加載用.Isp “文件加載后退出，在CAD命令行中輸入HB命令后彈出對話框，首先在EXCEL中選擇原始數(shù)據(jù)，每條數(shù)據(jù)為一行，數(shù)據(jù)內(nèi)容為盒板的板號、圖號、四條邊長與一個對角線長共計7個參數(shù)，且第一行為標簽行，選中數(shù)據(jù)后切換回CAD，在對話框中點擊“加載數(shù)據(jù)標簽” 按鈕，即將對應(yīng)數(shù)據(jù)的標簽名稱加載到列表框中，用鼠標將標簽拖拽到相應(yīng)的尺寸上，按需要添寫其余內(nèi)容后點擊“生成”按鈕退出對話框，在CAD命令行中提示“拾取插入點”，拾取點后即在相應(yīng)位置生成展開圖并依次向上排列。
下面結(jié)合附圖對本發(fā)明內(nèi)容作進具體描述。本軟件程序所實現(xiàn)的批量不規(guī)則四邊形板的鈑金展開方法主要通過以下四個主要步驟來完成，加載，顯示用戶界面窗口和通過用戶界面窗口完成參數(shù)輸入與順序調(diào)整并調(diào)用標準盒板繪圖程序繪圖，關(guān)閉用戶界面窗口并退出。本發(fā)明的程序總體流程圖如圖1 所示。步驟一加載。加載“加載用.lsp”文件，通過程序文件中的(vl-vbaload" D :/盒板 / 盒板模塊.dvb ")語句將D /盒板/盒板模塊.dvb模塊加載到當前CAD中。步驟二 顯示用戶界面窗口。通過程序文件中的(defun c =HB ()(vl-vbarun" HB1〃 ))語句定義一個CAD命令“HB”，在該命令中調(diào)用已加載模塊中的“HB1”過程。在〃 D /盒板/盒板模塊.dvb"中盒板繪圖函數(shù)調(diào)用的入口過程為HBl ()，其內(nèi)容為
SubHBlO
UserForml. Show Unload UserForml End Sub其中heri^orml. Show用于將已加載的對話框顯示出來，Unload UserForml用于操作完成后將對話框卸載。步驟三通過用戶界面窗口 ^erforml完成參數(shù)輸入與順序調(diào)整并調(diào)用標準盒板繪圖程序HB進行繪圖。圖2為用戶窗口操作流程圖。具體操作如下在Excel中選擇數(shù)據(jù)，數(shù)據(jù)按行排列，選擇時帶標題行；點“加載數(shù)據(jù)標簽”按鈕會將Excel中選中數(shù)據(jù)的標題行數(shù)據(jù)加載到列表框中；拖放列表框中的數(shù)據(jù)標簽到圖片中對應(yīng)的參數(shù)標簽上；視成型圖情況選擇鏡向單選按鈕；點擊“生成”按鈕后在 CAD命令行提示選擇圖形插入點，點取后以Excel中的數(shù)據(jù)為輸入?yún)?shù)調(diào)用標準盒板繪圖程序繪圖，在對應(yīng)位置生成圖形，圖3為標準盒板繪圖程序HB的流程圖；輸入其余工程名稱，半延展，翻邊高，料厚，材料等參數(shù)。標準盒板繪圖程序HB的操作流程具體如下1.定義存放盒板四個頂點數(shù)據(jù)數(shù)組Dim Myloopl (1 To 4) As My_Point，其中My_ Point用于存放一個點的X，Y，Z三個座標；2.為步驟1所定義的盒板頂點坐標賦值；3.定義存入盒板四邊偏移量數(shù)組Dim Myoffl (1 to 4) As Double。4.把盒板四邊按偏移量將數(shù)組值Myloopl向內(nèi)偏移，偏移后的頂點坐標重新放回盒板頂點數(shù)組Myoffl中，調(diào)用過程Off_Loop (MyIoopl，Myoff 1)，；5.定義存入翻邊頂點的數(shù)組 Dim FanBianl (1 To 12) As My_Point。
5
6.為翻邊各頂點賦值 FanBianl(I) =Myloopl(I)…7.定義鏡像點 Dim Mirr_pl As My_Point。8.為鏡像點賦值 Mirr_pl = My_mid_Point (FanBianl (2)，F(xiàn)anBianl (3))。其中函數(shù)My_mid_Point 返回兩點 FanBianl (2)，F(xiàn)anBianl (3)的中點；9.對翻邊各點按鏡像點執(zhí)行鏡向操作Call mirr_loop (FanBianl,Mirr_pl,Mirr_ p2)。過程mirr_loop用于將代表多邊形的點數(shù)組FanBianl延鏡向線Mirr_pl，Mirr_p2點鏡向；10.檢查翻邊點是否有新的極值變量，如果有放入極值點變量，調(diào)用過程Call GetMax_min ()，過程GetMaxjnin用于將點數(shù)組表示的多邊形myloop ()中具有極值的點放在MyXL中；11.定義Y方向的比例變量并賦初值；12.定義X方向的比例變量并賦初值；13.定義全局比例變量并賦初值；14.定義圖形左下角插入點并賦值；15.把翻邊各點坐標移到圖形插入點位置，調(diào)用過程m0V_l00p_VeCt0r。Call mov_loop_vector(FanBianl, MYINSERT_P0ITN1) 此過程用于把點數(shù)組 myloop ()中各點座標與向量MYINSERT_P0i i的X、Y、Z座標相加，實現(xiàn)點數(shù)組的平移；16.定義存入極值點的變量 Dim L_H_Point As My_Xl_Point ；17.為極值點變量賦初值；18.定義折彎線四個頂點并把翻邊內(nèi)側(cè)四個頂點坐標賦給該數(shù)組；19.把翻邊各點坐標在CAD中以指定線形顏色畫閉合線，調(diào)用過程line_l00p， Call line_loop (FanBianl，“ continuous" , acGreen，1，True)，此過程將點數(shù)組表示的多邊形FanBianl用指定的線型continuous，顏色acGreen，線型比例1畫出來；20.定義折彎線各邊偏移量并賦值；21.將現(xiàn)有折彎線坐標偏移到實際位置；22.在CAD中畫出折彎線；23.添加長、寬尺寸標注，Call My_AddDimRotated用來通過指定點添加轉(zhuǎn)角標注， 過程 My_AddDimRotated 在點 First_Point 與點 Second_Point 間添加轉(zhuǎn)角標注，IocationP 為標注文字位置，angle為轉(zhuǎn)角標注方向角，myfactor為標注比例；24.添加“板背面”文字，通過Call My_AddText在CAD中指定位置添加位置，過程 My_AddText在CAD當前活動文檔中中添加文本，DrawingNo為文本內(nèi)容，DrawingNo為文字高度，ff_Factor為寬度系數(shù)。25.添加A3標準圖框，調(diào)用過程My_Add_A3，過程My_Add_A3用于在CAD當前活動文檔中加入A3圖框，MyjnsertPoint為插入點，My_Factor為圖框比例，GCMC為標題欄工程名稱，TM為標題欄圖紙名稱，DrawNo為圖號，BL標題欄添寫的繪圖比例，CAILIA0為標題欄添寫的材料，SHULIAN為標題欄添寫的數(shù)量，GJY為標題欄添寫的共內(nèi)頁，DJY為標題欄添寫的第幾頁；26.把圖形插入點添加增量，實現(xiàn)圖形依次向上排布；27.定義存入返回參數(shù)的變量并賦值；
28.將返回值返回HB = My_Xl并退出標準盒板繪圖程序HB。步驟四調(diào)用步驟二中的過程HBlO中的Unload herforml命令關(guān)閉用戶界面窗口并退出。實施例下面通過舉例對本發(fā)明應(yīng)用一組具體的參數(shù)來生成圖形并在EXCEL表中返回工藝參數(shù)值，來更加詳細的說明本發(fā)明的應(yīng)用方法。1.在EXCEL表中選擇所要輸入的參數(shù)，如表1 ；
權(quán)利要求
1. 一種幕墻不規(guī)則四邊形裝飾板批量展開圖的繪制方法，其特征在于包括以下步驟(1)定義存放盒板四個頂點數(shù)據(jù)數(shù)組；(2)為盒板頂點坐標賦值；(3)定義存入盒板四邊偏移量數(shù)組；(4)把盒板四邊按偏移量數(shù)組值向內(nèi)偏移，偏移后的頂點坐標重新放回盒板頂點數(shù)(5)定義存入翻邊頂點的數(shù)組；(6)為翻邊各頂點賦值；(7)定義鏡像點；(8)為鏡像點賦值；(9)對翻邊各點按鏡像點執(zhí)行鏡向操作；(10)檢查翻邊點是否有新的極值變量，如果有放入極值點變量；(11)定義Y方向的比例變量并賦初值； (12 )定義X方向的比例變量并賦初值；(13)定義全局比例變量并賦初值；(14)定義圖形左下角插入點并賦值；(15)把翻邊各點坐標移到圖形插入點位置；(16)定義存入極值點的變量；(17)為極值點變量賦初值；(18)定義折彎線四個頂點并把翻邊內(nèi)側(cè)四個頂點坐標賦給該數(shù)組；(19)把翻邊各點坐標在CAD中以指定線形顏色畫閉合線；(20)定義折彎線各邊偏移量并賦值；(21)將現(xiàn)有折彎線坐標偏移到實際位置；(22)在CAD中畫出折彎線；(23)添加長、寬尺寸標注；(24)添加“板背面”文字(25)添加A3標準圖框；(26)把圖形插入點添加增量，實現(xiàn)圖形依次向上排布；(27)定義存入返回參數(shù)的變量并賦值；(28)將返回值返回；(29)退出標準盒板繪圖程序HB。
全文摘要
一種用于幕墻不規(guī)則四邊形裝飾板批量展開圖的繪制方法，通過直接在EXCEL中引入原始數(shù)據(jù)，對應(yīng)圖形的參數(shù)形式為四條邊與一條對角線長、對應(yīng)板號、圖號，要求數(shù)據(jù)依次排列，每一行為一條數(shù)據(jù)，且第一行為參數(shù)簽行，該方法采用對話框形式進行參數(shù)調(diào)整。在參數(shù)調(diào)整過程中采用在軟件程序的窗口中拖拽的形式，直接在EXCEL中引用數(shù)據(jù)，在CAD中輸出圖紙，自動生成參數(shù)圖及1:1電子圖，最后將工藝參數(shù)圖對應(yīng)參數(shù)返回到EXCEL中所選數(shù)據(jù)右側(cè)，并附有參數(shù)名稱行。本發(fā)明與現(xiàn)有其他方法相比簡化了由成形參數(shù)到工藝展開圖轉(zhuǎn)化過程，在進行操作時大大減少了人工操作的部分，可以相對減少人為失誤所產(chǎn)生的影響，提高了由參數(shù)到展開圖的批量轉(zhuǎn)化效率。
文檔編號G06F17/50GK102360395SQ201110295138
公開日2012年2月22日 申請日期2011年9月29日 優(yōu)先權(quán)日2011年9月29日
發(fā)明者張世娟, 羅曄, 鄭向陽 申請人:沈陽遠大鋁業(yè)工程有限公司