freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

靜態(tài)模擬無人機航拍圖像系統(tǒng)畢業(yè)設(shè)計論文(編輯修改稿)

2025-04-05 07:29 本頁面
 

【文章內(nèi)容簡介】 ng, ByVal y As Long, ByVal crColor As Long) As Long Private Sub cloud_Click() Dim Seed As Single 種子值的隨機數(shù)發(fā)生器 這個數(shù)組定義了邊界為不同的顏色 Bound = Array(10, 0, 15, 25, 30, 35, 40, 45) 這些數(shù)組定義地形 顏色的高度界限 . R = Array(0, 32, 64, 96, 128, 159, 191, 223, 255) G = Array(0, 32, 64, 96, 128, 159, 191, 223, 255) B = Array(255, 255, 255, 255, 255, 255, 255, 255, 255) 改變這些值來創(chuàng)建不同的效果。對于一個更明確海岸線,使前兩個綁定的值相同。 Seed = Timer 生成基于所述系統(tǒng)定時器地圖的種子 Randomize Seed 它應(yīng)該可以通過在這里使用他們的種子值來獲得以前的地圖 Caption = Terrain Generator Seed = amp。 Seed Generate_Heights Draw End Sub Private Sub exit_Click() Unload AerialFrame End Sub Private Sub Form_Load() Dim Seed As Single 種子值的隨機數(shù)發(fā)生器 這個數(shù)組定義了邊界 為不同的顏色 Bound = Array(10, 0, 15, 25, 30, 35, 40, 45) 這些數(shù)組定義地形顏色的高度界限 . R = Array(20, 23, 15, 20, 136, 145, 91, 88, 142) G = Array(14, 15, 85, 113, 136, 88, 55, 88, 142) B = Array(171, 199, 9, 11, 56, 41, 26, 88, 142) 改變這些值來創(chuàng)建不同的效果。對于一個更明 確 海岸線,使前兩個綁定的值相同 Seed = Timer 生成基于所述系統(tǒng)定時器地圖的種子 Randomize Seed 它應(yīng)該可以通過在這里使用他們的種子值來獲得以前的地圖 Caption = Terrain Generator Seed = amp。 Seed End Sub Private Sub Form_Click() 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 12 Generate_Heights Draw End Sub Private Sub Generate_Heights() 此生成高度值 被安置在高地數(shù)組中。該高度限定,當在地圖上繪制其中顏色被 顯示出來的方法是很難 解釋 的,生成的過程是最好的描述通過下面的圖表和說明來理解 : 初始狀態(tài): 1 1 1 1 i = 0狀態(tài): 1 2 1 2 2 2 1 2 1 i = 1狀態(tài): 1 3 2 3 1 3 3 3 3 3 2 3 2 3 2 3 3 3 3 3 1 3 2 3 1 最初,四角給出隨機高度值。然后, 對于那些半路之間的點的創(chuàng)建迭代高度值點在最后一次迭代,并在四個值的中間點。因此,當 i = 0時,圖中的“ 2”代表所添加的高度值,和當 i = 1 ,圖中的“ 3” 代表 補充 的 高 度 值。這 上面的方法 被重復(fù),直到迭代所需數(shù)量為止。新的點的高度值通過取平均來確定周圍的點,并加上隨機位移 來得到 。將 i的值越大,位移 越小,使得第一 次迭代對具有大的影響形狀的地形,但后面的迭代不 會有大的影響 ,只產(chǎn)生輕微的變化地形的現(xiàn)狀這使得地形少 Print 鋸齒和更加圓潤使用這種方法 。 Dim i As Long 迭代計數(shù)器 Dim x As Long 協(xié)調(diào) Dim y As Long 計數(shù)器 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 13 Dim Step As Long 用于計算在主循環(huán) Dim numb As Integer Erase Heights Inistialise在每個拐角處的高度 Heights(0, 0) = Rnd * 10 Heights(0, ROW 1) = Rnd * 10 Heights(ROW 1, 0) = Rnd * 10 Heights(ROW 1, ROW 1) = Rnd * 10 主迭代循環(huán)。為解釋見上面。 numb = If numb 1 Or numb 9 Then MsgBox 親,迭代次數(shù)超出范圍嘍! : GoTo 20 For i = 0 To numb – 1 Step = (ROW 1) / (2 ^ (i + 1)) For y = 0 To ROW 1 Step Step For x = 0 To ROW 1 Step Step If (y / Step) Mod 2 = 0 Then If Heights(x, y) = 0 Then Heights(x, y) = (Heights(x Step, y) + Heights(x + Step, y)) / 2 + (Rnd * SLOPE (SLOPE / 2)) * ((ITERATIONS i) / (i + 1)) End If Else If (x / Step) Mod 2 = 0 Then Heights(x, y) = (Heights(x, y Step) + Heights(x, y + Step)) / 2 + (Rnd * SLOPE (SLOPE / 2)) * ((ITERATIONS i) / (i + 1)) Else Heights(x, y) = (Heights(x Step, y Step) + Heights(x Step, y + Step) + Heights(x + Step, y Step) + Heights(x + Step, y + Step)) / 4 + (Rnd * SLOPE (SLOPE / 2)) * ((ITERATIONS i) / (i + 1)) End If End If Next Next Next 20 End Sub 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 14 Private Sub Draw() 繪制地形到基于高度圖的值的形式。該顯示的顏色為對應(yīng)于高度圖的值的像素是基于哪兩個高度界限的高度值之間。該在像素顯示的實際顏色來自之間的漸變邊界顏色,從而使地形融合在一起,看起來更現(xiàn)實的。高度圖還可以用于生成 3D地形。 Dim Color As Long Cls 繪制前清除表單 通過所有點的高度重復(fù)的地圖 For y = 0 To ROW 1 For x = 0 To ROW 1 檢查高度值對每個邊界上看到它位于 For i = 0 To UBound(Bound) If Heights(x, y) = Bound(i) Then Exit For Next If i = UBound(Bound) + 1 Then Color = RGB(R(i), G(i), B(i)) ElseIf i = 0 Then Color = RGB(R(0), G(0), B(0)) Else 計算兩個邊界顏色之間的梯度 Color = RGB(R(i) + (R(i + 1) R(i)) * ((Heights(x, y) Bound(i 1)) / (Bound(i) Bound(i 1))), G(i) + (G(i + 1) G(i)) * ((Heights(x, y) Bound(i 1)) / (Bound(i) Bound(i 1))), B(i) + (B(i + 1) B(i)) * ((Heights(x, y) Bound(i 1)) / (Bound(i) Bound(i 1)))) End If SetPixelV hdc, ScaleWidth \ 2 ROW \ 2 + x, ScaleHeight \ 2 ROW \ 2 + y, Color Next Next End Sub Private Sub Terrain_Click() Dim Seed As Single 種子值的隨機數(shù)發(fā)生器 這個數(shù)組定義了邊界為不同的顏色 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 15 Bound = Array(10, 0, 15, 25, 30, 35, 40, 45) 這些數(shù)組定義地形顏色的高度界限 R = Array(20, 23, 15, 20, 136, 145, 91, 88, 142) G = Array(14, 15, 85, 113, 136, 88, 55, 88, 142) B = Array(171, 199, 9, 11, 56, 41, 26, 88, 142) 改變這些值來創(chuàng)建不同的效果。對于一個更明確海岸線,使前兩個綁定的值相同。如果您創(chuàng)建更多的色彩邊界,地形可以變得更細致 Seed = Timer 生成基于所述系統(tǒng)定時器地圖的種子 Randomize Seed 它應(yīng)該可以通過在這里使用他們的種子值來獲得以前的地圖 Caption = Terrain Generator Seed = amp。 Seed Generate_Heights Draw End Sub 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 16 第五章 軟件實現(xiàn)效果圖 本軟 件通過 VB語言操作完成,在 window系統(tǒng)中運行正常,具體的效果的實現(xiàn)如下面所述。 圖 51 航拍云圖運行 界面( 1) 點擊航拍云圖按鈕,調(diào)用 cloud_Click()方法, 默認 迭代 9次獲取每個點的坐標和顏色值,然后調(diào)用 SetPixelV來畫圖, 在軟件中部生成航拍云圖 。 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 17 圖 52 航拍地形圖運行 界面( 2) 點擊航拍地形圖按鈕,調(diào)用 Terrain_Click()方法,默認迭代 9次獲取每個點的坐標和顏色值,然后調(diào)用 SetPixelV來畫圖,在軟件中部生成航拍地形圖。 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 18 圖 52 修改迭代次數(shù) 航拍圖運行 界面( 2) 修改迭代次數(shù),改為迭代 7次,點擊航拍地形圖按鈕,調(diào)用 Terrain_Click()方法,迭代 7次獲取每個點的坐標和顏色值,然后調(diào)用 SetPixelV來畫圖,在軟件中部生成航拍地形圖。 由于沒有迭代完全 , 所以很多點沒有被算出來并畫出來 ,這樣可以方便用戶了解本軟件的實現(xiàn)方法和過程 。 三江學(xué)院 2021屆本科生畢業(yè)設(shè)計(論文) 19 結(jié)束語 畢業(yè)論文從下發(fā)任務(wù)書到現(xiàn)在已經(jīng)過去幾個月了,課題已經(jīng)做好了,論文也結(jié)束,馬上就要答辯了?,F(xiàn)在是快要和老師同學(xué)們告別的畢業(yè)時間了。記得剛開始選課題時,老師的十個課題我 們都不曾接觸過,都沒有聽說過,感覺心里特別沒底。老師給的課題領(lǐng)域可以說是完全沒有接觸過。在熟悉課題到課題設(shè)計的過程中遇到了很多問題,尤其是在理解分形技術(shù)的應(yīng)用時,都沒有搞明白是干什么的,感覺有頭大的感受,全部都是算法,以前我們自己編寫程序時,都沒有去關(guān)注過代碼中的算法的實現(xiàn),通過這次畢業(yè)設(shè)計后我終于理解了算法的重要性了,可以說這次的課題中主要就是對與分形算法的了解和實現(xiàn),前面沒有理解透徹時,都感覺無從下手,特別是看了計算機圖形學(xué)后感覺自己真的是沒有理解好。雖然在沒有
點擊復(fù)制文檔內(nèi)容
黨政相關(guān)相關(guān)推薦
文庫吧 www.dybbs8.com
備案圖片鄂ICP備17016276號-1