4D图像显示源码程序 - vb源码程序 - 谷速源码
下载频道> 资源分类> 编程语言> VB源码> 4D图像显示源码程序

标题:4D图像显示源码程序
分享到:

所属分类: VB源码 资源类型: 文件大小: 40.9 KB 上传时间: 2016-01-25 19:40:24 下载次数: 8 资源积分:1分 提 供 者: xiaopeng2 4D图像显示源码程序
内容:
4D图像显示源码程序,程序员在编程的过程中可以参考学习使用,希望对IT程序员有用,此源码程序简单易懂、方便阅读,有很好的学习价值!
function mask = filterString2Mask(fString, maxVal)
% Converts a filter string into a mask. If the filter string is invalid, it
% is manipulated to form a valid string which is returned in place of a
% mask.
%
% Usage:
% ------
% mask = filterString2Mask(fString)
% mask = filterString2Mask(fString, maxVal) - the number of frames is
% specified to tighten validation.
%
% Example formats include:
% 1-5,9 - frames 1,2,3,4,5, and 9
 
% By Ran Klein 20-Oct-2005
 
if nargin==1 || isempty(maxVal)% No maxVal provided
maxVal = inf;
end
minVal = 1;
 
nonvalid = false;  % Assume valid filter string
fString = deblank(fString); % Ignore all blanks
if isempty(fString)
if isfinite(maxVal)
mask = 1:maxVal;
else
mask = [];
end
return
end
fString = strrep(fString,'-',':'); % ##-## and ##:## formats are identical
valid = ((fString>='0' & fString<='9') | fString==':' | fString==','); % The valid character set
if any(~valid) % Remove non valid characters from the string
nonvalid = true;
fString = fString(valid);
end
 
mask = [];
corrString = [];
[token, fString] = strtok(fString,',');
while ~isempty(token) || ~isempty(fString)
i = findstr(token,':');
if isempty(i) % (##) format
smask = str2num(token);
if smask>maxVal
corrString = [corrString ',' num2str(maxVal)];
nonvalid = true;
elseif smask<minVal
corrString = [corrString ',' num2str(minVal)];
nonvalid = true;
else
corrString = [corrString ',' token];
end
elseif length(i)>1
smask = [];
nonvalid = true;
else % (##-## / ##:##) format
if i==1 || i==length(token)
smask = [];
nonvalid = true;
else
thisok = true;
first = str2num(token(1:i-1));
last = str2num(token(i+1:end));
if first<minVal
first = minVal;
nonvalid = true;  thisok = false;
end
if last>maxVal
last = maxVal;
nonvalid = true;  thisok = false;
end
if thisok
smask = first:last;
corrString = [corrString ',' token];
else
smask = [];
if last>first
corrString = [corrString ',' num2str(first) '-' num2str(last)];
else
corrString = [corrString ',' num2str(first)];
end
end
end
end
mask = [mask smask];
[token, fString] = strtok(fString,',');
end
 
if nonvalid % Was not a valid string then return the corrected string
if ~isempty(corrString)  % Remove the first character as it is a comma
corrString = corrString(2:end);
end
mask = corrString;
end  % Otherwise the mask is returned

关键词: 源码 图像 程序

编程语言下载排行

Top_arrow
回到顶部
联系方式| 版权声明| 招聘信息| 广告服务| 银行汇款| 法律顾问| 兼职技术| 付款方式| 关于我们|
网站客服网站客服 程序员兼职招聘 程序员兼职招聘
沪ICP备19040327号-3
公安备案号:沪公网安备 31011802003874号
库纳格流体控制系统(上海)有限公司 版权所有
Copyright © 1999-2014, GUSUCODE.COM, All Rights Reserved