Code covered by the BSD License
if dimension==1; if (0<currentgraphx) & (currentgraphx<=columnsshown) & (1<=currentgraphy) & (currentgraphy<=rows) & (changerbuttondownvalue==1); if changersafety==0 | (changersafety==1 & currenty==totalrows) if changerplanes==1; a(currenty:currenty+changerrows-1, currentx:currentx+changercols-1, end)=changer; run CA_Display; end; else; errordlg('Can only change latest state','Error'); end; end; end; if dimension==2 if (0<currentgraphx) & (currentgraphx<=columnsshown) & (0<currentgraphy) & (currentgraphy<=rowsshown) & (changerbuttondownvalue==1); if changersafety==0 | (changersafety==1 & currentiteration==completediterations) a(currenty:currenty+changerrows-1, currentx:currentx+changercols-1, currentiteration+1-changerplanes+1:currentiteration + 1)=flipdim(changer,3); run CA_Display; else; errordlg('Can only change latest state','Error'); end; end; end;
Contact us at files@mathworks.com