exm1071_1.m

来自「这是本人收集的一些程序源代码」· M 代码 · 共 16 行

%exm1071_1.m

%在屏幕的右上方创建一个背景为"橘黄"色的"试验窗"。
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])