paomadeng.zip_matlab做走马灯_跑马灯

function dotmatrix2 %仿矩阵字模 % copyright @baby_wolf qq:654832919 % $date 2011-11-14$ $version 2.0$ % $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ %% 图形窗口，坐标轴准备 hfig=figure('position',[300 355 477 325],'color','k','name','dotmatrix','menubar','none'); %%figure背景颜色 axis off ;axis equal [X Y]=meshgrid(linspace(1,16,128)); h=zeros(size(X)); %存放所有“点”的句柄 str='热烈欢迎青鹰帮帮主斌哥莅临同济大学！'; %%%%【将此处修改成你要显示的文字】 DATA=[]; for i=1:length(str) %调用字模提取函数文件，生成点阵数据 temp=getwordmatrix(str(i)); DATA=[DATA flipud(temp)]; end DATA=[zeros(16,60) DATA zeros(16,60)]; %%微调显示效果，让文字从右出现 for i=1:16%创建点阵 for j=1:64 h(i,j)=line(X(i,j),Y(i,j),'marker','s','markersize',3,'markerfacecolor','none'); set(h(i,j),'buttondownfcn','buttondown','markeredgecolor','none'); end end % while ishandle(hfig) % 循环改变点阵 % Z=DATA(:,1:64); % for i=1:16 % for j=1:64 % if Z(i,j)==1 % set(h(i,j),'markerfacecolor','g'); % else % set(h(i,j),'markerfacecolor','none'); % end % end % end % pause(1/24); % DATA=DATA(:,[2:end 1]); % end %% 循环显示 numFrames=0; while numFrames<(size(DATA,2)-64)/2 %while ishandle(hfig) % 循环改变点阵 Z=DATA(:,1:64); for i=1:16 for j=1:64 if Z(i,j)==1 set(h(i,j),'markerfacecolor','g'); %%%%更改文字颜色。'g'为绿色 else set(h(i,j),'markerfacecolor','none'); end end end pause(.02); DATA=DATA(:,[3:end 1:2]); numFrames=numFrames+1; %%%%% frames(numFrames)=getframe;%%%%% end %% 写文件 animated(1,1,1,numFrames) = 0; for k=1:numFrames if k == 1 [ animated cmap] = rgb2ind(frames(k).cdata, 256, 'nodither'); else animated(:,:,1,k) =rgb2ind(frames(k).cdata, cmap, 'nodither'); end end filename = 'welcome5.gif'; imwrite(animated, cmap, filename, 'DelayTime', .2, 'LoopCount', inf); web(filename) end %% 下面这个回调函数可以无视掉~~ function buttondown %按下回调函数 set(gcbo,'markerfacecolor',rand(1,3)); end