function stsd_simple_plotter_generic_converted(permutations_of_IPIs,APs_in_the_train,number_of_trials,conjoined_filename,hy,age_and_types,stsd_parameters,epoch_dividers,...
        indiv_simple_plots,NLize_extracted,plain_extractedmatrix,azaz_record,synapse_in_question,maxes_and_mins,number_of_IPIs,analyze_first_pulse_only,minutes_per_trial)

%linearly plot all 6 of the 'core' stsd properties during each epoch; colors and letters distinguish based on preceding AP# and previous IPI history

%by altering these arrays and a few lines below, this routine should be able to handle any permutations_of_IPIs
colorz=['r' 'b'];
%letterz={{'S';'M';'L'} {'SS' 'SM' 'SL';'MS' 'MM' 'ML';'LS' 'LM' 'LL'}};    %use this one when permutations_of_IPIs=[3 3] -- also change the jj and kk loops below to run thrice
letterz={{'S';'L'} {'SS' 'SL';'LS' 'LL'}};
markerz=['s' 'd'];
marker_size=18; font_size=22;

alltrials=[1:number_of_trials];

if size(hy,1)==1, o_values_row=3,else o_values_row=number_of_IPIs+1,end

for parameter=1:length(stsd_parameters)-1%MUST CHANGE BACK
    if indiv_simple_plots, figure(40+parameter), else figure(40), subplot(2,3,parameter), end
    %text([alltrials],[plain_extractedmatrix(number_of_IPIs+1,alltrials,parameter)],'o','color','k','fontsize',font_size,'fontweight','bold'),hold on
    subplot(2,3,1:3)
    plot(alltrials.*(minutes_per_trial),plain_extractedmatrix(o_values_row,alltrials,parameter),'o','markeredgecolor','k','linewidth',2,'markersize',marker_size),hold on%'markerfacecolor','k'%multiply by 2/3 to convert trials to minutes
%     if parameter==1
%         global basiccs
%         basiccs=plain_extractedmatrix(number_of_IPIs+2,alltrials,parameter);
%     end
    %if isequal(hy(1,:),[2 2])
    xlabel('Time (min)', 'fontsize',30,'fontname','book antiqua','fontweight','bold')
    if ~analyze_first_pulse_only
         if size(hy,1)==1
            for jj=1:length(hy)    
               livetrials=alltrials(find(azaz_record(alltrials,2)==hy(jj)));
               plot([livetrials].*minutes_per_trial,[plain_extractedmatrix(o_values_row+1,livetrials,parameter)],'s','markeredgecolor','r','linewidth',2.5,'markersize',marker_size)
               text([livetrials].*minutes_per_trial,[plain_extractedmatrix(o_values_row+1,livetrials,parameter)],num2str(hy(jj)),'fontweight','demi','fontsize',14,'color','r')
               
               plot([livetrials].*minutes_per_trial,[plain_extractedmatrix(o_values_row+2,livetrials,parameter)],'^','markeredgecolor','g','linewidth',2.5,'markersize',marker_size)
               text([livetrials].*minutes_per_trial,[plain_extractedmatrix(o_values_row+2,livetrials,parameter)],num2str(hy(jj)),'fontweight','demi','fontsize',14,'color','g')
               
               plot([livetrials].*minutes_per_trial,[plain_extractedmatrix(o_values_row+3,livetrials,parameter)],'v','markeredgecolor','b','linewidth',2.5,'markersize',marker_size)
               text([livetrials].*minutes_per_trial,[plain_extractedmatrix(o_values_row+3,livetrials,parameter)],num2str(hy(jj)),'fontweight','demi','fontsize',14,'color','b')
                             
               ylim([maxes_and_mins(2,parameter) maxes_and_mins(1,parameter)])
            end
         elseif size(hy,1)>1 %for stim_phil1 type hy
            for jj=1:hy(1,1)    %handling the response after the first IPI
                livetrials=alltrials(find(azaz_record(alltrials,1)==jj));%(((jj-1)*hy(3,1))+hy(2,1))))
                text([livetrials],[plain_extractedmatrix(number_of_IPIs+2,livetrials,parameter)],letterz{1}(jj),'color',colorz(1),'fontsize',font_size,'fontweight','bold'),hold on
                %plot(livetrials,plain_extractedmatrix(number_of_IPIs+2,livetrials,parameter),'s','markerfacecolor',colorz(jj),'markeredgecolor',colorz(jj),'markersize',marker_size),hold on
                for kk=1:hy(1,2)    %handling the response after the second IPI
                    livesttrials=alltrials(find(azaz_record(alltrials,1)==jj & azaz_record(alltrials,2)==kk));
                    text([livesttrials],[plain_extractedmatrix(number_of_IPIs+3,livesttrials,parameter)],letterz{2}(jj,kk),'color',colorz(2),'fontsize',font_size,'fontweight','bold'),hold on
                    %plot(livetrials,plain_extractedmatrix(number_of_IPIs+3,livetrials,parameter),'d','markerfacecolor',colorz(jj),'markeredgecolor',colorz(jj),'markersize',marker_size),hold on
                end
            end     
        end
	end
    for j=1:length(epoch_dividers)%multiply by minutes_per_trial to convert from trials to minutes
	    plot([epoch_dividers(j).*(minutes_per_trial) epoch_dividers(j).*(minutes_per_trial)],[min(min(plain_extractedmatrix(number_of_IPIs+1:end,:,parameter))) max(max(plain_extractedmatrix(number_of_IPIs+1:end,:,parameter)))],'r','LineWidth',3)
    end
%    set(gca,'xlim',[0 alltrials(end)+1], 'ylim',[min(min(plain_extractedmatrix(number_of_IPIs+1:end,:,parameter))) max(max(plain_extractedmatrix(number_of_IPIs+1:end,:,parameter)))])
    if indiv_simple_plots
        %title(strcat(conjoined_filename,'__',synapse_in_question,'__',stsd_parameters(parameter),'__',age_and_types),'fontweight','bold','fontsize',ceil(1.5*font_size),'fontname','book antiqua')
        %set(40+parameter,'PaperOrientation','landscape');
        %set(40+parameter,'PaperPosition',[0.5 0.5 10 7.5]);
    else 
         if parameter==1
            %title(strcat(conjoined_filename,'__',synapse_in_question,'__',stsd_parameters(parameter),'__',age_and_types))
            %set(40,'PaperOrientation','landscape');
            %set(40,'PaperPosition',[0.5 0.5 10 7.5]);
        else
            %title(stsd_parameters(parameter),'fontweight','bold')
        end
    end
    hold on
    title(strcat(conjoined_filename,',',stsd_parameters(parameter)),'fontsize',30, 'fontname', 'Book Antiqua','fontweight','bold')
    set(gca,'xTickLabel',get(gca,'xticklabel'),'fontsize',22,'fontname','book antiqua','fontweight','bold')
end