# File: hdr_v04.src
#
program "%Z% MODULE: %M% RELEASE: %R%.%L% CREATED: %G% %U%"
source "hdr_v04.ips"
descr "Loads IP queue instructions"
#=======================================================
#
#
#; hdr
#;
#; The Header and tail IP programs reset the pointers used by 
#; the 30 and 60 second IP structure program.
#;
#; The register IPRL_STR_STRT30 is initialized to "INIT30" by 
#; the strartup control file. The initialization code resets 
#; it to "SETPTR30". Therefore on 2nd and subsequent execution 
#; of the ALT or CMPG branches the initialztion is skipped but 
#; the 30 second or 60 second structure program setup is still
#; carried out.
#; 
#
#QPROG_STR_HEAD::
#    COPYREG     $IPRL_STR_STRT30   $IPRL_STR_EP30  
tcblock mbipmacl 0x0B00    0x0142 0x04F3 0x04BD 
#    SETREG      $IPRL_MAG_DLC      0
tcblock mbipmacl 0x0B03    0x0140 0x05BB 0x0000 
#
#    END
tcblock mbipmacl 0x0B06    0x01FC 
#
#QPROG_STR_TAIL::
#    COPYREG     $IPRL_STR_STRT60   $IPRL_STR_EP60  
tcblock mbipmacl 0x0B07    0x0142 0x04F4 0x04BC 
#    END
tcblock mbipmacl 0x0B0A    0x01FC 
#
#=======================================================
#
return
#
#=======================================================
