DataMuseum.dk

top - download

    Length: 2176 (0x880)
    Types: TextFile
    Names: »AM86MBUF.I86«

└─⟦57f0389e8⟧ Bits:30005761 SW1611 Access Manager v. 1.0
    └─ ⟦this⟧ »AM86MBUF.I86« 

TextFile

;
;    AM86 Version 1.0  December 20, 1982  0930
;			February 22, 1983  11:00
;
;    Copyright 1982,1983 Digital Research, Inc.
;

	ASSUME	CS:CODE,DS:DATA

;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;
; O N L Y   T H E   F O L L O W I N G   F O U R   E Q U' S
;	S H O U L D   B E   M O D I F I E D.    T H E   R E S T   O F
;	T H I S   M O D U L E   S H O U L D   N O T   B E   C H A N G E D!

NOBUFFERS	EQU	20
NODESECTR	EQU	4
NOKEYFILS	EQU	41	;NOTE: ONE KEY FILE IS RESERVED FOR LOCK FILE
				;USE
NODATFILS	EQU	40

;
;
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::





BUFMODSIZE	EQU	(NOKEYFILS*70)+(NODATFILS*198)+(NOBUFFERS*((NODESECTR*128)+160))

USRLSTBYTES	EQU	2
USIBYTES	EQU	USRLSTBYTES * NOKEYFILS
USDBYTES	EQU	USRLSTBYTES * NODATFILS


DATA	SEGMENT	PUBLIC

	PUBLIC	AM8FCB,AM8END,?AW49,?AW50,?AW52,?AW51
	PUBLIC	?AW04,?AW05,?AZ03

?AW49	DW	?
?AW50	DW	?
?AW51	DW	?
?AW52	DW	?

?AW04	DB	USIBYTES DUP (?)
?AW05	DB	USDBYTES DUP (?)

AM8FCB	DW	?
?AZ03	DB	?
	ORG	AM8FCB + BUFMODSIZE
						;DEFINES AMOUNT OF SPACE
AM8END	DB	?

DATA	ENDS

CODE	SEGMENT	PUBLIC

	PUBLIC	?AW48

?AW48	PROC	NEAR
	MOV	WORD PTR ?AW49,NOBUFFERS
	MOV	WORD PTR ?AW50,NODESECTR
	MOV	WORD PTR ?AW51,NOKEYFILS
	MOV	WORD PTR ?AW52,NODATFILS
	CLD
	PUSH	DS
	PUSH	ES
	PUSH	DS
	POP	ES
	PUSH	CS
	POP	DS
	MOV	CX,263
	MOV	SI,CS:OFFSET BANNER
	MOV	DI,OFFSET ?AZ03
    REP MOVS	BYTE PTR 0,BYTE PTR 0
	POP	ES
	POP	DS
	RET
?AW48	ENDP

BANNER	DB	0AH,0DH
	DB	'--------------------------------------------------',0AH,0DH
	DB	'ACCESS MANAGER (tm) 8086               Version 1.0',0AH,0DH
	DB	'Serial No. 3046-0261-000003"   All Rights Reserved',0AH,0DH
	DB	'Copyright (c) 1982,1983     Digital Research, Inc.',0AH,0DH
	DB	'--------------------------------------------------',0AH,0DH
	DB	'$'

CODE	ENDS

	END
«eof»