     param     headr
     parama    equ  686
     xbegin    equ  838
     montor    equ  769
     monter    equ  700
     tclear    equ  710
     initap    equ  780
     initxt    equ  793
     bclear    equ  833
     failsw    equ  184
