image thumbnail

plotmydataR14

by

 

09 Nov 2004 (Updated )

Read and plot .xls files by column quickly.

plotmydatacheck.m
% plotmydatacheck (Version 2.0)
%
% Written by LeRoy W Alaways    Version 1.0 Summer 2000 at Fastball Inc.
% lwalaways@mac.com             Matlab R11
%                               Version 2.0 October 19, 2003
%                               Matlab R12/R13  6.5.0
%
% This program is designed to control the check box list in plotmydata.
%

function plotmydatacheck(flag)

global xflag yflag cflag mflag lflag columns

if flag < 99
    
    if flag > (columns + 1)
        flag = columns + 1;
    end
   
   xflag = flag;
   
	set(findobj('tag','ckbx_value(1)'),'value',0)
	set(findobj('tag','ckbx_value(2)'),'value',0)
	set(findobj('tag','ckbx_value(3)'),'value',0)
	set(findobj('tag','ckbx_value(4)'),'value',0)
	set(findobj('tag','ckbx_value(5)'),'value',0)
	set(findobj('tag','ckbx_value(6)'),'value',0)
	set(findobj('tag','ckbx_value(7)'),'value',0)
	set(findobj('tag','ckbx_value(8)'),'value',0)
	set(findobj('tag','ckbx_value(9)'),'value',0)
	set(findobj('tag','ckbx_value(10)'),'value',0)
	set(findobj('tag','ckbx_value(11)'),'value',0)
	set(findobj('tag','ckbx_value(12)'),'value',0)
	set(findobj('tag','ckbx_value(13)'),'value',0)
   set(findobj('tag','ckbx_value(14)'),'value',0)
   set(findobj('tag','ckbx_value(15)'),'value',0)
   set(findobj('tag','ckbx_value(16)'),'value',0)
   set(findobj('tag','ckbx_value(17)'),'value',0)
   set(findobj('tag','ckbx_value(18)'),'value',0)
   set(findobj('tag','ckbx_value(19)'),'value',0)
   set(findobj('tag','ckbx_value(20)'),'value',0)
   set(findobj('tag','ckbx_value(21)'),'value',0)
   set(findobj('tag','ckbx_value(22)'),'value',0)
   set(findobj('tag','ckbx_value(23)'),'value',0)
   set(findobj('tag','ckbx_value(24)'),'value',0)
   set(findobj('tag','ckbx_value(25)'),'value',0)
   set(findobj('tag','ckbx_value(26)'),'value',0)

	if flag == 1
   	set(findobj('tag','ckbx_value(1)'),'value',1)
	elseif flag == 2
   	set(findobj('tag','ckbx_value(2)'),'value',1)
	elseif flag == 3
   	set(findobj('tag','ckbx_value(3)'),'value',1)
	elseif flag == 4
   	set(findobj('tag','ckbx_value(4)'),'value',1)
	elseif flag == 5
   	set(findobj('tag','ckbx_value(5)'),'value',1)
	elseif flag == 6
   	set(findobj('tag','ckbx_value(6)'),'value',1)
	elseif flag == 7
   	set(findobj('tag','ckbx_value(7)'),'value',1)
	elseif flag == 8
   	set(findobj('tag','ckbx_value(8)'),'value',1)
	elseif flag == 9
   	set(findobj('tag','ckbx_value(9)'),'value',1)
	elseif flag == 10
   	set(findobj('tag','ckbx_value(10)'),'value',1)
	elseif flag == 11
   	set(findobj('tag','ckbx_value(11)'),'value',1)
	elseif flag == 12
   	set(findobj('tag','ckbx_value(12)'),'value',1)
	elseif flag == 13
   	set(findobj('tag','ckbx_value(13)'),'value',1)
	elseif flag == 14
      set(findobj('tag','ckbx_value(14)'),'value',1)
   elseif flag == 15
      set(findobj('tag','ckbx_value(15)'),'value',1)
   elseif flag == 16
      set(findobj('tag','ckbx_value(16)'),'value',1)
   elseif flag == 17
      set(findobj('tag','ckbx_value(17)'),'value',1)
   elseif flag == 18
      set(findobj('tag','ckbx_value(18)'),'value',1)
   elseif flag == 19
      set(findobj('tag','ckbx_value(19)'),'value',1)
   elseif flag == 20
      set(findobj('tag','ckbx_value(20)'),'value',1)
   elseif flag == 21
      set(findobj('tag','ckbx_value(21)'),'value',1)
   elseif flag == 22
      set(findobj('tag','ckbx_value(22)'),'value',1)
   elseif flag == 23
      set(findobj('tag','ckbx_value(23)'),'value',1)
   elseif flag == 24
      set(findobj('tag','ckbx_value(24)'),'value',1)
   elseif flag == 25
      set(findobj('tag','ckbx_value(25)'),'value',1)
   elseif flag == 26
   	set(findobj('tag','ckbx_value(26)'),'value',1)
	else
   	%more flags
   end
   
