diff options
| author | 2024-04-25 21:24:10 +0100 | |
|---|---|---|
| committer | 2024-04-25 22:32:27 +0000 | |
| commit | 2d04cacc5322951f187bb17e017c12920ac8ebe2 (patch) | |
| tree | 80ee017efa878dfd5344b44249e6a241f2a7f6e2 /v4.0/src/CMD/ATTRIB/ATTRIB.SKL | |
| parent | Merge pull request #430 from jpbaltazar/typoptbr (diff) | |
| download | ms-dos-main.tar.gz ms-dos-main.tar.xz ms-dos-main.zip | |
Diffstat (limited to 'v4.0/src/CMD/ATTRIB/ATTRIB.SKL')
| -rw-r--r-- | v4.0/src/CMD/ATTRIB/ATTRIB.SKL | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/v4.0/src/CMD/ATTRIB/ATTRIB.SKL b/v4.0/src/CMD/ATTRIB/ATTRIB.SKL new file mode 100644 index 0000000..aab62fa --- /dev/null +++ b/v4.0/src/CMD/ATTRIB/ATTRIB.SKL | |||
| @@ -0,0 +1,30 @@ | |||
| 1 | :util ATTRIB ;utility name ;AN000; | ||
| 2 | |||
| 3 | :class 1 ;AN000; | ||
| 4 | |||
| 5 | :class 2 ;AN000; | ||
| 6 | |||
| 7 | :class A ;system messages ;AN000; | ||
| 8 | :use 1 COMMON1 ;"Incorrect DOS version" ;AN000; | ||
| 9 | :use 2 EXTEND8 ;"Insufficient memory" ;AN000; | ||
| 10 | |||
| 11 | :class B ;AN000; | ||
| 12 | :def 8 " %1" ;AN000; | ||
| 13 | :def 9 "%1 %2",CR,LF ;AN000; | ||
| 14 | :def 10 "%1",CR,LF,"%2",CR,LF ;AN000; | ||
| 15 | :def 11 "Code page mismatch - %1",CR,LF,"Are you sure (Y/N)?" ;AN000; | ||
| 16 | :def 12 "%1",CR,LF ;AN000; | ||
| 17 | :def 14 CR,LF ;AN000; | ||
| 18 | :def 15 "Invalid file type value",CR,LF ;AN000; | ||
| 19 | |||
| 20 | ;;; Change these extended attribute error msgs back when adding ext. attr. | ||
| 21 | ;;; function in DOS. | ||
| 22 | ;;;:def 199 "Extended attribute error",CR,LF ;AN000; | ||
| 23 | ;;;:def 201 "Extended attribute name not found",CR,LF ;AN000; | ||
| 24 | ;;;:use 202 EXTEND8 ;"Insufficient memory" ;AN000; | ||
| 25 | ;;;:def 204 "Extended attribute name can't be set",CR,LF ;AN000; | ||
| 26 | ;;;:def 205 "Extended attribute name known to this filesystem but not supported",CR,LF ;AN000; | ||
| 27 | ;;;:def 206 "Extended attribute type mismatch",CR,LF ;AN000; | ||
| 28 | ;;;:def 208 "Extended attribute value not supported",CR,LF ;AN000; | ||
| 29 | |||
| 30 | :end ;AN000; | ||