function col = ROScolor(nm);

% col = ROScolor(name);
% col = ROScolor({name1,name2,...});
%
% see code for list of recognized names.
%
% neil banas, 2009

if iscell(nm)
	col = repmat(nan,[length(nm) 3]);
	for i=1:length(nm)
		col(i,:) = ROScolor(nm{i}).*255;
	end

elseif strcmpi(nm,'dkGreen')
	col = [10 40 0];
elseif strcmpi(nm,'medGreen')
	col = [66 90 33];
elseif strcmpi(nm,'ltGreen')
	col = [122 140 66];
elseif strcmpi(nm,'ltltGreen');
	col = [168 190 99];
	
elseif strcmpi(nm,'dkTeal')
	col = [6 34 44];
elseif strcmpi(nm,'medTeal')
	col = [36 72 72];
elseif strcmpi(nm,'ltTeal')
	col = [66 110 104];
elseif strcmpi(nm,'ltltTeal')
	col = [98 148 136];
	
elseif strcmpi(nm,'dkBlue')
	col = [14 30 60];
elseif strcmpi(nm,'medBlue')
	col = [34 65 105];
elseif strcmpi(nm,'ltBlue')
	col = [54 100 150];
elseif strcmpi(nm,'ltltBlue')
	col = [74 135 195];
	
elseif strcmpi(nm,'dkPurple')
	col = [57 24 51];
elseif strcmpi(nm,'medPurple')
	col = [80 53 73];
elseif strcmpi(nm,'ltPurple')
	col = [103 81 95];
elseif strcmpi(nm,'ltltPurple')
	col = [126 108 117];
	
elseif strcmpi(nm,'dkRed')
	col = [112 15 0];
elseif strcmpi(nm,'medRed')
	col = [146 54 38];
elseif strcmpi(nm,'ltRed')
	col = [180 90 76];
elseif strcmpi(nm,'ltltRed')
	col = [214 126 114];

elseif strcmpi(nm,'orange')
	col = [186 92 38];
	
elseif strcmpi(nm,'yellow')
	col = [191 146 54];
elseif strcmpi(nm,'ltYellow')
	col = 255 - (255 - [191 146 54])./2;
	
end


col = col./255;