; FILE:    hr_v1_l2.ips
; PURPOSE: Make a high resolution dopplergram and downlink the full dopplergram, 
;	   and 2x2 bin full linedepth.
; HISTORY: 
;	Written 23-Jul-96 by M.Morrison

QPROG_HR_V1_L2::

    CALLQUE  $QSR_HR_VLC30					;do all of the work
    BRANCHNE R3072 10 &DONE					;on frame 10, do the following code

        ;---- Bin the linedepth
        SETREGS  $IPRL_BIN_PARAM 4 6:0x0726 19:0x0726		;setup source/destination page of the bin
        CALLQUE  $QSR_FMT_2X2BIN

        ;---- Downlink the two observables
        SETREGS  $IPRL_DL_PARAM 2 0x3800 0x9800			;downlink vel and 2x2 line-depth
        CALLQUE  $QSR_DL_2PAGE					;0.6 sec
DONE:

    END