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/RESTORE/RESTORE.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/RESTORE/RESTORE.SKL')
| -rw-r--r-- | v4.0/src/CMD/RESTORE/RESTORE.SKL | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/v4.0/src/CMD/RESTORE/RESTORE.SKL b/v4.0/src/CMD/RESTORE/RESTORE.SKL new file mode 100644 index 0000000..81bf2cc --- /dev/null +++ b/v4.0/src/CMD/RESTORE/RESTORE.SKL | |||
| @@ -0,0 +1,46 @@ | |||
| 1 | ;========================================================== | ||
| 2 | |||
| 3 | :util RESTORE ;AN000; | ||
| 4 | |||
| 5 | ;--------- | ||
| 6 | :class A | ||
| 7 | ;--------- ;AN000; | ||
| 8 | :use 1 COMMON1 ;AN000; ;For "Incorrect DOS version | ||
| 9 | :def 2 CR,LF,"Source and target drives are the same",CR,LF ;AN000; | ||
| 10 | :def 3 CR,LF,"Invalid number of parameters",CR,LF ;AN000; | ||
| 11 | |||
| 12 | :use 5 COMMON25 ;AN000; ;For "Invalid path | ||
| 13 | :def 6 CR,LF,"Invalid drive specification",CR,LF ;AN000; | ||
| 14 | :def 7 CR,LF,"Warning! No files were found to restore",CR,LF ;AN000; | ||
| 15 | :def 8 CR,LF,"Insert backup diskette %1 in drive %2:",CR,LF ;AN000; | ||
| 16 | :def 9 CR,LF,"Insert restore target in drive %1:",CR,LF ;AN000; | ||
| 17 | :use 10 COMMON28 ;AN000; ;For "Press any key to continue . . .",CR,LF | ||
| 18 | :def 11 CR,LF,"Warning! Diskette is out of sequence",CR,LF ;AN000; | ||
| 19 | "Replace diskette or continue if okay",CR,LF ;AN000; | ||
| 20 | |||
| 21 | :def 12 CR,LF,"The last file was not restored",CR,LF ;AN000; | ||
| 22 | :def 13 CR,LF,"*** Files were backed up %1 ***",CR,LF ;AN000; | ||
| 23 | :def 14 CR,LF,"Source does not contain backup files",CR,LF ;AN000; | ||
| 24 | :def 15 CR,LF,"Insufficient memory",CR,LF ;AN000; | ||
| 25 | :def 16 CR,LF,"Warning! File %1",CR,LF ;AN000; | ||
| 26 | "is a read-only file",CR,LF ;AN000; | ||
| 27 | "Replace the file (Y/N)?" ;AN000; | ||
| 28 | |||
| 29 | :def 17 CR,LF,"Restore file sequence error",CR,LF ;AN000; | ||
| 30 | :def 18 CR,LF,"File creation error",CR,LF ;AN000; | ||
| 31 | :def 19 CR,LF,"Insufficient disk space",CR,LF ;AN000; | ||
| 32 | :def 20 CR,LF,"*** Not able to restore file ***",CR,LF ;AN000; | ||
| 33 | :def 21 CR,LF,"*** Restoring files from drive %1: ***",CR,LF ;AN000; | ||
| 34 | :def 22 CR,LF,"Warning! File %1",CR,LF ;AN000; | ||
| 35 | "was changed after it was backed up",CR,LF ;AN000; | ||
| 36 | "Replace the file (Y/N)?",CR,LF ;AN000; | ||
| 37 | |||
| 38 | :def 23 "Diskette: %1",CR,LF ;AN000; | ||
| 39 | |||
| 40 | :use 27 COMMON23 ;AN000; ;For "Invalid date | ||
| 41 | :use 28 COMMON24 ;AN000; ;For "Invalid time | ||
| 42 | :use 29 COMMON26 ;AN000; ;For "No source drive specified | ||
| 43 | :use 30 COMMON27 ;AN000; ;For "No target drive specified | ||
| 44 | :def 31 CR,LF ;AN000; | ||
| 45 | :end ;AN000; | ||
| 46 | ;========================================================== | ||