Browse Source

Merge pull request #225 from b1ackmai1er/dev

Add facility for updater to nominate suggested baud rate.
patch
Wayne Warthen 5 years ago
committed by GitHub
parent
commit
1d0a42215c
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
  1. 42
      Source/HBIOS/updater.asm

42
Source/HBIOS/updater.asm

@ -764,26 +764,48 @@ VERF: POP BC ; EXIT WITH FAIL
POP BC ; FAIL MESSAGE AND
JP FAILWF ; RETURN TO MENU
;
OPTIONG:LD HL,msgChangeNow
CALL PRTSTR0
LD A,(RECSPD)
; CALL PRTHEXB
CALL DECBAUD
OPTIONG:LD HL,msgChangeNow ; CHANGE
CALL PRTSTR0 ; SERIAL
LD A,(RECSPD) ; DEVICE
PUSH AF ; BAUD RATE
CALL DECBAUD ; TO RECOMMENDED
LD HL,msgPressKey
CALL PRTSTR0
POP AF
CALL CHGSPD
CALL GETINP
JP MENULP
;
OPTIONL:LD HL,msgChangeNow
CALL PRTSTR0
LD A,(ORISPD)
; CALL PRTHEXB
CALL DECBAUD
OPTIONL:LD HL,msgChangeNow ; CHANGE
CALL PRTSTR0 ; SERIAL
LD A,(ORISPD) ; DEVICE
PUSH AF ; BAUD RATE
CALL DECBAUD ; TO ORIGINAL
LD HL,msgPressKey
CALL PRTSTR0
POP AF
CALL CHGSPD
CALL GETINP
JP MENULP
;
CHGSPD: PUSH AF
LD B,$05 ; GET SERIAL DEVICE
LD A,(SERDEV) ; CHARACTERISTICS
LD C,A
RST 08
LD A,D ; MASK OUT EXISTING
AND %11100000 ; REPLACE WITH RATE
LD D,A
POP AF
OR D
LD D,A
;
LD B,$04 ; SET NEW
LD A,(SERDEV) ; SPEED
LD C,A
RST 08
RET
;
OPTIONV:LD A,(WRTVER) ; TOGGLE
CPL ; VERIFY
LD (WRTVER),A ; FLAG

Loading…
Cancel
Save