function temp_autapsesynapse_waveform_plotter
%for the figure showing that adjacent autapse and synapse function independently

%note that windowing in create_basic_text_file should be 'off'

yl=[-33 10];

[r,p]=create_basic_text_file('patch20070220T212932',3); 

r(:,[1:3:end])=[]; %remove the audio signal

r=r*100; %convert to pA

mr=mean(r); r=r-repmat(mr,size(r,1),1); %remove leak

close all
figure(1), plot(r(55983:(55983+440),1),'r'), hold on, plot(r(55983:(55983+440),2),'b'), ylim(yl)

figure(2), plot(r(55980:(55980+440),17),'r'), hold on, plot(r(55980:(55980+440),18),'b'), ylim(yl)

figure(3), plot(r(51978:(51978+440),3),'r'), hold on, plot(r(51978:(51978+440),4),'b'), ylim(yl)

figure(4), plot(r(50982:(50982+440),1),'r'), hold on, plot(r(50982:(50982+440),2),'b'), ylim(yl)

figure(5), plot(r(:,13),'r'), hold on, plot(r(:,14),'b'), xlim([52480 52920]), ylim(yl)

figure(6), plot(r(:,15),'r'), hold on, plot(r(:,16),'b'), xlim([50980 51420]), ylim(yl)

figure(7), plot(r(:,17),'r'), hold on, plot(r(:,18),'b'), xlim([55980 56420]), ylim(yl)

%aut+ syn+  1,4
%aut- syn+  9,4
%aut+ syn-  2,3
%aut- syn-  1,1