cehui.asv

这个是用matlab写的测回法程序,很好的望大家一定要踊跃下载

clear all
clc
global edit2 edit3 edit4 edit5 edit1
fsize=[530  300];
figpos=[100 100 fsize(1:2)];
mainfig=figure( 'Position' ,figpos ,'Color' ,[0.83 0  0.78],'NumberTitle' , 'off ' ,'Name' , '测回法水平观察' );
frame1  =  uicontrol(mainfig, 'Style', 'frame','Position',[5 190 300 250]);
label1 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[10  230  50  25],'String','盘左');
label2 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[100  260  50  25],'String','方向1');
label3 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[180  280  70  20],'String','dd.mmmm');
edit2 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[180  260  70  20],'String','180.2345');

label4 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[100  200  50  25],'String','方向2');
label5 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[180  220  70  20],'String','dd.mmmm');
edit3 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[180  200  70  20],'String','180.3412');

label6 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[10  80  50  25],'String','盘右');
label7 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[100  110  50  25],'String','方向1');
label8 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[180  130  70  20],'String','dd.mmmm');
edit4 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[180  110  70  20],'String','180.2345');


label9 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[100  50  50  25],'String','方向2');
label10 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[180  70  70  20],'String','dd.mmmm');
edit5 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[180  50  70  20],'String','180.3412');

label11 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[300  150  50  25],'String','限差');
edit6 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[370  150  70  20],'String','180.3412');
label12 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[450  150  50  20],'String','mm');






frame1  =  uicontrol(mainfig, 'Style', 'frame', 'Position',[5 190 300 250]);
frame2  =  uicontrol(mainfig, 'Style', 'frame', 'Position',[290 50 220 140]);

radio1=uicontrol(mainfig, 'Style', 'radio','Position',[20 200 100 20],'String','总体拟合','Value',1,'callback','f_r1');
radio1_1=uicontrol(mainfig, 'Style', 'radio','Position',[20 140 100 20],'String','直线拟合','Value',1,'callback','f_r1_1');  
radio1_2=uicontrol(mainfig, 'Style', 'radio','Position',[20 70 100 20],'String','样条拟合','Value',0,'callback','f_r1_2');
 
radio2=uicontrol(mainfig, 'Style', 'radio','Position',[300 200 100 20],'String','各点拟合','Value',0,'callback','f_r2');
label6 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[300  150  170  15],'String','输入要拟合的点号，0代表全部');
edit6 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[300  130  170  20],'String','0');
radio2_1=uicontrol(mainfig, 'Style', 'radio','Position',[300 100 100 20],'String','直线拟合','Value',0,'callback','f_r2_1');
radio2_2=uicontrol(mainfig, 'Style', 'radio','Position',[300 70 100 20],'String','样条拟合','Value',0,'callback','f_r2_2');

button1=uicontrol(mainfig, 'Style',' push ', 'Position',[10 10 70 25],'String' ,'画拟合图','CallBack','draw_nihe');
button2=uicontrol(mainfig, 'Style',' push ', 'Position',[110 10 120 25],'String' ,'画各时期位移图','CallBack','draw_weiyi');

button5=uicontrol(mainfig, 'Style',' push ', 'Position',[410 10 50 25],'String' ,'关闭','CallBack','formclose');

label7 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[120  72  50  15],'String','验前方差');
edit7 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[170  72  30  20],'String','2');
label9 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[200  72  20  15],'String','mm');

label8 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[400  72  50  15],'String','验前方差');
edit8 =  uicontrol(mainfig ,'Style' , 'edit' ,'Position',[450  72  30  20],'String','2');
label10 =  uicontrol(mainfig ,'Style' , 'text' ,'Position',[480  72  20  15],'String','mm');

set(mainfig,'Menubar','none')