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