Mercurial > hg > camir-aes2014
comparison toolboxes/MIRtoolbox1.3.2/somtoolbox/sompak_init_gui.m @ 0:e9a9cd732c1e tip
first hg version after svn
| author | wolffd | 
|---|---|
| date | Tue, 10 Feb 2015 15:05:51 +0000 | 
| parents | |
| children | 
   comparison
  equal
  deleted
  inserted
  replaced
| -1:000000000000 | 0:e9a9cd732c1e | 
|---|---|
| 1 function sompak_init_gui() | |
| 2 | |
| 3 %SOMPAK_INIT_GUI A GUI for using SOM_PAK initialization programs from Matlab. | |
| 4 % | |
| 5 % sompak_init_gui | |
| 6 % | |
| 7 % Launches a GUI which allows the use of SOM_PAK initialization | |
| 8 % programs (randinit and lininit) from Matlab. Notice that to use this | |
| 9 % function, the SOM_PAK programs must be in your search path, or the | |
| 10 % variable 'SOM_PAKDIR' which is a string containing the program path, | |
| 11 % must be defined in the workspace. SOM_PAK programs can be found | |
| 12 % from: http://www.cis.hut.fi/research/som_lvq_pak.shtml | |
| 13 % | |
| 14 % See also SOMPAK_INIT, SOMPAK_GUI, SOMPAK_SAMMON_GUI, | |
| 15 % SOMPAK_TRAIN_GUI, SOM_GUI. | |
| 16 | |
| 17 % Contributed to SOM Toolbox vs2, February 2nd, 2000 | |
| 18 % Copyright (c) by Juha Parhankangas | |
| 19 % http://www.cis.hut.fi/projects/somtoolbox/ | |
| 20 | |
| 21 % Juha Parhankangas 050100 | |
| 22 | |
| 23 h=findobj(get(0,'Children'),'Tag','InitGUI'); | |
| 24 | |
| 25 if ~isempty(h) | |
| 26 figure(h); | |
| 27 return; | |
| 28 end | |
| 29 | |
| 30 a = figure('Color',[0.8 0.8 0.8], ... | |
| 31 'PaperType','a4letter', ... | |
| 32 'Position',[483 407 172 440], ... | |
| 33 'Tag','InitGUI'); | |
| 34 b = uicontrol('Parent',a, ... | |
| 35 'Units','points', ... | |
| 36 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 37 'Callback','close gcf',... | |
| 38 'FontWeight','demi', ... | |
| 39 'Position',[8 20 50 20], ... | |
| 40 'String','CLOSE', ... | |
| 41 'Tag','Pushbutton1'); | |
| 42 b = uicontrol('Parent',a, ... | |
| 43 'Units','points', ... | |
| 44 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 45 'Callback','sompak_rb_control init_ok', ... | |
| 46 'FontWeight','demi', ... | |
| 47 'Position',[86 20 50 20], ... | |
| 48 'String','OK', ... | |
| 49 'Tag','Pushbutton2'); | |
| 50 b = uicontrol('Parent',a, ... | |
| 51 'Units','points', ... | |
| 52 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 53 'Position',[8 50 130 300], ... | |
| 54 'Style','frame', ... | |
| 55 'Tag','Frame1'); | |
| 56 b = uicontrol('Parent',a, ... | |
| 57 'Units','points', ... | |
| 58 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 59 'Position',[12 54 122 40], ... | |
| 60 'Style','frame', ... | |
| 61 'Tag','Frame2'); | |
| 62 b = uicontrol('Parent',a, ... | |
| 63 'Units','points', ... | |
| 64 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 65 'FontWeight','demi', ... | |
| 66 'Position',[45.5 78 55 12], ... | |
| 67 'String','INIT TYPE', ... | |
| 68 'Style','text', ... | |
| 69 'Tag','StaticText1'); | |
| 70 b = uicontrol('Parent',a, ... | |
| 71 'Callback','sompak_rb_control linear',... | |
| 72 'Units','points', ... | |
| 73 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 74 'Position',[14 56 17 16], ... | |
| 75 'Style','radiobutton', ... | |
| 76 'Tag','LINEAR', ... | |
| 77 'Value',1); | |
| 78 | |
| 79 udata.inittype = 'linear'; | |
| 80 | |
| 81 b = uicontrol('Parent',a, ... | |
| 82 'Callback','sompak_rb_control rand',... | |
| 83 'Units','points', ... | |
| 84 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 85 'Position',[73 56 17 16], ... | |
| 86 'Style','radiobutton', ... | |
| 87 'Tag','RANDOM'); | |
| 88 b = uicontrol('Parent',a, ... | |
| 89 'Units','points', ... | |
| 90 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 91 'FontWeight','demi', ... | |
| 92 'HorizontalAlignment','left', ... | |
| 93 'Position',[33 58 30 12], ... | |
| 94 'String','Linear', ... | |
| 95 'Style','text', ... | |
| 96 'Tag','StaticText2'); | |
| 97 b = uicontrol('Parent',a, ... | |
| 98 'Units','points', ... | |
| 99 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 100 'FontWeight','demi', ... | |
| 101 'HorizontalAlignment','left', ... | |
| 102 'Position',[91 58 37 12], ... | |
| 103 'String','Random', ... | |
| 104 'Style','text', ... | |
| 105 'Tag','StaticText3'); | |
| 106 b = uicontrol('Parent',a, ... | |
| 107 'Units','points', ... | |
| 108 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 109 'Position',[12 96 122 40], ... | |
| 110 'Style','frame', ... | |
| 111 'Tag','Frame3'); | |
| 112 b = uicontrol('Parent',a, ... | |
| 113 'Units','points', ... | |
| 114 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 115 'FontWeight','demi', ... | |
| 116 'Position',[36.4235 118.588 74 12], ... | |
| 117 'String','NEIGHBORHOOD', ... | |
| 118 'Style','text', ... | |
| 119 'Tag','StaticText4'); | |
| 120 b = uicontrol('Parent',a, ... | |
| 121 'Callback','sompak_rb_control bubble',... | |
| 122 'Units','points', ... | |
| 123 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 124 'Position',[14 98 17 16], ... | |
| 125 'Style','radiobutton', ... | |
| 126 'Tag','BUBBLE', ... | |
| 127 'Value',1); | |
| 128 | |
| 129 udata.neigh='bubble'; | |
| 130 | |
| 131 b = uicontrol('Parent',a, ... | |
| 132 'Callback','sompak_rb_control gaussian',... | |
| 133 'Units','points', ... | |
| 134 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 135 'Position',[73 98 17 16], ... | |
| 136 'Style','radiobutton', ... | |
| 137 'Tag','GAUSSIAN'); | |
| 138 b = uicontrol('Parent',a, ... | |
| 139 'Units','points', ... | |
| 140 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 141 'FontWeight','demi', ... | |
| 142 'HorizontalAlignment','left', ... | |
| 143 'Position',[33 100 32 12], ... | |
| 144 'String','Bubble', ... | |
| 145 'Style','text', ... | |
| 146 'Tag','StaticText5'); | |
| 147 b = uicontrol('Parent',a, ... | |
| 148 'Units','points', ... | |
| 149 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 150 'FontWeight','demi', ... | |
| 151 'HorizontalAlignment','left', ... | |
| 152 'Position',[89.5 100 43 12], ... | |
| 153 'String','Gaussian', ... | |
| 154 'Style','text', ... | |
| 155 'Tag','StaticText6'); | |
| 156 b = uicontrol('Parent',a, ... | |
| 157 'Units','points', ... | |
| 158 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 159 'Position',[12 138 122 40], ... | |
| 160 'Style','frame', ... | |
| 161 'Tag','Frame4'); | |
| 162 b = uicontrol('Parent',a, ... | |
| 163 'Units','points', ... | |
| 164 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 165 'FontWeight','demi', ... | |
| 166 'Position',[45 162 55 12], ... | |
| 167 'String','TOPOLOGY', ... | |
| 168 'Style','text', ... | |
| 169 'Tag','StaticText7'); | |
| 170 b = uicontrol('Parent',a, ... | |
| 171 'Callback','sompak_rb_control hexa',... | |
| 172 'Units','points', ... | |
| 173 'Position',[14 140 17 16], ... | |
| 174 'Style','radiobutton', ... | |
| 175 'Tag','HEXA', ... | |
| 176 'Value',1); | |
| 177 | |
| 178 udata.topol='hexa'; | |
| 179 | |
| 180 b = uicontrol('Parent',a, ... | |
| 181 'Callback','sompak_rb_control rect',... | |
| 182 'Units','points', ... | |
| 183 'Position',[73 140 17 16], ... | |
| 184 'Style','radiobutton', ... | |
| 185 'Tag','RECT'); | |
| 186 b = uicontrol('Parent',a, ... | |
| 187 'Units','points', ... | |
| 188 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 189 'FontWeight','demi', ... | |
| 190 'HorizontalAlignment','left', ... | |
| 191 'Position',[33 142 30 12], ... | |
| 192 'String','Hexa', ... | |
| 193 'Style','text', ... | |
| 194 'Tag','StaticText8'); | |
| 195 b = uicontrol('Parent',a, ... | |
| 196 'Units','points', ... | |
| 197 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 198 'FontWeight','demi', ... | |
| 199 'HorizontalAlignment','left', ... | |
| 200 'Position',[90 142 30 12], ... | |
| 201 'String','Rect', ... | |
| 202 'Style','text', ... | |
| 203 'Tag','StaticText9'); | |
| 204 b = uicontrol('Parent',a, ... | |
| 205 'Units','points', ... | |
| 206 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 207 'Position',[12 180 122 40], ... | |
| 208 'Style','frame', ... | |
| 209 'Tag','Frame5'); | |
| 210 b = uicontrol('Parent',a, ... | |
| 211 'Units','points', ... | |
| 212 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 213 'FontWeight','demi', ... | |
| 214 'HorizontalAlignment','left', ... | |
| 215 'Position',[25 202 33 12], ... | |
| 216 'String','X-dim', ... | |
| 217 'Style','text', ... | |
| 218 'Tag','StaticText10'); | |
| 219 b = uicontrol('Parent',a, ... | |
| 220 'Units','points', ... | |
| 221 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 222 'FontWeight','demi', ... | |
| 223 'HorizontalAlignment','left', ... | |
| 224 'Position',[89 202 33 12], ... | |
| 225 'String','Y-dim', ... | |
| 226 'Style','text', ... | |
| 227 'Tag','StaticText11'); | |
| 228 b = uicontrol('Parent',a, ... | |
| 229 'Units','points', ... | |
| 230 'BackgroundColor',[1 1 1], ... | |
| 231 'Callback','sompak_rb_control xdim',... | |
| 232 'Position',[20 183 40 20], ... | |
| 233 'Style','edit', ... | |
| 234 'Tag','XDIM'); | |
| 235 b = uicontrol('Parent',a, ... | |
| 236 'Units','points', ... | |
| 237 'BackgroundColor',[1 1 1], ... | |
| 238 'Callback','sompak_rb_control ydim',... | |
| 239 'Position',[85 183 40 20], ... | |
| 240 'Style','edit', ... | |
| 241 'Tag','YDIM'); | |
| 242 | |
| 243 udata.xdim=[]; | |
| 244 udata.ydim=[]; | |
| 245 | |
| 246 b = uicontrol('Parent',a, ... | |
| 247 'Units','points', ... | |
| 248 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 249 'Position',[12 222 122 40], ... | |
| 250 'Style','frame', ... | |
| 251 'Tag','Frame6'); | |
| 252 b = uicontrol('Parent',a, ... | |
| 253 'Units','points', ... | |
| 254 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 255 'FontWeight','demi', ... | |
| 256 'Position',[25 245 95 12], ... | |
| 257 'String','OUTPUT VARIABLE', ... | |
| 258 'Style','text', ... | |
| 259 'Tag','StaticText12'); | |
| 260 b = uicontrol('Parent',a, ... | |
| 261 'Units','points', ... | |
| 262 'BackgroundColor',[1 1 1], ... | |
| 263 'Callback','sompak_rb_control out_var',... | |
| 264 'Position',[22 226 102 20], ... | |
| 265 'String','''ans''', ... | |
| 266 'Style','edit', ... | |
| 267 'Tag','OUT_VAR'); | |
| 268 | |
| 269 udata.out_var='ans'; | |
| 270 | |
| 271 b = uicontrol('Parent',a, ... | |
| 272 'Units','points', ... | |
| 273 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 274 'Position',[12 264 122 40], ... | |
| 275 'Style','frame', ... | |
| 276 'Tag','Frame7'); | |
| 277 b = uicontrol('Parent',a, ... | |
| 278 'Units','points', ... | |
| 279 'BackgroundColor',[1 1 1], ... | |
| 280 'Callback','sompak_rb_control out_file',... | |
| 281 'Position',[15 267 50 20], ... | |
| 282 'Style','edit', ... | |
| 283 'Tag','OUT_FILE'); | |
| 284 | |
| 285 udata.out_file=[]; | |
| 286 | |
| 287 b = uicontrol('Parent',a, ... | |
| 288 'Units','points', ... | |
| 289 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 290 'FontWeight','demi', ... | |
| 291 'HorizontalAlignment','left', ... | |
| 292 'Position',[40 288 60 12], ... | |
| 293 'String','OUTPUT FILE', ... | |
| 294 'Style','text', ... | |
| 295 'Tag','StaticText13'); | |
| 296 b = uicontrol('Parent',a, ... | |
| 297 'Units','points', ... | |
| 298 'BackgroundColor',[0.701961 0.701961 0.701961], ... | |
| 299 'Callback','sompak_rb_control out_ft',... | |
| 300 'FontSize',9, ... | |
| 301 'FontWeight','demi', ... | |
| 302 'HorizontalAlignment','left', ... | |
| 303 'Max',3, ... | |
| 304 'Min',1, ... | |
| 305 'Position',[70 272 62 15], ... | |
| 306 'String',{'No File';'mat-file';'cod-file'}, ... | |
| 307 'Style','popupmenu', ... | |
| 308 'Tag','OUT_FILE_TYPE', ... | |
| 309 'Value',1); | |
| 310 | |
| 311 udata.out_file_type=''; | |
| 312 | |
| 313 b = uicontrol('Parent',a, ... | |
| 314 'Units','points', ... | |
| 315 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 316 'Position',[12 306 122 40], ... | |
| 317 'Style','frame', ... | |
| 318 'Tag','Frame8'); | |
| 319 b = uicontrol('Parent',a, ... | |
| 320 'Units','points', ... | |
| 321 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 322 'FontWeight','demi', ... | |
| 323 'HorizontalAlignment','left', ... | |
| 324 'Position',[57 330 30 12], ... | |
| 325 'String','DATA', ... | |
| 326 'Style','text', ... | |
| 327 'Tag','StaticText14'); | |
| 328 b = uicontrol('Parent',a, ... | |
| 329 'Units','points', ... | |
| 330 'BackgroundColor',[1 1 1], ... | |
| 331 'Callback','sompak_rb_control data',... | |
| 332 'Position',[15 309 50 20], ... | |
| 333 'Style','edit', ... | |
| 334 'Tag','DATA'); | |
| 335 | |
| 336 udata.data=[]; | |
| 337 | |
| 338 b = uicontrol('Parent',a, ... | |
| 339 'Units','points', ... | |
| 340 'Callback','sompak_rb_control input_ft',... | |
| 341 'FontSize',9, ... | |
| 342 'FontWeight','demi', ... | |
| 343 'HorizontalAlignment','left', ... | |
| 344 'Max',3, ... | |
| 345 'Min',1, ... | |
| 346 'Position',[70 314 62 15], ... | |
| 347 'String',{'Variable';'mat-file';'dat-file'}, ... | |
| 348 'Style','popupmenu', ... | |
| 349 'Tag','INPUT_FILE_TYPE', ... | |
| 350 'Value',1); | |
| 351 udata.input_file_type=''; | |
| 352 | |
| 353 b = uicontrol('Parent',a, ... | |
| 354 'Units','points', ... | |
| 355 'BackgroundColor',[0.8 0.8 0.8], ... | |
| 356 'FontSize',12, ... | |
| 357 'FontWeight','bold', ... | |
| 358 'HorizontalAlignment','left', ... | |
| 359 'Position',[57 355 30 12], ... | |
| 360 'String','INIT', ... | |
| 361 'Style','text', ... | |
| 362 'Tag','StaticText15'); | |
| 363 | |
| 364 set(gcf,'UserData',udata); | |
| 365 | |
| 366 | |
| 367 | |
| 368 | |
| 369 | 
