function?spectrum_of_road_surface_roughness?
clc;clear;close?all
OldHandle?=?findobj（?‘Type‘‘figure‘‘Tag‘‘PSD‘?）?;
if?ishandle（OldHandle）
????close（OldHandle）?;
end
fig?=?‘figure‘;
h0=figure（‘name‘‘ADAMS三維隨機路面生成器‘‘numbertitle‘‘off‘...
????‘position‘[280?80?560?545]‘menubar‘‘none‘‘tag‘‘PSD‘...
????‘resize‘‘off‘）;
uipanel（gcf‘highlightcolor‘‘b‘‘shadowcolor‘‘w‘）;
uicontrol（gcf‘position‘[20?450?80?30]‘style‘‘text‘...
????‘string‘‘路面等級：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[10?480?550?50]‘style‘‘text‘...
????‘string‘‘基于正弦疊加原理模擬隨機路面‘...
????‘foregroundcolor‘[0.5?0.5?0.5]‘fontsize‘22‘fontname‘‘宋體‘）;
uicontrol（gcf‘position‘[110?440?60?45]‘style‘‘popupmenu‘...
????‘string‘{‘A‘‘B‘‘C‘‘D‘‘E‘‘F‘‘G‘‘H‘}‘value‘2‘fontsize‘12...
????‘tag‘‘lumiandengji‘‘enable‘‘on‘‘foregroundcolor‘‘b‘）;
uicontrol（gcf‘position‘[170?450?120?30]‘style‘‘text‘...
????‘string‘‘縱向長度（X）：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[270?460?50?25]‘style‘‘edit‘...
????‘string‘‘40‘‘fontsize‘10‘tag‘‘zongxiangchangdu‘）;
uicontrol（gcf‘position‘[320?453?30?30]‘style‘‘text‘...
????‘string‘‘m‘‘fontsize‘10）;
%==========================================================================
uicontrol（gcf‘position‘[350?450?120?30]‘style‘‘text‘...
????‘string‘‘橫向長度（Y）：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[455?460?50?25]‘style‘‘edit‘...
????‘string‘‘20?‘‘fontsize‘10‘tag‘‘hengxiangchangdu‘）;
uicontrol（gcf‘position‘[505?453?30?30]‘style‘‘text‘...
????‘string‘‘m‘‘fontsize‘10）;
%==========================================================================
uicontrol（gcf‘position‘[20?400?80?30]‘style‘‘text‘...
????‘string‘‘迭代次數：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[105?410?55?25]‘style‘‘edit‘...
????‘string‘‘20‘‘fontsize‘12‘tag‘‘diedaicishu‘）;
uicontrol（gcf‘position‘[170?400?120?30]‘style‘‘text‘...
????‘string‘‘空間頻率上限：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[270?410?50?25]‘style‘‘edit‘...
????‘string‘‘4.83‘‘fontsize‘10‘tag‘‘pinlvshangxian‘）;
uicontrol（gcf‘position‘[320?403?30?30]‘style‘‘text‘...
????‘string‘‘/m‘‘fontsize‘10）;
%==========================================================================
uicontrol（gcf‘position‘[350?400?120?30]‘style‘‘text‘...
????‘string‘‘空間頻率下限：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[455?410?50?25]‘style‘‘edit‘...
????‘string‘‘0.008‘‘fontsize‘10‘tag‘‘pinlvxiaxian‘）;
uicontrol（gcf‘position‘[505?403?30?30]‘style‘‘text‘...
????‘string‘‘/m‘‘fontsize‘10）;
uicontrol（gcf‘position‘[20?350?80?30]‘style‘‘text‘...
????‘string‘‘垂向偏移（Z）：‘‘fontsize‘10）;
uicontrol（gcf‘position‘[105?360?55?25]‘style‘‘edit‘...
????‘string‘‘0?‘‘fontsize‘12‘tag‘‘chuixiangpianyi‘）;
%==========================================================================
uicontrol（gcf‘position‘[370?350?80?30]‘style‘‘text‘...
????‘string‘‘橫向間隔（Y）：‘‘fontsize‘10）;
uicontrol（gcf‘pos