二維工程圖形處理技術(shù)

第六章二維工程圖形處理技術(shù)1第六章二維工程圖形處理技術(shù)二、工程圖編程中常用的方法，1．參數(shù)法2．拼圖法第一節(jié)概述一、圖樣的處理方法1、把復(fù)雜的圖形分解成若干基本圖形2、圖樣中除了視圖以外的內(nèi)容均視為二維圖形3、利用圖形變換對圖形進行處理22．拼圖法3三、坐標(biāo)系1．用戶坐標(biāo)系用戶坐標(biāo)系全局與局部坐標(biāo)系2．設(shè)備坐標(biāo)系4（1）局部坐標(biāo)系到全局坐標(biāo)系的轉(zhuǎn)換設(shè)（L，M）為局部坐標(biāo)系的原點在全局坐標(biāo)系中的坐標(biāo)，則可以定義一個過程(LocalToGlobe)來實現(xiàn)：SUBLocalToGlobe(X,Y,L,M,PHI,XX,YY) XX=X*cos(PHI)-Y*sin(PHI)+LYY=X*sin(PHI)+Y*cos(PHI)+MENDSUB局部坐標(biāo)系到全局坐標(biāo)系的轉(zhuǎn)換

3．坐標(biāo)系之間的坐標(biāo)變換5（2）用戶坐標(biāo)系到設(shè)備坐標(biāo)系之間的轉(zhuǎn)換

設(shè)（X0，Y0）為用戶坐標(biāo)系的原點在屏幕坐標(biāo)系中的坐標(biāo)，則用戶坐標(biāo)系中的一點(X，Y)，轉(zhuǎn)化為在屏幕坐標(biāo)系下的坐標(biāo)為：XX=X0+X*S YY=Y0-Y*S通過定義一個過程(GlobeToDevice)來實現(xiàn)以上的轉(zhuǎn)換。SUBGlobeToDevice(X,Y,x0,y0,Scale,XX,YY) XX=x0+X*Scale YY=y0-Y*ScaleENDSUB6第二節(jié)常用基本圖形一、直線子程序設(shè)計：

參數(shù)說明：X,Y－點的坐標(biāo)，K－選擇碼。K＝0抬筆；K＝1落筆SUBDRAWLINE(K,X,Y,Ocontainar) IFK＝0THENOcontainar.PSET（X，Y） IFK＝1THENOcontainar.LINE－（X，Y）ENDSUB畫線7功能：根據(jù)圓心坐標(biāo)和半徑，圓弧的起始角和終止角， 繪制圓弧或圓。參數(shù)：X0，Y0－圓（?。┑膱A心坐標(biāo) R－圓（弧）的半徑 TS－圓弧的起始角，單位為度 TE－圓弧的終止角，單位為度實現(xiàn)方法： 一個圓可以看作是邊數(shù)無窮多的正多邊形。因此，可以用正多邊形逼近一個圓，正多邊形的邊數(shù)越多，誤差就越小。 本子程序使用正72邊形，即每隔5度計算一個頂點。繪制圓弧時，亦然。二、圓（圓?。┳映绦颍?程序如下：

