[Amplitude]=Douple_Pulse(t)

function [Amplitude]=Douple_Pulse(t)

%Input
%   t          (us)
%Output
%   Amplitude  (uA)
%   setting the Amplitude to empty indicates the end of the stimulus
%   pulse. This helps speed up the calculation
%--------------------------------------------------------------------------
if t>1000
    if t<1100
        Amplitude=1000;
    elseif t<1200
        Amplitude=-1000;
    elseif t<1300
        Amplitude=0;
        
    end
else
    Amplitude=0;
end