diff options
| author |  Mark Zbikowski | 2024-04-25 21:24:10 +0100 |
|---|---|---|
| committer |  Microsoft Open Source | 2024-04-25 22:32:27 +0000 |
| commit | 2d04cacc5322951f187bb17e017c12920ac8ebe2 (patch) | |
| tree | 80ee017efa878dfd5344b44249e6a241f2a7f6e2 /v4.0/src/CMD/RECOVER/RECMACRO.INC | |
| 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/RECOVER/RECMACRO.INC')
| -rw-r--r-- | v4.0/src/CMD/RECOVER/RECMACRO.INC | 95 |
1 files changed, 95 insertions, 0 deletions
diff --git a/v4.0/src/CMD/RECOVER/RECMACRO.INC b/v4.0/src/CMD/RECOVER/RECMACRO.INC new file mode 100644 index 0000000..e2933ed --- /dev/null +++ b/v4.0/src/CMD/RECOVER/RECMACRO.INC | |||
| @@ -0,0 +1,95 @@ | |||
| 1 | ; | ||
| 2 | ;****************************************************************************** | ||
| 3 | ; Message Macro Definitions | ||
| 4 | ;****************************************************************************** | ||
| 5 | ; | ||
| 6 | |||
| 7 | EXTRN Display_Interface:near | ||
| 8 | |||
| 9 | |||
| 10 | ;----------------------------------------------------------------------------- | ||
| 11 | |||
| 12 | Message macro Message_Name ; ;AN000; | ||
| 13 | ; | ||
| 14 | mov dx,offset dg:Message_Name ; ;AN000; | ||
| 15 | call Display_Interface ; ;AN000; | ||
| 16 | endm ; ;AN000; | ||
| 17 | |||
| 18 | ;----------------------------------------------------------------------------- | ||
| 19 | |||
| 20 | Parse_Message macro ; ;AN000; | ||
| 21 | |||
| 22 | ; | ||
| 23 | push ds ; ;AN000;bgb | ||
| 24 | mov dx,dg ; ;AN000;bgb | ||
| 25 | mov ds,dx ; ;AN000;bgb | ||
| 26 | mov word ptr Parse_Error_Msg,ax ; ;AN000; | ||
| 27 | mov dx,offset dg:Parse_Error_Msg ; ;AN000; | ||
| 28 | call Display_Interface ; ;AN000; | ||
| 29 | pop ds ; ;AN000;bgb | ||
| 30 | endm ; ;AN000; | ||
| 31 | |||
| 32 | ;----------------------------------------------------------------------------- | ||
| 33 | |||
| 34 | Extended_Message macro ; ;AN000; | ||
| 35 | ; | ||
| 36 | |||
| 37 | push ds ; ;AN000;bgb | ||
| 38 | mov dx,dg ; ;AN000;bgb | ||
| 39 | mov ds,dx ; ;AN000;bgb | ||
| 40 | mov word ptr Ext_Error_Msg,ax ; ;AN000; | ||
| 41 | mov dx,offset dg:Ext_Error_Msg ; ;AN000; | ||
| 42 | call Display_Interface ; ;AN000; | ||
| 43 | pop ds ; ;AN000;bgb | ||
| 44 | endm ; ;AN000; | ||
| 45 | |||
| 46 | ; | ||
| 47 | ;***************************************************************************** | ||
| 48 | ; General Macro's | ||
| 49 | ;***************************************************************************** | ||
| 50 | ; | ||
| 51 | |||
| 52 | Procedure macro Proc_Name ; ;AN000; | ||
| 53 | ; | ||
| 54 | Public Proc_Name ; ;AN000; | ||
| 55 | Proc_Name proc ; ;AN000; | ||
| 56 | ; | ||
| 57 | endm ; ;AN000; | ||
| 58 | ;----------------------------------------------------------------------------- | ||
| 59 | |||
| 60 | DOS_Call macro Function ; ;AN000; | ||
| 61 | ; | ||
| 62 | mov ah,Function ; ;AN000; | ||
| 63 | int 21h ; ;AN000; | ||
| 64 | ; | ||
| 65 | endm ; ;AN000; | ||
| 66 | ;----------------------------------------------------------------------------- | ||
| 67 | |||
| 68 | Popff macro | ||
| 69 | |||
| 70 | jmp $+3 | ||
| 71 | iret | ||
| 72 | push cs | ||
| 73 | call $-2 | ||
| 74 | |||
| 75 | endm | ||
| 76 | |||
| 77 | |||
| 78 | ;----------------------------------------------------------------------------- | ||
| 79 | |||
| 80 | Set_Data_Segment macro | ||
| 81 | |||
| 82 | push ax | ||
| 83 | mov ax,dg ;Point to data segment | ||
| 84 | mov ds,ax ; | ||
| 85 | assume ds:dg,es:dg | ||
| 86 | push ds | ||
| 87 | pop es | ||
| 88 | pop ax | ||
| 89 | |||
| 90 | |||
| 91 | endm | ||
| 92 | |||
| 93 | |||
| 94 | |||
| 95 | \ No newline at end of file | ||