turns-00012.parquet:12621
16764d200173f1e6ba13f3efdegenerate_repetitionAbsentFinal dense release
USER
TITLE SHOW_ERR --Display DOS function call error messages
;Dispaly a message based on an error code in AX
;All registers are preserved
;
DSEG SEGMENT PARA'DATA'
CR EQU 13
LF EQU 10
EOM EQU '$'
;
OUT_OF_RANGE DB 'Error code is not in valid range (1-83)'
DB CR,LF,EOM
RESERVED DB 'Error code is reserved(36-79)',CR,LF,EOM
ER1 DB'Invalid function number',CR,LF,EOM
ER2 DB'File not found',CR,LF,EOM
ER3 DB'Path not found',CR,LF,EOM
ER4 DB'Too many open files',CR,LF,EOM
ER5 DB'Access denied',CR,LF,EOM
ER6 DB'Invalid handle',CR,LF,EOM
ER7 DB'Memory control blocks destroyed',CR,LF,EOM
ER8 DB'Insufficient memory',CR,LF,EOM
ER9 DB'Invalid memory block address',CR,LF,EOM
ER10 DB'Invalid environment',CR,LF,EOM
ER11 DB'Invalid format',CR,LF,EOM
ER12 DB'Invalid access code',CR,LF,EOM
ER13 DB'Invalid data',CR,LF,EOM
ER14 DB'No such message',CR,LF,EOM
ER15 DB'Invalid drive was specified',CR,LF,EOM
ER16 DB'Attempted to remove the current directory'
DB CR,LF,EOM
ER17 DB'Not same device',CR,LF,EOM
ER18 DB'No more files',CR,LF,EOM
ER19 DB'Disk is write protected',CR,LF,EOM
ER20 DB'Unknown unit',CR,LF,EOM
ER21 DB'Drive not ready',CR,LF,EOM
ER22 DB'Unknown command',CR,LF,EOM
ER23 DB'Data error(CRC)',CR,LF,EOM
ER24 DB'Bad REQUEST structure length',CR,LF,EOM
ER25 DB'Seek error',CR,LF,EOM
ER26 DB'Unknown media type',CR,LF,EOM
ER27 DB'Sector not found',CR,LF,EOM
ER28 DB'Printer out of paper',CR,LF,EOM
ER29 DB'Write fault',CR,LF,EOM
ER30 DB'Read fault',CR,LF,EOM
ER31 DB'General failure',CR,LF,EOM
ER32 DB'Sharing violation',CR,LF,EOM
ER33 DB'Lock violation',CR,LF,EOM
ER34 DB'Invalid disk change',CR,LF,EOM
ER35 DB'FCB unavaliable',CR,LF,EOM
ER80 DB'File exists',CR,LF,EOM
ER81 DB'Reserved',CR,LF,EOM
ER82 DB'Cannot make',CR,LF,EOM
ER83 DB'Fail on INT 24',CR,LF,EOM
ERTAB1 DW ER1,ER2,ER3,ER4,ER5,ER6,ER7,ER8,ER9,ER10
DW ER11,ER12,ER13,ER14,ER15,ER16,ER17,ER18
DW ER19,ER20,ER21,ER22,ER23,ER24,ER25,ER26
DW ER27,ER28,ER29,ER30,ER31,ER32,ER33,ER34
DW ER35
ERTAB2 DW ER80,ER81,ER82,ER83
DSEG ENDS
;
CSEG SEGMENT PARA 'CODE'
ASSUME CS:CSEG,DS:DSEG
SHOW_ERR PROC FAR
PUSH DS
SUB BX,BX
PUSH BX
MOV SI,DSEG ;initialize DS
MOV DS,SI
PUSH AX ;save input error number
CMP AX,83 ;check for error code in range
JG O_O_R
CMP AX,0
JG IN_RANGE
O_O_R: LEA DX,OUT_OF_RANGE
JMP SHORT DISP_MSG
;Error code is valid,determine with table to use
IN_RANGE:
CMP AX,35 ;error code 1 --35?
JG TRY79
LEA BX,ERTAB1 ;yes,POINT to ERTAB1
DEC AX
JMP FORM_ADDR
TRY79:
CMP AX,79 ;error code 36 -- 79 ?
JG LAST_4
LEA DX,RESERVED ;yes,display message
JMP DISP_MSG
LAST_4:
LEA BX,ERTAB2 ;error code 80 -- 83
AND AX,3
FORM_ADDR:
SHL AX,1 ;POINT to correct offset
ADD BX,AX
MOV DX,[BX] ;put message addr into DX
DISP_MSG:
MOV AH,9 ;display message string
INT 21H
POP AX
RET ;return to calling program
SHOW_ERR ENDP
;
CSEG ENDS
;
END SHOW_ERR
ASSISTANT
这段代码展示了一个DOS函数调用错误消息的显示程序。它根据AX中的错误代码来显示相应的消息。 首先，定义了一些常量和存储错误消息的字符串。然后，展示了一个用于显示错误消息的过程`SHOW_ERR`。 在`SHOW_ERR`过程中，首先保存了DS寄存器的值。然后，检查AX中的错误代码是否在有效范围内。如果超出范围，则显示错误代码不在有效范围内的消息。如果在有效范围内，则根据错误代码查找相应的消息字符串的地址，并显示该消息。 在这段代码中，通过使用`MOV AH, 9`将显示字符串的功能号设置为9，然后调用21h中断来显示消息字符串。 最后，通过`POP AX`恢复了之前保存的AX寄存器的值，并通过`RET`指令返回到调用程序。 请注意，这段代码假设你正在使用的汇编语言使用Intel语法，并且是为DOS环境编写的。