BREAK.I

[Table of Contents]

The BREAK.I include file resides on the Kyan Pascal 2.x Utilities Disk 1. It contains two procedures:

• procedure DISABLE_BREAK
• procedure ENABLE_BREAK

PROCEDURE Disable_Break;
BEGIN
#A
  LDA #$40  ;poke 64 into
  STA $10   ;...POKMSK (16)
  STA $D20E ;...IRQEN (53774)
#
END;(* Disable Break Key procedure *)

PROCEDURE Enable_Break;
BEGIN
#A
  LDA #$C0  ;poke $C0 into
  STA $10   ;..POKMSK (16)
  LDA #$F7
  STA $D20E
#
END;(* Enable Break Key procedure *)