Upload

Digital Research
2025-10-24 17:04:19 +00:00 · 2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
--- a/SOURCES/11/C86LNK.ASM
+++ b/SOURCES/11/C86LNK.ASM
@@ -0,0 +1,78 @@
+;
+        extrn   asm86:near
+cgroup  group   code
+dgroup  group   const,data,stack,memory
+
+        assume  cs:cgroup,ds:dgroup
+
+data    segment public  'DATA'
+data    ends
+
+;  
+stack   segment word stack 'STACK'
+stack_base      label   byte
+stack   ends
+;
+
+memory  segment memory  'MEMORY'
+memory  ends
+
+const   segment public  'CONST'
+
+        public  fcb,fcb16,tbuff,endbuf
+
+        org     6
+endbuf  equ     $
+        org     5ch
+fcb     equ     $
+        org     6ch
+fcb16   equ     $
+        org     80h
+tbuff   equ     $
+        org     100h
+
+const   ends
+
+code    segment public  'CODE'
+
+        public  mon1,mon2
+
+start:  mov     ax,ds
+        pushf
+        pop     bx
+        cli
+        mov     ss,ax
+        lea     sp,stack_base
+        push    bx
+        popf
+        jmp     asm86
+
+copyright       db      ' COPYRIGHT (C) DIGITAL RESEARCH, 1981 '
+
+        public  patch
+patch:
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+        db      90h,90h,90h,90h,90h,90h,90h,90h
+
+date    db      ' 10/01/81 '
+
+bdos:
+        pop     ax      ; return address
+        pop     dx
+        pop     cx
+        push    ax
+        int     224
+        ret
+
+mon1     equ    bdos
+mon2     equ    bdos
+code    ends
+
+end
+