; @(#)get_temps.pro	1.1 01/23/98 :LASCO IDL LIBRARY
;
    hk = READALLHK("940102")

    ;w = WHERE(hk(3,*) LE 12)
    ;hk = hk(*,w)

    hk = GETHKN(hk, 1)

    sz = size(hk)

    if (sz(sz(0)+1) eq 1) then begin

       dn = fix(hk(40,*))
       lobt_tai = obt2tai(sc(6:11,*))
       ecstime=tai2utc(lobt_tai,/ecs)
       hh = float(strmid(ecstime,11,2))
       mm = float(strmid(ecstime,14,2))
       time = hh + mm/60.

    endif else begin
    
       dn = TMPOINT(hk, 29, "ff00"XL)

       time = hk(3,*) + hk(4,*)/60.

    endelse

    temps = CNVRT_TEMPS(dn, 3)

    PLOT, time, temps, TITLE="!601/02/94", YTITLE="Power Converter Temperature", XTITLE="Hours"

END