elseif flag < 199
    
    if (flag - 100) > (columns + 1)
        flag = columns + 101;
    end
   
   yflag = flag;
   
   set(findobj('tag','ckbx_value(101)'),'value',0)
	set(findobj('tag','ckbx_value(102)'),'value',0)
	set(findobj('tag','ckbx_value(103)'),'value',0)
	set(findobj('tag','ckbx_value(104)'),'value',0)
	set(findobj('tag','ckbx_value(105)'),'value',0)
	set(findobj('tag','ckbx_value(106)'),'value',0)
	set(findobj('tag','ckbx_value(107)'),'value',0)
	set(findobj('tag','ckbx_value(108)'),'value',0)
	set(findobj('tag','ckbx_value(109)'),'value',0)
	set(findobj('tag','ckbx_value(110)'),'value',0)
	set(findobj('tag','ckbx_value(111)'),'value',0)
	set(findobj('tag','ckbx_value(112)'),'value',0)
	set(findobj('tag','ckbx_value(113)'),'value',0)
   set(findobj('tag','ckbx_value(114)'),'value',0)
   set(findobj('tag','ckbx_value(115)'),'value',0)
   set(findobj('tag','ckbx_value(116)'),'value',0)
   set(findobj('tag','ckbx_value(117)'),'value',0)
   set(findobj('tag','ckbx_value(118)'),'value',0)
   set(findobj('tag','ckbx_value(119)'),'value',0)
   set(findobj('tag','ckbx_value(120)'),'value',0)
   set(findobj('tag','ckbx_value(121)'),'value',0)
   set(findobj('tag','ckbx_value(122)'),'value',0)
   set(findobj('tag','ckbx_value(123)'),'value',0)
   set(findobj('tag','ckbx_value(124)'),'value',0)
   set(findobj('tag','ckbx_value(125)'),'value',0)
   set(findobj('tag','ckbx_value(126)'),'value',0)

	if flag == 101
   	set(findobj('tag','ckbx_value(101)'),'value',1)
	elseif flag == 102
   	set(findobj('tag','ckbx_value(102)'),'value',1)
	elseif flag == 103
   	set(findobj('tag','ckbx_value(103)'),'value',1)
	elseif flag == 104
   	set(findobj('tag','ckbx_value(104)'),'value',1)
	elseif flag == 105
   	set(findobj('tag','ckbx_value(105)'),'value',1)
	elseif flag == 106
   	set(findobj('tag','ckbx_value(106)'),'value',1)
	elseif flag == 107
   	set(findobj('tag','ckbx_value(107)'),'value',1)
	elseif flag == 108
   	set(findobj('tag','ckbx_value(108)'),'value',1)
	elseif flag == 109
   	set(findobj('tag','ckbx_value(109)'),'value',1)
	elseif flag == 110
   	set(findobj('tag','ckbx_value(110)'),'value',1)
	elseif flag == 111
   	set(findobj('tag','ckbx_value(111)'),'value',1)
	elseif flag == 112
   	set(findobj('tag','ckbx_value(112)'),'value',1)
	elseif flag == 113
   	set(findobj('tag','ckbx_value(113)'),'value',1)
	elseif flag == 114
      set(findobj('tag','ckbx_value(114)'),'value',1)
   elseif flag == 115
      set(findobj('tag','ckbx_value(115)'),'value',1)
   elseif flag == 116
      set(findobj('tag','ckbx_value(116)'),'value',1)
   elseif flag == 117
      set(findobj('tag','ckbx_value(117)'),'value',1)
   elseif flag == 118
      set(findobj('tag','ckbx_value(118)'),'value',1)
   elseif flag == 119
      set(findobj('tag','ckbx_value(119)'),'value',1)
   elseif flag == 120
      set(findobj('tag','ckbx_value(120)'),'value',1)
   elseif flag == 121
      set(findobj('tag','ckbx_value(121)'),'value',1)
   elseif flag == 122
      set(findobj('tag','ckbx_value(122)'),'value',1)
   elseif flag == 123
      set(findobj('tag','ckbx_value(123)'),'value',1)
   elseif flag == 124
      set(findobj('tag','ckbx_value(124)'),'value',1)
   elseif flag == 125
      set(findobj('tag','ckbx_value(125)'),'value',1)
   elseif flag == 126
   	set(findobj('tag','ckbx_value(126)'),'value',1)
	else
   	%more flags
   end
   
