mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-26 09:54:20 +00:00
Upload
Digital Research
This commit is contained in:
@@ -0,0 +1,38 @@
|
||||
;
|
||||
; interface module for ddt86 assembler
|
||||
; 7/15/82
|
||||
;
|
||||
dgroup group dats
|
||||
dats segment public 'DATS'
|
||||
db '?'
|
||||
dats ends
|
||||
;
|
||||
cgroup group code
|
||||
extrn asm:near
|
||||
public ddtgetline
|
||||
public goddt
|
||||
public ddtset
|
||||
;
|
||||
code segment public 'CODE'
|
||||
assume cs:cgroup
|
||||
;
|
||||
assent proc
|
||||
org 2400h
|
||||
jmp asm
|
||||
assent endp
|
||||
;
|
||||
ddtgetline proc
|
||||
jmp $-22fah
|
||||
ddtgetline endp
|
||||
;
|
||||
goddt proc
|
||||
jmp $-22fah
|
||||
goddt endp
|
||||
;
|
||||
ddtset proc
|
||||
jmp $-22fah
|
||||
ddtset endp
|
||||
;
|
||||
code ends
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user