reverse-shooting

Matlab scripts for reverse shooting
Log | Files | Refs | README

say.m (613B)

      1 % Say.m   say(names);
      2 %  Takes a string names and prints its elements on a line separated by spaces
      3 %  e.g. with country:
      4 %	say(country)   usa can jpn deu fra ita gbr aus ...
      5 %
      6 %     Will also work for data...7/18/94 in integer format
      7 
      8 
      9 function [] = say(names,fmt);
     10 
     11 if exist('fmt')~=1; fmt='%4.0f '; end;
     12 j=0;
     13 maxj=80;
     14 ROWS=1;
     15 if isstr(names)==1;
     16    for i=1:size(names,1);
     17 	j=j+length(names(i,:))+1;
     18 	if j<=ROWS*maxj;
     19 		fprintf([names(i,:) ' ']);
     20 	else;
     21 		fprintf(['\n' names(i,:) ' ']);
     22 		ROWS=ROWS+1;
     23 	end;
     24      end;
     25 else;
     26    for i=1:length(names);
     27       fprintf(fmt,names(i));
     28    end;
     29    fprintf('\n');
     30 end;