elseif flag < 299
   
   cflag = flag;
   
   set(findobj('tag','ckbx_value(201)'),'value',0)
	set(findobj('tag','ckbx_value(202)'),'value',0)
	set(findobj('tag','ckbx_value(203)'),'value',0)
	set(findobj('tag','ckbx_value(204)'),'value',0)
   set(findobj('tag','ckbx_value(205)'),'value',0)
   set(findobj('tag','ckbx_value(206)'),'value',0)
   set(findobj('tag','ckbx_value(207)'),'value',0)
   
   if flag == 201
   	set(findobj('tag','ckbx_value(201)'),'value',1)
	elseif flag == 202
   	set(findobj('tag','ckbx_value(202)'),'value',1)
	elseif flag == 203
   	set(findobj('tag','ckbx_value(203)'),'value',1)
	elseif flag == 204
   	set(findobj('tag','ckbx_value(204)'),'value',1)
	elseif flag == 205
      set(findobj('tag','ckbx_value(205)'),'value',1)
    elseif flag == 206
      set(findobj('tag','ckbx_value(206)'),'value',1)
     elseif flag == 207
      set(findobj('tag','ckbx_value(207)'),'value',1)
   else
   	%more flags
   end
   
elseif flag < 399
   
    mflag = flag;
   
    set(findobj('tag','ckbx_value(301)'),'value',0)
	set(findobj('tag','ckbx_value(302)'),'value',0)
	set(findobj('tag','ckbx_value(303)'),'value',0)
    set(findobj('tag','ckbx_value(304)'),'value',0)
    set(findobj('tag','ckbx_value(305)'),'value',0)
    set(findobj('tag','ckbx_value(306)'),'value',0)
    set(findobj('tag','ckbx_value(307)'),'value',0)
   
   if flag == 301
   	set(findobj('tag','ckbx_value(301)'),'value',1)
	elseif flag == 302
   	set(findobj('tag','ckbx_value(302)'),'value',1)
	elseif flag == 303
   	set(findobj('tag','ckbx_value(303)'),'value',1)
	elseif flag == 304
   	set(findobj('tag','ckbx_value(304)'),'value',1)
	elseif flag == 305
      set(findobj('tag','ckbx_value(305)'),'value',1)
	elseif flag == 306
      set(findobj('tag','ckbx_value(306)'),'value',1)
    elseif flag == 307
      set(findobj('tag','ckbx_value(307)'),'value',1)
   else
   	%more flags
   end
   
else
   
   lflag = flag;
   
   set(findobj('tag','ckbx_value(401)'),'value',0)
	set(findobj('tag','ckbx_value(402)'),'value',0)
	set(findobj('tag','ckbx_value(403)'),'value',0)
	set(findobj('tag','ckbx_value(404)'),'value',0)
    set(findobj('tag','ckbx_value(405)'),'value',0)
   
   if flag == 401
   	set(findobj('tag','ckbx_value(401)'),'value',1)
	elseif flag == 402
   	set(findobj('tag','ckbx_value(402)'),'value',1)
	elseif flag == 403
   	set(findobj('tag','ckbx_value(403)'),'value',1)
	elseif flag == 404
   	set(findobj('tag','ckbx_value(404)'),'value',1)
    elseif flag == 405
   	set(findobj('tag','ckbx_value(405)'),'value',1)
   else
   	%more flags
   end
end

Contact us