C $BEB2 preserve AF, BC
C $BEB4 set unknown18 to zero
C $BEB8 set unknown21 to one
C $BEBD set ATTR-T to bright yellow on black
C $BEC2 load A with $34 (message 52 - "ENGAGED TO ENEMY")
C $BEC4 set BC coords to 0,22
C $BEC7 call $BED7 to clear line 22
C $BECA call MPRINT to display "ENGAGED TO ENEMY" on line 22
C $BECD point HL at $C289 - "ENGAGED TO ENEMY" sound effect
C $BED0 call $C2F9 to play "ENGAGED TO ENEMY" sound effect
C $BED3 enable interrupts
C $BED4 restore BC, AF
C $BED6 return to caller