2016-10-29 19:58:21 +00:00
|
|
|
|
PR#3
|
|
|
|
|
PREFIX /A2OSX.SRC
|
|
|
|
|
NEW
|
|
|
|
|
INC 1
|
|
|
|
|
AUTO 6
|
|
|
|
|
.LIST OFF
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
ERR.Codes .DA #MLI.ERR.IO
|
|
|
|
|
.DA #MLI.ERR.NODEV
|
|
|
|
|
.DA #MLI.ERR.WRTPROT
|
|
|
|
|
.DA #MLI.ERR.DSKSWIT
|
2017-02-23 16:43:42 +00:00
|
|
|
|
.DA #MLI.ERR.OFFLINE
|
2016-10-29 19:58:21 +00:00
|
|
|
|
.DA #MLI.ERR.INVPATH
|
|
|
|
|
.DA #MLI.ERR.PNOTFND
|
|
|
|
|
.DA #MLI.ERR.VNOTFND
|
|
|
|
|
.DA #MLI.ERR.FNOTFND
|
|
|
|
|
.DA #MLI.ERR.DUPFILE
|
|
|
|
|
.DA #MLI.ERR.VOLFULL
|
2017-02-23 16:43:42 +00:00
|
|
|
|
.DA #MLI.ERR.DIRFULL
|
2016-10-29 19:58:21 +00:00
|
|
|
|
.DA #MLI.ERR.EOF
|
2017-02-23 16:43:42 +00:00
|
|
|
|
.DA #MLI.ERR.LOCKED
|
|
|
|
|
.DA #MLI.ERR.OPEN
|
2016-10-29 19:58:21 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
.DA #SYSMGR.ERRSYN
|
|
|
|
|
.DA #SYSMGR.ERRFNF
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
ERR.Count .EQ *-ERR.Codes
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
ERR.Messages >PSTR "I/O Error"
|
|
|
|
|
>PSTR "No Device"
|
|
|
|
|
>PSTR "Disk Write-Protected"
|
|
|
|
|
>PSTR "Disk Switched"
|
2017-02-23 16:43:42 +00:00
|
|
|
|
>PSTR "Device Is Offline"
|
2016-10-29 19:58:21 +00:00
|
|
|
|
>PSTR "Invalid Path"
|
|
|
|
|
>PSTR "Path Not Found"
|
|
|
|
|
>PSTR "Volume Not Found"
|
|
|
|
|
>PSTR "File Not Found"
|
|
|
|
|
>PSTR "Duplicate Filename"
|
|
|
|
|
>PSTR "Volume Is Full"
|
2017-02-23 16:43:42 +00:00
|
|
|
|
>PSTR "Directory Is Full"
|
2016-10-29 19:58:21 +00:00
|
|
|
|
>PSTR "End Of File"
|
2017-02-23 16:43:42 +00:00
|
|
|
|
>PSTR "File Access Error, File Locked"
|
|
|
|
|
>PSTR "File Already Open"
|
2016-10-29 19:58:21 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
>PSTR "Syntax Error"
|
|
|
|
|
>PSTR "Command Not Found"
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
>PSTR "Unknown Error"
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
|
|
|
|
SAVE X.ERRORS.S
|