diff options
Diffstat (limited to 'v2.0/source/SYSMES.ASM')
| -rw-r--r-- | v2.0/source/SYSMES.ASM | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/v2.0/source/SYSMES.ASM b/v2.0/source/SYSMES.ASM new file mode 100644 index 0000000..c7dea6d --- /dev/null +++ b/v2.0/source/SYSMES.ASM | |||
| @@ -0,0 +1,51 @@ | |||
| 1 | TITLE Message file for MS-DOS SYS Program | ||
| 2 | |||
| 3 | FALSE EQU 0 | ||
| 4 | TRUE EQU NOT FALSE | ||
| 5 | |||
| 6 | INCLUDE DOSSYM.ASM | ||
| 7 | |||
| 8 | Message MACRO label,text | ||
| 9 | PUBLIC label,label&Len | ||
| 10 | label DB text | ||
| 11 | label&Len DW $-label | ||
| 12 | ENDM | ||
| 13 | |||
| 14 | |||
| 15 | IBMJAPVER EQU FALSE | ||
| 16 | |||
| 17 | CONST SEGMENT PUBLIC BYTE | ||
| 18 | |||
| 19 | ; only this message must be terminated with a $ | ||
| 20 | PUBLIC BadVer | ||
| 21 | BADVER DB "Incorrect DOS version",13,10,"$" | ||
| 22 | |||
| 23 | IF IBMJAPVER | ||
| 24 | Message BadDisk,<"Destination disk cannot be booted"> | ||
| 25 | ENDIF | ||
| 26 | |||
| 27 | Message BadDrv,<"Invalid drive specification"> | ||
| 28 | Message BadParm,<"Invalid parameter"> | ||
| 29 | Message NoDest,<"No room for system on destination disk"> | ||
| 30 | Message BadSiz,<"Incompatible system size"> | ||
| 31 | Message Done,<"System transferred"> | ||
| 32 | |||
| 33 | PUBLIC GetSys,SysDrv,GetSysLen | ||
| 34 | GETSYS DB "Insert system disk in drive " | ||
| 35 | SYSDRV DB "A",13,10 | ||
| 36 | DB "and strike any key when ready",13,10 | ||
| 37 | GetSysLen DW GetSysLen-GetSys | ||
| 38 | |||
| 39 | CONST ENDS | ||
| 40 | |||
| 41 | DATA SEGMENT BYTE PUBLIC | ||
| 42 | DATA ENDS | ||
| 43 | |||
| 44 | CODE SEGMENT | ||
| 45 | DG GROUP CODE,CONST,DATA | ||
| 46 | ASSUME CS:DG,DS:DG,ES:DG,SS:DG | ||
| 47 | |||
| 48 | CODE ENDS | ||
| 49 | END | ||
| 50 | |||
| 51 | \ No newline at end of file | ||