SUBarc(x0,y0,r,ts,te)p=0.01745:dt=5IFts>teTHENdt=-dtn=INT((te-ts)/dt)x=x0+r*COS(ts*p)y=y0+r*SIN(ts*p)k=0:CALLdrawline(k,x,y,ob)’相當(dāng)于pset(x,y)FORi=1TOnx=x0+r*COS((ts+i*dt)*p)y=y0+r*SIN((ts+i*dt)*p)k=1:CALLdrawline(k,x,y,ob)’相當(dāng)于line-(x,y)NEXTix=x0+r*COS(te*p)y=y0+r*SIN(te*p)k=1:CALLdrawline(k,x,y,ob)’相當(dāng)于line-(x,y)ENDSUB9三、正多邊形的子程序設(shè)計設(shè)外接圓半徑為R，圓心坐標(biāo)為（x0,y0），邊數(shù)為N，起始角度為A0則：AA=360/N各頂點坐標(biāo)為：X=x0+R*cos(A0+AA*i)Y=y0+R*sin(A0+AA*I)圖6-5正多邊形的生成ROYXAA（X0,Y0）A010正多邊形子程序SUBploygon(x0,y0,R,A0,N,OB)P=3.1415926/180AA=360/N*PA0=A0*PFORI=0TONIFI=0THENk=0ELSEk=1X=X0+R*COS(A0+AA*I)Y=Y0+R*SIN(A0+AA*I)CALLdrawline(k,X,Y,OB)NEXTIENDSUB11四、矩形的程序設(shè)計矩形的參數(shù)如下：X0,Y0-矩形左下角的坐標(biāo)；L,W-矩形的長和寬；A0–矩形的傾斜角，單位為（°）。Subjux(x0,y0,L,W,A0,OBAsObject)DimX(4),Y(4)X(1)=x0:Y(1)=y0X(2)=x0+L:Y(2)=y0X(3)=x0+L:Y(3)=y0+WX(4)=x0:Y(4)=y0+WOB.PSet(X(1),Y(1))ForI=2To4CallRotation(A0,x0,y0,X(I),Y(I),Xr,Yr)OB.Line-(Xr,Yr)NextIOB.Line-(X(1),Y(1))EndSub12Rotation(A0,x0,y0,X(I),Y(I),Xr,Yr)為繞點(x0,y0)旋轉(zhuǎn)的子程序，參數(shù)X(i),Y(i)為旋轉(zhuǎn)前點的坐標(biāo)，Xr,Yr為旋轉(zhuǎn)后的坐標(biāo)。SubRotation(A1,Xc,Yc,x,y,Xr,Yr)PI=0.01745:CS=Cos(A1*PI):SN=Sin(A1*PI)Xr=x*CS-y*SN+Xc*(1-CS)+Yc*SNYr=x*SN+y*CS+Yc*(1-CS)-Xc*SNEndSub13第三節(jié)線型1、直虛線的子程序設(shè)計：功能：繪制虛線直線參數(shù)及其幾何意義為：x1,y1-線段的起點坐標(biāo)；x2,y2-線段的終點坐標(biāo)；LS-虛線短畫的長度；LK-虛線短畫間隔長。14第n+1段起點坐標(biāo)：（1）算法分析：虛線段總長：

短畫總數(shù)：第n段終點坐標(biāo)：第n段起點坐標(biāo)15SubXux(x1,y1,x2,y2,OB)LS=10:LK=5:LL=LK+LSLZ=Sqr((x2-x1)^2+(y2-y1)^2)CS=(x2-x1)/LZ:SN=(y2-y1)/LZN=Int(LZ/LL)x=x1:y=y1:OB.PSet(x,y)Fori=1ToNx=x+LS*CS:y=y+LS*SN:OB.Line-(x,y)x=x+LK*CS:y=y+LK*SN:OB.PSet(x,y)NextiOB.Line-(x2,y2)

EndSub(2)程序如下：16二、直點畫線的子程序設(shè)計功能：根據(jù)起點和終點坐標(biāo)，繪制點畫線參數(shù)：x1,y1-線段的起點坐標(biāo)；x2,y2-線段的終點坐標(biāo)；LS-點畫線長畫的長度。LK-點畫線間隔長和短畫長。畫點畫線的過程：抬筆至長畫的起點，然后利用循環(huán)畫出點畫線線段，在一個循環(huán)中，完成下面的工作：畫線到長畫的終點，再抬筆到短畫的起點，然后畫線到短畫的終點，再抬筆到下一個長畫的起點。17SubDianhx(x1,y1,x2,y2,OB)LS=25:LK=5：LL=LS+3*LK:LZ=Sqr((x2-x1)^2+(y2-y1)^2)‘LZ——總長CS=(x2-x1)/LZ:SN=(y2-y1)/LZN=Int(LZ/LL)‘循環(huán)次數(shù)

x=x1:y=y1:OB.PSet(x,y)Fori=1ToNx=x+LS*CS:y=y+LS*SN:OB.Line-(x,y)x=x+LK*CS:y=y+LK*SN:OB.PSet(x,y)x=x+LK*CS:y=y+LK*SN:OB.Line-(x,y)x=x+LK*CS:y=y+LK*SN:OB.PSet(x,y)NextiOB.Line-(x2,y2)EndSub程序如下：18功能：根據(jù)圓心坐標(biāo)和半徑，圓弧的起始角和終止角， 繪制虛線圓弧或圓。參數(shù)：X0，Y0－圓（?。┑膱A心坐標(biāo) R－圓（弧）的半徑 TS－圓弧的起始角，單位為度 TE－圓弧的終止角，單位為度實現(xiàn)方法： 虛線圓弧子程序的設(shè)計，是在圓弧子程序的基礎(chǔ)上經(jīng)過修改實現(xiàn)的。 在畫圓弧時，空一段，連一段。三、虛線圓(弧)子程序設(shè)計19（1）計算短畫弧長和間隔弧長分別對應(yīng)的圓心角和:計算短畫總數(shù)：計算每一短畫弧長的起始角As與終止角Ae：(設(shè)I為循環(huán)控制變量，取值為0到（N-1）)20Subxxy(x0,y0,R,Ts,Te,OBAsObject)PI=3.14159/180 HL=15 KL=5 AH=HL/R/PI AK=KL/R/PI N=Int((Te-Ts)/(AH+AK)) ForI=0ToN-1 As1=Ts+(AH+AK)*I AE1=As1+AH CallArc(x0,y0,R,As1,AE1,OB) NextIEndSub虛線圓(弧)子程序21第四節(jié)字符

