;Copyright 2000 - Mark McDonald All rights reserved
; DECLARE: SUB SETINSOFF()
; DESC:    Turn the INS key status bit off.
; EXAMP:   CALL SETINSOFF

MCODE Segment Byte
        Assume  CS: MCODE

        Public  SETINSOFF

SETINSOFF Proc  Far
        push    BP                      ;
        mov     BP, SP                  ;
        push    DS                      ;

        push    ES                      ;

        xor     AX,AX                   ; clear AX
        mov     ES,AX                   ; set ES to BIOS data segment
        and     Byte Ptr ES: [417h],127 ; clear Int status bit

        pop     ES                      ;

        pop     DS
        pop     BP

        retf
SETINSOFF EndP
MCODE EndS
        End