function getlobt,hk
;+
;
;  returns the LASCO LOBT from HK packet 1
;  The order of the raw bytes is byte flipped from the sun order
;
; @(#)getlobt.pro	1.1 01/23/98 :LASCO IDL LIBRARY
;
;-
hk1 = gethkn(hk,1)
sz=size(hk1)
if (sz(0) eq 0) then return,-1
obt=bytarr(6,sz(sz(0)))
offset = 7
obt(0,0) = hk1(offset+3,*)
obt(1,0) = hk1(offset+2,*)
obt(2,0) = hk1(offset+5,*)
obt(3,0) = hk1(offset+4,*)
obt(4,0) = hk1(offset+7,*)
obt(5,0) = hk1(offset+6,*)
return,obt
end