字符在計算機圖形處理技術(shù)中是必不可少的內(nèi)容，任何圖形的標(biāo)注、說明都離不開字符。計算機鍵盤上雖有數(shù)字和字母，但這些字符在顯示或打印時卻不能改變其大小和旋轉(zhuǎn)角度，給使用帶來不便。因此，需要用戶建立相應(yīng)的字符庫。字符在計算機內(nèi)可用筆劃（矢量）方式或點位圖（點陣）方式來表示。它們的輸入輸出可以用基于字符發(fā)生器原理的硬件實現(xiàn)，也可以用基于編碼技術(shù)的軟件來實現(xiàn)。下面主要介紹使用編碼技術(shù)來建立矢量型字符的方法。

矢量型字符是用一系列矢量代碼表示字符的每一筆劃。其最大特點是，字符的輸出和變換比較簡單，便于對字符進行放縮和旋轉(zhuǎn)，便于在各種設(shè)備上輸出。22寫字模

選擇一定大小的坐標(biāo)網(wǎng)格，作為字符的界框。在此網(wǎng)格中寫出某一字符，并采集其每一筆劃兩端點相對于坐標(biāo)網(wǎng)格左下角（0，0）點的（X，Y）坐標(biāo)值，如圖中的字符A。確定字符的在字符庫的編號定義字符在字符庫中的唯一編號，該編號最好符合字符的排列規(guī)律，如按ASCII碼排列。一、定義字符

