《計算機圖形學》實驗報告
《實驗名稱》
直線段裁剪 姓名
學號
專業
班級
天津大學計算機科學與技術學院 一、實驗目得 熟練掌握 Cｏhen—Sutherland 直線裁剪算法，并編程實現 二、實驗內容 (1）
裁剪窗口為矩形窗口,且矩形邊與坐標軸平行,長寬自己定。
(2）
待裁剪線段端點坐標自己定;裁剪線段涵蓋完全可見、不完全可見、完全不可見類型。
(3）
要求顯示待裁剪線段并用不同顏色標示出裁剪結果。
實現方法:一般情況下,需要判斷一條直線就是全部可見，全部不可見,部分裁剪(一段裁剪)，全部裁剪(兩端裁剪).通過把裁剪區域分成許多部分,然后給每一段被裁剪得線段得兩端分配一位代碼,通過少量if語句與一個ｃase語句就可以判斷出具體情況。
偽代碼如下: #define CLＩＰ_CODE_C 0
0000ｘ?＃dｅfine CLIP_CＯDE_N 0
800０ｘ?＃defiｎｅ CLIP＿COＤE_S
0x0004 ＃deｆine CLIP_COＤE_Ｅ
０x0０02 #definｅ CLIＰ_CODE_W
0x0０01 ＃dｅfine CLIＰ_CＯＤE_ＮE ０
a000x?#dｅfｉnｅ ＣLIP_CODE_SE 0
６000x?#dｅfｉne ＣLＩP_CＯＤＥ_ＮＷ 0
900０ｘ?#define ＣLIＰ_CODE_ＳW 0
５000x? 實驗步驟：
1)生成裁剪窗口，窗口由直線 xl=250，xr＝８5０,yb=250，yt=450 ２)繪制直線段
3)編寫 Cohen—Sｕtheｒlaｎd 直線裁剪算法,對直線段進行裁剪 編碼定義規則：
第一位 C1:若端點位于窗口之左側,即 X<xl，則 C1＝1，否則 Ｃ1=０。
第二位 C２:若端點位于窗口之右側，即 X〉xr,則 C2=１,否則 C2=0。
第三位 C3：若端點位于窗口之下側，即 Y〈yb，則 C3=1,否則 C3=0。
第四位 C4:若端點位于窗口之上側，即 Y＞yｔ,則 C4＝1，否則 C4=0. 裁剪步驟: 對所有直線得端點都建立了區域碼之后，就可按區域碼判斷直線在窗口之內或窗口之外。這可分為如下幾種情況：
①若一直線得兩個端點得區域碼均為０000 則此直線在窗口邊界之內,應子保留。
②若一直線得兩個端點得區域碼得同一位同時為 1，則此直線全部在窗口邊界之外,應子裁剪。例如,若一直線得一個端點得區域碼為 1001,另一個端點得區域碼為 0101，則此兩端點得區域碼得第一位均為１,說明此兩端點均在窗口邊界之左，因此,直線在窗口邊界之外，應予裁剪。可用將直線兩個端點得區域碼進行與操作得方法,判斷直線就是否在窗口之外，若與操作得結果為0000則兩端點得區域碼任何位均不同時為１此直線不一定被裁剪。
③以上兩種情況之外得直線,有可能穿過窗口，也有可能不穿過窗口,
下圖中所示得兩條直線都不符合情況②得要求,但一條直線（Ｐ1P２）穿過窗口,另一直線(P３P４)不穿過窗口。對這類直線可以進行如下處理：取窗口外得一個端點與窗口邊界比較以確定可排除直線得哪一部分，然后，把直線剩下得部分與其她邊界比較,這樣一直到直線全部被排除或確定直線得哪一部分在窗口之內為止。可按“左、右、下、上”得次序建立檢查直線端點與窗口邊界關系得算法。
圖③ 三、實驗結果
畫線效果一:
畫線效果二:
其她效果用戶可自行繪制 四、實驗分析與總結 掌握了ｏpenＧL得基本用法,掌握了Cｏhen—Ｓｕｔherlanｄ直線裁剪算法,并編程實現出來、 五、源代碼 vｏid ＣCｓＬineViｅw::Coｈen(）/／Cohｅｎ-Sｕtherland 算法 {
;egnahC ＬOＯB?
;ｙ,ｘ ｅlbuoｄ? RC0=ＥｎCｏde（Ｐoｉntx［0]，Poinｔy［0]）；
RC１=EｎＣodｅ（Poinｔx［1],Pointy［1]）；
)ＥＵRＴ(ｅlihｗ? ｛
Cｈange＝FALSE；
))1CＲ|0CＲ( == 0（ｆｉ?//｛ ?
之取簡?
? ｒｅｔurn;
} ? ?
elsｅ ｉf(０!=(RC0 & RＣ1))
/／{
之棄簡?
? reｔurn;
｝ ? ? ?
esle?
{
外口窗在點 0p 證保,1Ｐ與０P 換交，內口窗在點 0P 果如／/）0CR==0(fｉ? { ? ? ?
//
值標坐得點換交?
? ｄｏuble ＴPｏinｔx，ＴPoｉnty;
?
;]０[ytnioP=yｔniｏＰＴ;］0[ｘtnｉoP=xtnｉoPT?
?
；］１[ytnioP=]０[ｙtnｉｏＰ;]1［ｘtnioP=］０[xtｎioP?
?
；ｙｔnioPT=]1[ｙtｎioP;xｔnioPT=］1［ｘｔnioP? ? ? ／/
值碼編得點換交?
uｎsigneｄ int ＴRＣ;
?
；CRＴ=1CR;1CR=０CＲ;０CＲ＝CＲT?
} ?// ? ?
剪裁序順得上、下、右、左按? ? ?
側左得口窗于位點 0P//) ＴFEL & 0CR(fｉ?
? {
? ?
y 點交求/／;lxw=x? ? ?
nｉoP(/)]0［ｘtnioＰ－ｘ（＊)]0[ytnｉoＰ—]1［yｔｎioP(+］0[ytｎioP=ｙ?ｔx[１］-Pｏintｘ［0]）;
；ｙ=］0[ytｎioＰ;x=］０[ｘtnioＰ? ? ? ?
;ＥＵRT=eｇnahＣ?
? ?
ＲC０=EnCode(Ｐoiｎｔx［0],Ｐoinｔy[０]）；RC1=ＥnCodｅ(Pｏｉｎtx［1]，Pointy［１］）；
? ?｝ ?
?
側右得口窗于位點０P//) THGＩR ＆ ０ＣR（fi?
{
? ?
ｙ點交求／／;rxｗ=x?
?
y=Ｐｏｉnty[０]＋(Ｐointｙ［１]-Pｏintｙ[0］）*（ｘ—Pointｘ[0])/(Pointx［１］-Ｐｏintx[0])；
? ?
Ｐｏintｘ［0]=ｘ；Pointy[0］＝y；
? ?
；ＥＵRT=egnａｈC?
? tnｉoP，]1[ｘtnioP(edoCnE=１CR；）]0[ytnｉoP,]0[xｔnioP(eｄoＣｎE=0CR?ｙ［1]）；
? ? ?} ? ?
側下得口窗于位點 0P//) MOＴTOB & 0CR（fi? { ? ? ? ? ?
x 點交求／／；byw＝ｙ?
? x=Ｐointx［０]+(Pｏintx[1］—Pointx[0])＊(ｙ-Poiｎｔy[0］)/(Pointy[1］-Pointy[０])；
? Poinｔx[0］=ｘ；Pointy[0]=y;
?
；ＥURT=eｇnaｈC?
? RC0=EｎＣode(Poｉntx[0],Ｐｏinｔy［０]);RC1＝EnCodｅ(Pointx[１］，Pointy［１］）;
} ? ?
?
? ｉf（ＲC０ & TOP )//P0 點位于窗口得上側
｛ ?
x 點交求//;ｔyw=ｙ? ? ? ? ｎiｏP（／)]0[ytnioＰ—y(＊）］0[xtｎiｏP-]１[xｔnioP（+］０［xtnioP＝x?
ty[1]—Ｐｏinty[0]）；
；y=］0[ｙｔnioP;ｘ=]0［xtniｏP?
? ?
；EUＲT＝ｅgnahC?
? ｏＰ，]1[xｔnioＰ(ｅdoCnE=1CR；)］0[ytniｏP,]0[xtnｉoP(ｅdoＣnE=0ＣR?inty[1])；
? ｝
? if（FALSE＝=Changｅ)
｛ ? ?
? ? return;
}? ?
} ? ｝ ?｝ voｉｄ CＣsＬineＶiew:：ＯｎDraw(CＤC* pＤC）
{
CRｅｃt Ｒeｃｔ；
ＧetClieｎtRect（&Ｒect);/／獲得客戶區得大小
ＣBiｔmap Ｂitmａp,＊ｐＢitmap；
;）1ＰAMTIB_BDI（pａｍtiBdaoL、ｐamtｉＢ? CDＣ MeｍDC;
；))(CDteG（ＣDelbitapeｔaｅrＣ、CDｍeM?
;）ｐaｍtiB&(ｔcｅｊbOtcｅｌeS、CDmeM＝pamtｉBp? S,0，０，erutｃiP＆，)(thｇieＨ、tｃｅR，）（hｔdiＷ、tｃeＲ,0,0(tlBtiB、CDmeＭ?ＲCCOＰY)；
題標口窗//;）"口窗＂，02-bｙw，2／）rxw+lｘｗ(（tｕＯｔxeT、ＣDmeＭ? //繪制窗口與直線
CPｅn Ｐｅn３,*pＯldＰen3;//定義３個像素寬度得畫筆
;）)０,0，0(BGＲ,２,DＩLＯＳ_SP(nｅPeｔａerＣ、3nｅP?
;）3ｎeP＆(tｃejbOｔｃeleＳ、CDmeＭ=３neＰdlOｐ? ＭemＤＣ、MｏveTo(wｘｌ,wyt）；ＭemDC、LｉneＴo（wxr，wyt);
;)bｙw，lxw（oTｅnｉL、CDｍeＭ；)ｂyw,rxw(oＴｅｎiL、ＣＤmeM? ＭemＤC、LiｎｅTｏ（wxl,wｙt)；ＭemDC、SelectObject(ｐOldPeｎ3);
Ｐｅn3、DelｅteOｂｊecｔ（）;
CPeｎ Pen１，*ｐOlｄPen1;//定義 1 個像素寬度得畫筆
Ｐｅn1、CreatｅPｅn（PS＿SOLID，２,RGB(2５5,0,0）);
；)1neP＆（tceｊbＯｔｃeleＳ、ＣDmeM=1nePdlOp? if(ｍ＿i>＝1）
{ ? ?
;)）]0［yｔｎioＰ(DNＵOR,)］0[xｔｎｉoＰ(DNUOＲ（oTeｖｏＭ、CDmeM?
? ；）)]1［yｔnioP（DＮＵＯR,)］1[xtnｉoP（ＤNUOR（oTeniL、CＤmeM? ?
} ? ＭeｍDC、SｅlｅctＯbject（pOldＰen1）；
Pｅn1、DelｅｔeObjecｔ(); ?
；)（CDteG=ｃd* CＤＣ? ＲS,０,0,ＣDmｅM&，)（thgｉｅH、tｃeR,）(htｄｉＷ、tceＲ,0，0（tｌBtｉB〉—cd?CCＯPY)；
;)ｐamtｉBp(tｃｅｊｂＯtceleＳ、CDmｅM?} voiｄ CCsLiｎeView:：Ｏｎdｒaｗline（) //屏幕畫線函數 {
ｉｆ(FALSE==m＿Ａttａtch)
｛ ? ?
；）)(CDｔｅG(CDelbiｔapetaerC、ｅruｔciＰ?
＊paｍｔiBC?
；pａmtiＢp*,pamtiＢ?
Bｉtmap＝new CBiｔmap;
；）1PAＭTIB_ＢＤI(ｐamtiBdaoL>-pamｔiB?
;)pamｔｉB（tcejbOｔceleS、erｕtｃiP=ｐamtiBp?
；ＥURＴ＝hctａttＡ_m? }
m＿Ｄrａw=TRUE;
;0=i_m?
;)EＳLＡF(etadiｌａvnI? 示顯//;)"法算剪裁線直 dnalrehtuS—nehｏC"（txeTwoｄniＷteS〉-)(dnWｎiaMtｅGxfA?標題
MessageBｏｘ("請使用鼠標在屏幕上繪制直線,然后點擊裁剪按鈕進行裁剪”,”提示＂,MB_OKCANCＥL); ?｝ voiｄ CCsLineVｉeｗ::ＯnMouseＭovｅ(UIＮT nFlagｓ, CPoｉnt pｏint)
／／鼠標移動函數 {
// TOＤＯ: Add youｒ mｅssａge ｈandler cｏde here ａnｄ/or call dｅfault
if（TRＵＥ==ｍ_Draw）
{ ?
）2＜i_ｍ（fi? { ? ?
? Poiｎtx[m_i]=ｐoｉnt、x;Ｐointｙ[m_i］=poｉnt、ｙ;
? Invalidate（FALSE);
｝ ? }
;）ｔniop ,sgalFn(evoＭesuoMnＯ:：weiVC?} vｏｉd CＣsLineView::OｎＬBuｔtoｎDｏwn(UINT nFlａgs， CＰoiｎt pｏint) //單擊鼠標左鍵函數 {
?
）warＤ_m==EURT(fi? {
)２〈ｉ＿m（fi?
｛
Poiｎｔｘ［m_i]=ｐoint、ｘ;Pointｙ[m＿i]=pｏint、ｙ;
? ? m＿i＋＋;
｝ ? } ?
；)tｎｉop ,sgaｌＦn(nｗoDnottuBLnO：：wｅｉVC?}
推薦訪問： 線段 剪裁 實驗在偉大祖國73華誕之際，我參加了單位組織的“光影鑄魂”主題黨日活動，集中觀看了抗美援朝題材影片《長津湖》，再一次重溫這段悲壯歷史，再一次深刻感悟偉大抗美援朝精神。1950年10月，新中國剛剛成立一年，
根據省局黨組《關于舉辦習近平談治國理政（第四卷）讀書班的通知》要求，我中心通過專題學習、專題研討以及交流分享等形式，系統的對《習近平談治國理政》（第四卷)進行了深入的學習與交流，下面我就來談一談我個人
《習近平談治國理政》（第四卷）是在百年變局和世紀疫情相互疊加的大背景下，對以習近平同志為核心的黨中央治國理政重大戰略部署、重大理論創造、重大思想引領的系統呈現。它生動記錄了新一代黨中央領導集體統籌兩個
《真抓實干做好新發展階段“三農工作”》是《習近平談治國理政》第四卷中的文章，這是習近平總書記在2020年12月28日中央農村工作會議上的集體學習時的講話。文章指出，我常講，領導干部要胸懷黨和國家工作大
在《習近平談治國理政》第四卷中，習近平總書記強調，江山就是人民，人民就是江山，打江山、守江山，守的是人民的心。從嘉興南湖中駛出的小小紅船，到世界上最大的執政黨，在中國共產黨的字典里，“人民”一詞從來都
黨的十八大以來，習近平總書記以馬克思主義戰略家的博大胸襟和深謀遠慮，在治國理政和推動全球治理中牢固樹立戰略意識，在不同場合多次圍繞戰略策略的重要性，戰略和策略的關系，提高戰略思維、堅定戰略自信、強化戰
《習近平談治國理政》第四卷集中展示了以習近平同志為核心的黨中央在百年變局和世紀疫情相互疊加背景下，如何更好地堅持和發展中國特色社會主義而進行的生動實踐與理論探索；對于新時代堅持和發展什么樣的中國特色社
在黨組織的關懷下，我有幸參加了區委組織部組織的入黨積極分子培訓班。為期一周的學習，學習形式多樣，課程內容豐富，各位專家的講解細致精彩，對于我加深對黨的創新理論的認識、對黨的歷史的深入了解、對中共黨員的
《習近平談治國理政》第四卷《共建網上美好精神家園》一文中指出：網絡玩命是新形勢下社會文明的重要內容，是建設網絡強國的重要領域。截至2021年12月，我國網民規模達10 32億，較2020年12月增長4
剛剛召開的中國共產黨第十九屆中央委員會第七次全體會議上討論并通過了黨的十九屆中央委員會向中國共產黨第二十次全國代表大會的報告、黨的十九屆中央紀律檢查委員會向中國共產黨第二十次全國代表大會的工作報告和《