-; suppress error message if BDOS is returning errors to application...\r
-\r
- ld a,(@ermde)\r
- cp 0ffh\r
- jr z,hard$error\r
-\r
- ; Had permanent error, print message like:\r
- ; BIOS Err on d: T-nn, S-mm, <operation> <type>, Retry ?\r
-\r
- call ?pderr ; print message header\r
-\r
- ld hl,(operation$name)\r
- call ?pmsg ; last function (read or write)\r
-\r
- ld a,(recv_msg_rc)\r
- and a,07fh\r
- jr z,fatfs_err\r
-\r
- ld hl,drvmsg0 ; point at first driver error message\r
- ld c,drvmsg_count\r
- call pdecoded\r
-\r
-fatfs_err:\r
- ld a,(recv_msg_rc)\r
- tst 080h\r
- jr z,prompt ; no fatfs error\r
-\r
- call pr.inln\r
- db 'FatFs: ',0\r
-\r
- ld hl,fr$msg0 ; point at first FatFs message\r
- ld c,fr$msg$count\r
- ld a,(recv_msg_rc+1)\r
- call pdecoded\r
-\r
-prompt:\r
- call pr.inln\r
- db ' Retry (Y/N) ? ',0\r
-\r
- call u$conin$echo ; get operator response\r
- cp 'Y'\r