start=[1989 5 5 0 0 0];    %Gregorian start [yyyy mm dd hh mi sc]
stop=[1989 10 13 17 0 0];
jd=(hjulian(start):1/24:hjulian(stop)); 
vect=[east] +i*[north];
h=timeplt(jd,[temper, vect],[1 2]);   
title('Farallones ')
stacklbl(h(1),'temperature','ÁC');
stacklbl(h(2),'currents','cm/s');