矢量型字符是用一系列矢量代碼表示字符的每一筆劃。2324二、存儲字符在字模中，每一字符是由一系列筆劃寫成的，而每一筆劃都是一個矢量線段，把這些矢量線段的端點坐標(biāo)存儲起來，把每個字符的筆劃數(shù)及字符寬度也存儲起來。為減少抬筆和落筆的次數(shù)，提高書寫字符的速度，應(yīng)盡量把一些首尾相接的矢量線段作為折線處理，并且把每條折線定義為一個筆劃,例如存儲字符A的數(shù)學(xué)模型見下表25其字符庫數(shù)據(jù)文件（zifu.txt）為：1,80,9,5,20,15,0,45,0,65,20,75,80,65,100,35,100,15,80,5,201,40,2,30,100,10,01,80,8,18,75,35,100,65,100,75,80,72,70,5,15,0,0,60,01,80,9,20,100,80,100,40,60,60,50,75,35,65,15,50,0,25,0,5,301,80,4,66,30,6,30,60,100,50,01,80,9,75,100,20,100,12,60,55,60,68,44,62,20,48,0,20,0,4,201,80,9,66,100,8,40,8,16,18,0,50,0,64,16,68,44,56,60,26,601,80,5,20,100,80,100,76,90,45,56,24,02,80,9,30,60,20,70,25,90,35,100,65,100,75,90,70,70,60,60,30,60,8,30,60,10,46,4,20,16,0,46,0,64,16,70,42,60,601,80,9,60,40,20,40,12,60,16,84,30,100,66,100,76,84,70,54,20,02,80,9,20,20,50,20,65,38,65,60,55,80,25,80,15,62,10,40,20,20,2,50,100,30,02,80,3,0,0,52,100,60,0,2,16,30,58,301,80,10,10,50,55,50,66,70,60,100,20,100,0,0,50,0,63,16,65,40,55,501,80,6,80,100,34,100,16,80,4,20,20,0,60,01,80,7,20,100,66,100,76,80,64,20,50,0,0,0,20,1002,80,4,80,100,20,100,0,0,60,0,2,10,50,60,502,80,3,80,100,20,100,0,0,2,10,50,60,501,80,8,80,100,30,100,16,80,4,20,20,0,60,0,70,50,50,502,80,4,20,100,0,0,10,50,70,50,2,80,100,60,01,80,2,50,100,30,01,80,4,60,100,44,20,30,0,0,0262,80,2,20,100,0,0,3,80,100,10,50,60,01,80,3,20,100,0,0,60,01,100,5,0,0,20,100,50,40,100,100,80,01,80,4,0,0,20,100,60,0,80,1001,80,9,4,20,14,0,46,0,64,20,76,80,66,100,34,100,16,80,4,201,80,7,10,50,60,50,72,60,78,90,70,100,20,100,0,02,80,9,4,20,14,0,46,0,64,20,76,80,66,100,34,100,16,80,4,20,2,40,30,70,02,80,7,10,50,60,50,72,60,78,90,70,100,20,100,0,0,2,45,50,60,01,80,10,78,90,66,100,30,100,18,90,14,76,66,30,62,10,50,0,10,0,2,102,80,2,20,100,80,100,2,50,100,30,01,80,6,20,100,4,20,10,0,50,0,62,10,80,1001,80,3,20,100,30,0,80,1001,100,5,20,100,0,0,56,70,80,0,100,1002,80,2,0,0,80,100,2,20,100,60,02,80,2,20,100,40,50,3,80,100,40,50,30,01,80,4,20,100,80,100,0,0,60,01,80,7,60,0,72,70,24,70,12,56,2,16,14,0,70,01,80,7,20,100,0,0,54,0,62,10,70,56,60,70,12,701,80,6,72,70,24,70,12,60,2,10,12,0,60,02,80,6,72,70,24,70,12,60,2,10,12,0,60,0,2,80,100,60,01,80,9,8,36,66,36,70,60,64,70,16,70,12,60,2,14,12,0,60,02,80,2,14,70,74,70,4,70,100,50,100,40,90,20,0271,80,7,60,0,14,0,4,16,14,70,74,70,52,-30,-4,-302,80,2,20,100,0,0,4,14,70,64,70,72,56,60,02,40,2,30,100,30,96,2,25,70,10,02,80,2,60,100,60,96,3,55,70,34,-30,6,-302,80,4,20,100,0,0,8,40,74,70,2,30,48,60,01,60,4,30,100,12,10,12,0,40,02,100,4,0,0,14,70,54,70,40,0,4,54,70,84,70,90,60,80,01,80,5,0,0,14,70,66,70,72,60,60,01,80,9,4,14,12,60,14,70,64,70,72,60,62,14,52,0,10,0,4,141,80,7,6,0,50,0,60,10,70,58,62,70,20,70,0,-301,80,7,60,0,15,0,7,10,17,60,25,70,75,70,54,-301,80,5,56,50,60,62,50,70,14,70,0,01,80,8,70,70,24,70,12,64,10,46,66,22,62,10,52,0,0,02,80,2,14,70,74,70,3,40,100,20,0,30,101,80,5,14,70,2,10,8,0,60,0,74,701,80,3,14,70,30,0,74,701,100,5,14,70,20,0,48,40,60,0,95,702,80,2,14,70,60,0,2,0,0,74,702,80,2,14,70,28,0,3,74,70,14,-30,-6,-301,80,4,14,70,74,70,0,0,60,028三、字符的提取

