欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Matlab實現(xiàn)鼠標光標變成愛心和瞄準鏡形狀

 更新時間：2022年08月08日 11:15:25   作者：slandarer  
這篇文章主要為大家詳細介紹了如何利用Matlab實現(xiàn)將鼠標光標變成愛心和瞄準鏡等形狀，文中的示例代碼講解詳細，感興趣的可以了解一下

寶~你快看，我連鼠標光標都是愛你的形狀：

不愛的話就變成狙擊鏡的形狀！！

我買了個小風車：

那么這些各種各樣的形狀的鼠標光標是咋設(shè)置的嘞？

原理解釋

眾所周知MATLAB中的光標形狀可以通過如下的方式自定義：

set(gcf,'Pointer','cross')

但能定義的種類非常有限，只有這么幾種：‘arrow’ | ‘ibeam’ | ‘crosshair’ | ‘watch’ | ‘topl’ | ‘topr’ | ‘botl’ | ‘botr’ | ‘circle’ | ‘cross’ | ‘fleur’ | ‘custom’ | ‘left’ | ‘top’ | ‘right’ | ‘bottom’ | ‘hand’。

但這里面有一個叫做custom的東西，可以支持我們自己制作光標圖形，

首先我們運行一下如下代碼：

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])

會發(fā)現(xiàn)光標變成了這樣：

我們來看參數(shù)的含義：

PointerShapeCData

鼠標顏色矩陣，透明處為nan，黑色處為1，白色處為2，實際上代碼中的變量P是長這樣的：

PointerShapeHotSpot

熱點，即鼠標點擊時的作用點，如下圖所示，假如我們矩陣是這樣16x16的，若是將熱點設(shè)置為[2,5]，則點擊時實際點擊的位置就是圖中紅色方塊的位置。

創(chuàng)建mat文件并調(diào)用

因為畫圖像憑感覺畫肯定是畫不好的，因此我寫了個小程序用來構(gòu)造顏色矩陣：

  • 使用↑ ↓ ← →移動紅叉
  • 使用按鍵1填充數(shù)值1
  • 使用按鍵2填充數(shù)值2
  • 使用按鍵n填充nan，也就是畫錯的地方可以通過該按鍵消除掉
  • 使用按鍵s存儲為mat文件

該程序的代碼

function?createPSCD
pointerSize=32;
ax=gca;hold?on;

ax.XLim=[0,pointerSize]+.5;
ax.YLim=[0,pointerSize]+.5;
ax.XTick=.5:1:pointerSize+.5;
ax.YTick=.5:1:pointerSize+.5;
ax.XGrid='on';
ax.YGrid='on';
ax.XTickLabel='';
ax.YTickLabel='';
ax.PlotBoxAspectRatio=[1,1,1];


plot([0,pointerSize]+.5,[1,1].*(1+pointerSize)./2,'LineWidth',1.5,'Color',[0,0,0,.5]);
plot([1,1].*(1+pointerSize)./2,[0,pointerSize]+.5,'LineWidth',1.5,'Color',[0,0,0,.5]);
rcross=plot(8,8,'rx','LineWidth',2,'MarkerSize',14);
bshandle=scatter([],[],200,'s','filled','CData',[0,0,0]);
gshandle=scatter([],[],200,'s','filled','CData',[.8,.8,.8]);
pointer=zeros(pointerSize).*nan;

set(gcf,'KeyPressFcn',@keyPressFcn)?
????function?keyPressFcn(~,event)
????????switch?event.Key
????????????case?'uparrow',rcross.YData=rcross.YData+1;
????????????case?'downarrow',rcross.YData=rcross.YData-1;
????????????case?'leftarrow',rcross.XData=rcross.XData-1;
????????????case?'rightarrow',rcross.XData=rcross.XData+1;??
????????????case?'1'
????????????????pointer(pointerSize+1-rcross.YData,rcross.XData)=1;
????????????case?'2'
????????????????pointer(pointerSize+1-rcross.YData,rcross.XData)=2;
????????????case?'n'
????????????????pointer(pointerSize+1-rcross.YData,rcross.XData)=nan;
????????????case?'s'
????????????????timestr=char(datetime('now'));
????????????????timestr(timestr=='?')='_';
????????????????timestr(timestr==':')='_';
????????????????nowStr=timestr;
????????????????save([nowStr,'.mat'],'pointer','-mat');
????????end
????????[brow,bcol]=find(pointer==1);
????????bshandle.XData=bcol;
????????bshandle.YData=pointerSize+1-brow;

????????[grow,gcol]=find(pointer==2);
????????gshandle.XData=gcol;
????????gshandle.YData=pointerSize+1-grow;

????????rcross.XData=mod(rcross.XData+pointerSize-1,pointerSize)+1;
????????rcross.YData=mod(rcross.YData+pointerSize-1,pointerSize)+1;
????end
end

mat文件的調(diào)用

p=load('heart.mat');
set(gcf,'Pointer','Custom','PointerShapeCData',p.pointer,'PointerShapeHotSpot',[16,16]);?

PNG圖片轉(zhuǎn)換為光標矩陣

我們只要將圖片二值化，將圖片和圖片透明度表大小都調(diào)為32x32或者16x16，然后白色部分設(shè)置成2，黑色部分設(shè)置成1，透明度矩陣0值處設(shè)置為nan即可，代碼如下：

[img,~,alpha]=imread('1.png');
pointerSize=32;

img=imresize(img,[pointerSize,pointerSize]);
if?size(img,3)>1
????img=rgb2gray(img);
end
pointer=imbinarize(img)+1;
alpha=imresize(alpha,[pointerSize,pointerSize]);
pointer(alpha==0)=nan;

為了更方便設(shè)置光標，我將此部分封裝為了一個函數(shù)，只要輸入圖片或者上一部分創(chuàng)建mat文件的路徑、鼠標作用點位置，即可更改當前figure窗口的光標：

function?setPointer(path,HotSpot,pointerSize)
%path:?png圖片，mat文件位置，或32x32,16x16double數(shù)組
%HotSpot:光標作用點
%pointerSize光標大小，僅path為png圖片路徑時需要設(shè)置
if?nargin<3
????pointerSize=32;
end
if?size(path,1)==1
????type=path(end-2:end);
????if?strcmp(type,'mat')
????????data=load(path);
????????P=data.pointer;?
????else
????????[img,~,alpha]=imread(path);
????????
????????img=imresize(img,[pointerSize,pointerSize]);
????????if?size(img,3)>1
????????????img=rgb2gray(img);
????????end
????????pointer=imbinarize(img)+1;
????????alpha=imresize(alpha,[pointerSize,pointerSize]);
????????pointer(alpha==0)=nan;
????????P=pointer;
????end
else
????P=path;
end
set(gcf,'Pointer','Custom','PointerShapeCData',P,'PointerShapeHotSpot',HotSpot);
end
  • path：png圖片，mat文件位置，或32x32,16x16double數(shù)組
  • HotSpot：光標作用點
  • pointerSize光標大?。簝Hpath為png圖片路徑時需要設(shè)置

程序調(diào)用: 對于以下名為test.png的文件

以及自己畫的一個ban.mat文件，可以通過以下方式調(diào)用：

setPointer('test.png',[15,15])
setPointer('ban.mat',[15,15])

可以看出圖片轉(zhuǎn)換的還是比較粗糙一點，有能力還是建議自己畫。

以上就是Matlab實現(xiàn)鼠標光標變成愛心和瞄準鏡形狀的詳細內(nèi)容，更多關(guān)于Matlab鼠標光標的資料請關(guān)注腳本之家其它相關(guān)文章！

相關(guān)文章

最新評論