IBM PC CONVERTIBLE

= 0080
073C
.073C OA F6
073E 74 OD
0740
0740 B3 86
0742 E8 075F R
0745 2B C9
0747 E2 FE
0749 FE CE
074B 75 F3
074D
074D OA D2
074F 74 OD
0751
0751
B3 81
0753 E8 075F R
0756 2B C9
0758 E2 FE
075A FE CA
075C
75 F3
075E
075E C3
075F
REGISTERS MODIFIED:
AX,BX,CX,DX
**********************************************************************
FRCBEP
EQU
ERR_BEEP PROC NEAR
OR DH,DH
JZ EB_03
ISSUE LONG BEEPS
EB_Ol :
MOV
CALL
SUB
EB_02 :
DEC
JNZ
BL, FRCBEP+6
BEEP
CX, CX
LOOP EB_02
DH
EB_Ol
ISSUE SHORT BEEPS
EB_03 :
OR
JZ
EB_04 :
MOV
CALL
SUB
EB_05 :
DEC
JNZ
EB_EXIT :
RET
ERR_BEEP
DL ,DL
ELEXIT
BL, FRCBEP+l
BEEP
CX ,CX
LOOP EB_05
DL
EB_04
ENDP
80H ; FORCED BEEP BIT
ANY LONG TONES?
NO THEN DO SHORT
SET BEEP CNTR LNG & FRC BEEP
CLEAR CX REGI STER
DELAY BETWEEN BEEPS
DECREMENT LONG BEEP COUNTER
I SSUE NEXT LONG BEEP
ANY SHORT BEEPS?
SET BEEP CNTR FOR SHORT BEEP
CLEAR CX REGISTER
DELAY BETWEEN BEEPS
NEXT SHRT BEEP IF NOT COMPLT
RETURN TO CALLER
Beep to Speaker (BEEP)
075F
075F
50
0760 53
0761 51
0762
0762
BO B6
; *********************************************************************
ROUTINE-NAME: BEEP
FUNCTION: TO BEEP THE SPEAKER
ENTRY CONDITIONS:
PURPOSE OF ENTRY: TO BEEP THE SPEAKER
INPUT CONDITIONS: BL CONTAINS THE COUNT FOR THE LENGTH OF TIME
MULTIPLIED BY 500 MSECS FOR THE SPEAKER TO SOUND. IF THE MSB
IN BL IS SET THE SPEAKER IS SOUNDED WHETHER OR NOT IT WAS
DISABLED.
RESTRI CTIONS: NONE
EXIT CONDITIONS:
NORMAL EXIT CONDITIONS:
ERROR EXIT CONDITIONS:
REGISTERS MODIFIED: NONE
INTERNALLY REFERENCED ROUTINES: NONE
EXTERNALLY REFERENCED ROUTINES:
; *********************************************************************
BEEP PROC NEAR
PUSH AX SAVE REGISTERS
PUSH
BX
PUSH
CX
BEEP_SUB:
NO STACK ENTRY POINT
BPI: MOV AL,OB6H TIMER 2,MSB,LSB,BINARY
2-206 ROM BIOS