基于Visual FoxPro的船舶浮性曲線計算

宋晶晶

摘要： 船舶靜水力曲線是船舶設(shè)計過程中的重要技術(shù)資料，船舶浮性曲線是船舶靜水力曲線的一部分。傳統(tǒng)方法是用表格進行數(shù)值計算，雖然計算原理比較簡明，但由于船體線型的離散性，數(shù)據(jù)處理量相當(dāng)大，過程繁瑣。利用Visual FoxPro的強大功能，可以很方便地實現(xiàn)船舶浮性曲線的計算，不但能減輕計算的工作量，而且能提高精確度。

關(guān)鍵詞： 船舶靜水力曲線船舶浮性曲線Visual FoxPro

一、引言

船舶靜水力曲線是船舶設(shè)計過程中的重要技術(shù)資料，全面表達了船舶在靜止正浮狀態(tài)下浮性和穩(wěn)性要素隨吃水而變化的規(guī)律，并作為穩(wěn)性計算、縱傾計算及其他計算的基礎(chǔ)，經(jīng)常用來計算與航海性能有關(guān)的性能參數(shù)。船舶浮性曲線是船舶靜水力曲線的一部分，傳統(tǒng)方法是用表格進行數(shù)值計算。雖然計算原理比較簡明，但由于船體線型的離散型，數(shù)據(jù)處理量相當(dāng)大，過程繁瑣，因此有必要開發(fā)一套以計算機為平臺的船舶浮性曲線計算軟件。

二、開發(fā)環(huán)境

Visual FoxPro 6.0是微軟公司推出的一款速度快、高效靈活、功能強大、面向?qū)ο蟮年P(guān)系型數(shù)據(jù)庫管理系統(tǒng)，它采用了可視化的操作界面、面向?qū)ο蟮某绦蛟O(shè)計方法，使用Reshmore查詢優(yōu)化技術(shù)提高了系統(tǒng)性能。無論是組織信息、運行查詢、創(chuàng)建集成的關(guān)系型數(shù)據(jù)庫系統(tǒng)，還是為最終用戶建立功能全面的數(shù)據(jù)庫管理應(yīng)用系統(tǒng)，Visual FoxPro6.0都能有效地完成。

三、船舶浮性曲線的計算

1.型值表端點坐標修正

船舶浮性曲線的數(shù)據(jù)計算通常按梯形法進行，各船舶設(shè)計單位所制定的表格形式上雖略有差異，但基本原理是完全一致的。由于船體型線在艏艉端和舭部曲度變化較大，為了提高計算精度，往往在進行浮性參數(shù)計算之前運用增加中間坐標或端點坐標修正的方法針對艏艉和舭部的型值進行修正。

2.浮性曲線的介紹

型排水體積曲線▽=f（z）、總排水體積曲線▽k=f（z）、總排水量曲線△=f（z）、浮心縱向坐標曲線X=f（z）、浮心豎向坐標曲線Z=f（z）、漂心縱向坐標曲線X=f（z）、水線面面積曲線A=f（z）、每厘米吃水噸數(shù)曲線TPC=f（z）。其計算公式如下：

A=2?蘩yd x≈2δL?∑′y

公式中，∑′y=y+y+…y+y-

3.計算浮性曲線的程序代碼

首先在text1中輸入站號數(shù)，單擊“確定”按鈕Command1。

Command1的click事件代碼：

zh=val（thisform.text1.value）&&將text1.value轉(zhuǎn)換成數(shù)值，保存在變量zh中

public declare sxbk（zh），mjcs（zh），gjcs（zh），mjhs（zh），；

gjhs（zh），sxbklf（zh）

*定義后續(xù)相關(guān)的水線半寬、面矩乘數(shù)、慣矩乘數(shù)、面矩函數(shù)、慣矩函數(shù)、水線半寬立方等公共數(shù)組

thisform.Command4.enabled=.t.&&使“確定”按鈕Command4生效

相關(guān)參數(shù)輸入完畢，單擊“計算”按鈕Command5。

Command5的click事件代碼（只截取到AW有關(guān)的部分）：

if fl=0 or fb=0

messagebox（′還未輸入垂線間長或船寬！′，′系統(tǒng)提示′）

return

endif

dL=L/（zh-1）

for i=1 to zh

mjcs（i）=i-ceiling（zh/2）

endfor

for i=1 to zh

gjcs（i）=mjcs（i）^2 &&慣矩乘數(shù)

endfor

for i=1 to zh

mjhs（i）=sxbk（i）*mjcs（i）&&面矩函數(shù)

endfor

for i=1 to zh

gjhs（i）=sxbk（i）*gjcs（i） &&慣矩函數(shù)

endfor

for i=1 to zh

sxbklf（i）=sxbk（i）^3 &&水線半寬立方

endfor

s1=0

for i=1 to zh &&求各站點水線半寬總和

s1=s1+sxbk（i）&&水線半寬總和

endfor

sxbkxz=s1-（sxbk（1）+sxbk（zh））/2&&水線半寬修正后

thisform.label5.caption=′Aw′+alltrim（str（n1））

AW=2*dL*sxbkxz

四、結(jié)語

在Visual FoxPro中實現(xiàn)船舶浮性曲線的計算，不但減輕了船舶計算的工作量，而且提高了計算的精確度，為船舶設(shè)計提供了準確的數(shù)據(jù)，從而顯著提高了船舶設(shè)計工作的效率，縮短了整個造船的周期，在高校的教學(xué)示范中也起到了良好的演示作用。

參考文獻：

［1］盛振邦.船舶靜力學(xué).上海：上海交通大學(xué)出版社，1991.

［2］劉雪梅.船舶原理.哈爾濱：哈爾濱工程大學(xué)出版社，2005.

［3］熊發(fā)涯.Visual FoxPro程序設(shè)計.中國鐵道出版社，2005.