exm09071_1.m

来自「这本书是matlab经典书籍」· M 代码 · 共 13 行

bdw=0.01;		
tpw=0.15;		
pos=[1/2+bdw,2/3+bdw,1/2-2*bdw,1/3-bdw-tpw];						%<3>
figure('Units','normalized','Position',pos,'Color',[0.9,0.65,0])
																			%<4>
set(gcf,'Name','试验窗')												%<5> 

P=ones(16,16)*NaN;
P(1,5)=1;P(2:14,4)=1;P(15,5)=1;P(16,6:11)=1;P(15,12)=1;P(9:14,13)=1;
P(2:9,6)=1;P(9,7)=1;P(8,8)=1;P(9,9)=1;P(8,10)=1;P(9,11)=1;P(8,12)=1;
P(2:14,5)=2;P(10:15,6:11)=2;P(9,8)=2;P(9,10)=2;P(9:14,12)=2;
set(gcf,'Pointer','Custom','PointerShapeCData',P,'PointerShapeHotSpot',[2,5])