annotate demo/plot_nap.m @ 4:537f939baef0 tip

various bug fixes and changed copyright message
author Stefan Bleeck <bleeck@gmail.com>
date Tue, 16 Aug 2011 14:37:17 +0100
parents 74dedb26614d
children
rev   line source
tomwalters@0 1 % demonstration file for 'aim-mat'
tomwalters@0 2 %
tomwalters@0 3 % (c) 2006-2008, University of Cambridge, Medical Research Council
tomwalters@0 4 % Written by Tom Walters (tcw24@cam.ac.uk)
tomwalters@0 5 % http://www.pdn.cam.ac.uk/cnbh/aim2006
tomwalters@0 6 % $Date: 2008-06-10 18:00:16 +0100 (Tue, 10 Jun 2008) $
tomwalters@0 7 % $Revision: 585 $
tomwalters@0 8
tomwalters@0 9 function plot_nap(handles, options, current_scale, titlestr)
tomwalters@0 10
tomwalters@0 11 start_time=options.minimum_time;
tomwalters@0 12 stop_time=options.maximum_time;
tomwalters@0 13
tomwalters@0 14 current_frame=handles.data.nap;
tomwalters@0 15 str=get_graphics_options(handles,handles.info.current_nap_module);
tomwalters@0 16 str.minimum_time_interval=start_time;
tomwalters@0 17 str.maximum_time_interval=stop_time;
tomwalters@0 18 nrchan=getnrchannels(current_frame);
tomwalters@0 19 % if do_single_channel || nrchan==1
tomwalters@0 20 % sig=getsinglechannel(current_frame,options.display_single_channel);
tomwalters@0 21 % % sig=getpart(sig,start_time,stop_time);
tomwalters@0 22 % ymin=0;
tomwalters@0 23 % ymax=max(current_frame)*1.1;
tomwalters@0 24 % plot(sig,[start_time stop_time]);
tomwalters@0 25 % set(gca,'Ylim',[ymin,ymax]);set(gca,'YAxisLocation','right');
tomwalters@0 26 % xlabel('time (ms)');ylabel('amplitude');title('');
tomwalters@0 27 % else
tomwalters@0 28 hand=plot(current_frame,str);
tomwalters@0 29 zmin=0;zmax=max(current_frame)/current_scale;
tomwalters@0 30
tomwalters@0 31 %TCW AIM 2006
tomwalters@0 32 % if hand_scaling == 1
tomwalters@0 33 set(gca,'Zlim',[zmin,1/current_scale]);
tomwalters@0 34 % else
tomwalters@0 35 % set(gca,'Zlim',[zmin,zmax]);
tomwalters@0 36 % end
tomwalters@0 37
tomwalters@0 38 %set(gca,'Zlim',[zmin,zmax]);
tomwalters@0 39
tomwalters@0 40
tomwalters@0 41 xlabel('time (ms)');ylabel('Frequency (kHz)');title(titlestr);
tomwalters@0 42
tomwalters@0 43 % if strcmp(handles.screen_modus,'paper')
tomwalters@0 44 % par=get(hand,'parent');
tomwalters@0 45 % set(par,'FontSize',12);xlab=get(par,'xlabel');set(xlab,'FontSize',12);ylab=get(par,'ylabel');set(ylab,'FontSize',12);
tomwalters@0 46 % end
tomwalters@0 47 % end