提取過程如下：求出字符串中每個字符的ASCⅡ碼值V；確定該字符在字符庫中的編號N；若字符庫為：0~9、φ、A~Z、a~z則：N=V-U+1其中：當(dāng)V≤57時U=48當(dāng)V≥97時U=60當(dāng)57<V<97時U=54進行一系列的坐標(biāo)變換，計算出編碼為N的字符中的每一個節(jié)點在用戶坐標(biāo)系中的坐標(biāo)。29ASCII表01234567890NULSOHSTXETXEOTENQACKBELBSHT1LFVTFFCRSOSIDLEDC1DC2DC32DC4NAKSYNETBCANEMSUMESCFSGS3RSUS空格!“#$%&‘4()*+,-./01523456789：；126<=>?@ABCDE7FGHIJKLMNO8PQRSTUVWXY9Z[\]^_`abc10defghijklm11nopqrstuvwxyz{|}~^←ASCII碼：0-9:48-57A-Z:65-90a-z:97-122Φ用@代替：6430四、字符串子程序設(shè)計程序流程圖如下:31X0,Y0為旋轉(zhuǎn)基點xs,ys為字符起點坐標(biāo)M為縮放比例字符寬度ZK筆劃數(shù)ZB筆畫的點數(shù)ZD32Fori=1ToZB(Num)33SubZifu(xs,ys,A$,M,X0,Y0,A0,OB)‘X0,Y0為旋轉(zhuǎn)基點,xs,ys為字符起點坐標(biāo)，M為縮放比例DimMMAsString*1DimZB(63),ZK(63),ZD(63,3),XZ(63,3,10),YZ(63,3,10)AsIntegerOpen"D:\JIAOCAI\ZIFU.TXT"ForInputAs#1ForN=1To63’N為字符序號Input#1,ZB(N),ZK(N)‘讀入字符的筆劃數(shù)、字寬Fori=1ToZB(N)‘I為筆劃序號Input#1,ZD(N,i)‘讀入第N個字符的第I個筆劃的折點數(shù)ForJ=1ToZD(N,i)‘J為折點序號Input#1,XZ(N,i,J),YZ(N,i,J)’讀入第N字符第I筆劃第J折點的坐標(biāo)NextJNextiNextNClose#1字符串子程序34U=0:ST=0‘U為ASCII表中位于第N個字符前面而未收入字符庫中的ASCII字符數(shù)目；ST為字符串的定位點坐標(biāo)ForN=1ToLen(A$)’Len(A$)為字符串的長度MM=Mid$(A$,N,1):V=Asc(MM)‘MM為A$串中的第N個字符；V為該字符的ASCII值IfV<=57ThenU=48ElseIfV>=97ThenU=60ElseU=54num=V-U+1Ifnum>0ThenFori=1ToZB(num)ForJ=1ToZD(num,i)x=M*(XZ(num,i,J)+ST):y=M*YZ(num,i,J)x=x+xs:y=y+ysCallRotation(A0,X0,Y0,x,y,XRYR)‘x0,y0為旋轉(zhuǎn)基點IfJ=1ThenOB.PSet(XR,YR)Else35OB.Line-(XR,YR)EndIfNextJNextiST=ST+ZK(num)‘下一字向后移ZKEndIfNextNEndSub36第五節(jié)尺寸標(biāo)注尺寸標(biāo)注是繪制工程圖樣的重要組成部分，標(biāo)注尺寸的形式可以分成兩種：線性尺寸和非線性尺寸。直線尺寸、直徑和半徑尺寸屬于線性尺寸，角度尺寸屬于非線性尺寸。37一、設(shè)計尺寸標(biāo)注應(yīng)滿足的要求一個完整的尺寸由四部分組成：尺寸線、尺寸界限、箭頭（或45°起止符號）和尺寸數(shù)字。因此設(shè)計尺寸標(biāo)注通用子程序應(yīng)能滿足以下幾點要求：1、可以實現(xiàn)箭頭、45°起止符號、尺寸線、尺寸界限和尺寸數(shù)字的任意組合；2、可以實現(xiàn)任意方向的尺寸標(biāo)注；3、可以書寫任意大小、方向的尺寸數(shù)字。38二、尺寸標(biāo)注的基本思想把尺寸線、尺寸界限、箭頭（或45°起止符號）均視為彼此相關(guān)的一些二維圖形，其中每一個圖形都可以看成平面內(nèi)眾多點的集合。這個點集的點完全由參考點和形式參數(shù)通過計算進行確定，并把之放在某數(shù)組中，通過矩陣變換后再將點集中的點相應(yīng)連接起來，即可實現(xiàn)尺寸線、尺寸界限、箭頭（或45°起止符號）的繪制。39三、尺寸的標(biāo)注形式1.直線尺寸2.圓的直徑尺寸3.圓弧的直徑尺寸4.圓弧的半徑尺寸5.圓弧的大半徑尺寸40四、尺寸標(biāo)注程序設(shè)計舉例1、直線尺寸標(biāo)注子程序設(shè)計在設(shè)計上圖所示尺寸標(biāo)注形時，其形式參數(shù)應(yīng)能滿足畫尺寸界限或不畫尺寸界限，并能實現(xiàn)任意方向的尺寸標(biāo)注等。在如圖4-32所示的設(shè)計方案中，其形式參數(shù)的幾何意義如下：X0,Y0-參考點的坐標(biāo)；A0–尺寸線與X軸正向的夾角，單位為（°）；L–尺寸線的長度；W–45°起止符號的長度；UL、DL–左端尺寸界限長度，其值可取正數(shù)、負數(shù)或零；UR、DR–右端尺寸界限長度，其值可取正數(shù)、負數(shù)或零。41SubCCLine(X0,Y0,l,A0,YC$,OB)Dimx(20),y(20)SC=1UL=20*SC:DL=8*SC:UR=20*SC:DR=8*SC:U=20*SC:W=4*SCSelectCaseYC$Case"YL","yl”:UL=0:DL=0Case"YR","yr”:UR=0:DR=0Case"YLR","ylr”:UL=0:DL=0:UR=0:DR=0EndSelectx(1)=X0:y(1)=Y0x(2)=X0:y(2)=Y0-UL-DLx(3)=x(1)+l:y(3)=Y0x(4)=x(3):y(4)=Y0-UR-DRx(5)=x(1):y(5)=Y0-Ux(6)=x(5)+l:y(6)=y(5)x(7)=x(5)-W:y(7)=y(5)-Wx(8)=x(5)+W:y(8)=y(5)+Wx(9)=x(7)+l:y(9)=y(7)x(10)=x(8)+l:y(10)=y(8)xx=x(5)+l/2-10:yy=y(5)+5B$=Str$(l)CallZifu(xx,yy,B$,0.1,X0,Y0,a0,OB)Fori=1To10CallRotation(a0,X0,Y0,x(i),y(i),xr,YR)Ifi=2*Int(i/2)ThendrawLine-(1,xr,YR,OB)Elsedrawline(0,xr,YR,OB)EndIfNextiEndSub422、半徑尺寸標(biāo)注子程序設(shè)計在設(shè)計半徑尺寸標(biāo)注形時，其形式參數(shù)應(yīng)能滿足畫尺寸線的延伸線和水平引出線或不畫尺寸線的延伸線和水平引出線，并能實現(xiàn)任意方向的半徑尺寸標(biāo)注等。在如圖示的設(shè)計方案中，其形式參數(shù)的幾何意義如下：（a）3426（5）1（b）半徑尺寸形式參數(shù)X0,Y0-參考點（圓心）的坐標(biāo)；A0–尺寸線與X軸正向的夾角，單位為度R–圓弧的半徑長；W–箭頭的長度；L–尺寸線的延伸線的長度；L0–水平引出線的長度，當(dāng)L0>0時，水平引出線向右畫線；當(dāng)L0<0時，水平引出線向左畫線；當(dāng)L0=0時，不畫水平引出線。43SubCR(X0,Y0,R,a0,TP$,OB)Dimx(20),y(20)B$="R"+Str$(R)V=2:L0=0:l=0IfR<20ThenW=0.5*RElseW=10IfTP$=“WP”O(jiān)rTP$=“wp”ThenL0=30:l=30“WP”—界線外水平標(biāo)注IfTP$="WX"OrTP$="wx"Thenl=30“WX”—界限外與尺寸線平行標(biāo)注IfR>200ThenX0=X0+R-200:R=200x(1)=X0:y(1)=Y0x(2)=X0+R:y(2)=Y0x(3)=x(2)-W:y(3)=y(2)+Vx(4)=x(2)-W:y(4)=y(2)-Vx(5)=x(2):y(5)=y(2)x(6)=x(5)+l:y(6)=Y0Fori=1To6CallRotation(a0,X0,Y0,x(i),y(i),xr,YR)Ifi=1Thendrawline(0,xr,YR,OB)ElsedrawLine(1,xr,YR,OB)EndIfNextixx=xr+L0:yy=YR:CallDrawLINE(1,xx,yy,OB)SelectCaseTP$Case"WP","wp"xx=xx-L0/2-10:yy=yy+5:a0=0Case"WX","wx"xx=X0+R+5:yy=Y0+5CaseElsexx=X0+R/2-20:yy=Y0+5EndSelectCallZifu(xx,yy,B$,0.1,X0,Y0,a0,OB)EndSub44第六節(jié)圖幅及標(biāo)題欄45

1.圖幅子程序設(shè)計圖紙幅面及格式如下：豎裝橫裝46根據(jù)幅面尺寸及格式，圖幅子程序應(yīng)能實現(xiàn)以下兩點：1、僅需要輸入圖號，即可按國標(biāo)規(guī)定進行繪制。2、圖紙可以橫放，也可以豎放。圖紙