; THIS IS AN OVERLAY FOR MEX10OX.COM, AN OSBORNE EXECUTIVE
; VERSION OF MEX.COM.   BAUD RATES MAY BE SPECIFIED WITH
; PHONE LISTINGS IN THE MEX PHONE LIBRARY.  THIS OVERLAY
; WILL SET THE MODEM WHEN THE NUMBER IS <CAL>LED FROM THE
; LIBRARY.  HOPEFULLY, SOMEONE WILL WRITE MX10-OX.ASM, A
; COMPLETE OVERLAY FOR THE OSBORNE EXECUTIVE VERSION OF
; MEX.  (IF SOMEONE DOESN'T SOON, I WILL BE FORCED TO).
; UNTIL THEN, THIS OVERLAY OF MEX10OX.COM PROVIDES THE
; LAST UNRESOLVED FEATURE OF MEX (EXCEPT FOR THE FULL "SET"
; COMMANDS) FOR OSBORNE EXECUTIVE USERS.
;
; RON PRISCO                 06/16/84
; RD #7 EDGEBROOK
; OSWEGO, NY 13126
; (315) 343-5343
;
NEWBDV: EQU     016EH           ;SEE MXO-PM10.ASM
LOADBD: EQU     0332H           ;SEE M7OX-1.OVR
;
;
        ORG     NEWBDV          ;PATCH TO MEX
        JMP     PBAUD
;
;
        ORG     0360H           ;NOT USED BY MEX
;
;
PBAUD:  CPI     01H             ;300 BAUD?
        JZ      OK300
        CPI     03H             ;600 BAUD?
        JZ      OK600
        CPI     05              ;1200 BAUD?
        JZ      OK1200
        CPI     06H             ;2400 BAUD?
        JZ      OK2400
        CPI     07H             ;4800 BAUD?
        JZ      OK4800
        CPI     08H             ;19200 BAUD?
        JZ      OK19200
;
;
OK300:          LHLD    BD300
                JMP     LOADBD
OK600:          LHLD    BD600
                JMP     LOADBD
OK1200:         LHLD    BD1200
                JMP     LOADBD
OK2400:         LHLD    BD2400
                JMP     LOADBD
OK4800:         LHLD    BD4800
                JMP     LOADBD
OK19200:        LHLD    BD19200
                JMP     LOADBD
;
;
BD300:          DW      0180H
BD600:          DW      00C0H
BD1200:         DW      0060H
BD2400:         DW      0030H
BD4800:         DW      0018H
BD19200:        DW      0006H