米散射matlab主程序，关于Mie球形粒子计算.zip

%jiemian.m figure global flag ps S1 S2; global num1 num2 num3; global nber1 nber2 nber3 nber4 nber5; num1=0;num2=0;num3=0;nber1=0;nber2=0;nber3=0;nber4=0;nber5=0; set(gcf,'defaultuicontrolumits','normalized'); set(gcf,'defaultuicontrolfontname','Times New Roman'); set(gcf,'defaultuicontrolfontsize',10); set(gcf,'defaultuicontrolhorizontal','left'); h_axes=axes('position',[0.05,0.05,0.7,0.88]); h_menu=uimenu(gcf,'label','Intensity'); h_menusub1=uimenu(h_menu,'label','Absoluteintensity','callback',['set(gcbo,"check","on");', 'set(h_menusub2,"check","off");', 'set(hedit4,"enable","on","string","");', 'set(hedit5,"enable","on","string","");', 'set(htest1,"string","d:");']); set(h_menusub1,'check','on'); h_menusub2=uimenu(h_menu,'label','Relativeintensity','callback',['set(gcbo,"check","on");', 'set(h_menusub1,"check","off");', 'set(hedit4,"enable","off","string","unable");', 'set(hedit5,"enable","on","string","unable");', 'set(htest1,"string","a:");']); htext1=uicontrol('style','text','position',[0.77,0.85,0.03,0.05],'string','d:'); hedit1=uicontrol('style','edit','position',[0.80,0.85,0.18,0.05]); htext2=uicontrol('style','text','position',[0.77,0.79,0.03,0.05],'string','m:'); hedit2=uicontrol('style','edit','position',[0.80,0.79,0.18,0.05]); htext3=uicontrol('style','text','position',[0.77,0.73,0.03,0.05],'string','N:'); hedit3=uicontrol('style','edit','position',[0.80,0.73,0.18,0.05]); htext4=uicontrol('style','text','position',[0.77,0.67,0.03,0.05],'string','lamda:'); hedit4=uicontrol('style','edit','position',[0.80,0.67,0.18,0.05]); htext5=uicontrol('style','text','position',[0.77,0.61,0.03,0.05],'string','r:'); hedit5=uicontrol('style','edit','position',[0.80,0.61,0.18,0.05]); htext6=uicontrol('style','text','position',[0.77,0.51,0.22,0.05],'string','Ke:'); htext7=uicontrol('style','text','position',[0.77,0.45,0.22,0.05],'string','Ks:'); hpush1=uicontrol('style','push','string','作坐胰�先 I','position',[0.77,0.35,0.22,0.05],'callback',['ps="push1";','push;']); hpush2=uicontrol('style','push','string','作坐作坐�先 I1','position',[0.77,0.29,0.22,0.05],'callback',['ps="push2";','push;']); hpush3=uicontrol('style','push','string','作坐作坐�先 I2','position',[0.77,0.23,0.22,0.05],'callback',['ps="push3";','push;']); hpush4=uicontrol('style','push','string','可晅� P','position',[0.77,0.17,0.22,0.05],'callback',['ps="push4";','push;']); set(gcf,'UserData',[hedit1,hedit2,hedit3,hedit4,hedit5,htext6,htext7,h_menusub1]); hpush5=uicontrol('style','push','string','Reset',[0.77,0.11,0.22,0.05],'callback',['globals;','H=get(gcf,"UserData");','hedit1=H(1);hedit2=H(2);hedit3=H(3);hedit4=H(4);hedit5=H(5);htext6=H(6);htext7=H(7);']);