; FILE:    mag30new.ips
; PURPOSE: Make a FD mag with the new framelist (MTM tuning order
;	   matches the P30 framelist) 
; HISTORY: 
;       Written 31-Mar-97 by M.Morrison/D.Mathur

QPROG_MAG30NEW::
    BRANCHGT R3072 1 &NO_INIT 					;init only on frame 1

    FILLBLK 0:0x0000 0x120000L 0
    FILLBLK 2:0x0000 0x120000L 0

    ; FILLSTD 0:0x0000 $IPRL_FILL_PAGE_WITH_0	;instruction does not work
    ; FILLSTD 2:0x0000 $IPRL_FILL_PAGE_WITH_0

NO_INIT:
    GOTO    &QPROG_MAG30					;jump to standard main program