JZ      REDOIT          ; Start over
       CPI     '1'             ; 300 baud or 2400 bps?
       JNZ     MDR2            ; No, check for 1200 bps
;
;
; Get next character if first was a '1'
;
       CALL    CHECK1          ; Let's see if it's a 1, 10 or 11
        ENDIF                  ; B5IM
;
        IF     B5IM AND PRGRSS
       CALL    RCDISP          ; Show RC to local terminal
        ENDIF                  ; B5IM AND PRGRSS
;
        IF     B5IM
       CPI     0FFH            ; Error?           <<== INSERT
       JZ      SET3            ; If so, must have been a '1'  <<== INSERT
       CPI     '0'
       JZ      SET24           ; For Vadic and Hayes, 10 means 2400 bps
       CPI     '3'             ; For 9600 non-ARQ <<== INSERT
       JZ      SET96           ; Go set baud rate <<== INSERT
       CPI     '5'             ; For 1200 ARQ     <<== INSERT
       JZ      SET12           ;                  <<== INSERT
       CPI     '6'             ; For 2400 ARQ     <<== INSERT
       JZ      SET24           ;                  <<== INSERT
       CPI     '7'             ; For 9600 ARQ     <<== INSERT
       JZ      SET96           ;                  <<== INSERT
;
       JMP     SET3            ; Was 1 (300 baud)
;
MDR2:   CPI     '5'             ; 1200 bps?
       JZ      SET12           ; Yes
       CPI     '6'             ; Some modems use 6
tion.
�


You are viewing proxied material from gopher.floodgap.com. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.