1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46
| function inputmat
fig = figure('units','pixels','position',[0 0 300 200],...
'menubar','none','toolbar','none');
movegui(fig,'center')
k = 1;
for m = 1:5
for n=5:-1:1
uicontrol('style','checkbox','units','pixels',...
'position',[33+(m-1)*20 75+(n-1)*20 20 20],...
'callback',@cbcb,'userdata',k);
k = k+1;
end
end
axes('units','pixels','position',[167 75 100 100],'box','on',...
'xlim',[0 5],'ylim',[0 5],'xticklabel','','yticklabel','',...
'xtick',0:5,'ytick',0:5,'xgrid','on','ygrid','on','gridlinestyle','-')
[x,y] = meshgrid(5:-1:1,1:5);
text(x(:)-.5,y(:)-.5,num2str(zeros(numel(x),1)),'hor','center')
uicontrol('style','pushbutton','units','pixels','position',[100 25 100 25],...
'string','Save','callback',@pbcb)
function cbcb(obj,event)
h = findobj('type','text');
k = get(obj,'userdata');
str = get(h(k),'string');
if strcmp(str,'0')
str = '1';
else
str = '0';
end
set(h(k),'string',str)
function pbcb(obj,event)
h = findobj('style','checkbox');
X = get(h(end:-1:1),'value');
X = reshape([X{:}],5,[]);
assignin('base','X',X) |
Partager