Return to mdef CVS log

Up to [Synchronet] / sbbs / lciol

1.06a MS-DOS

	.xlist
%       title   @filename
	page	60,132
	.xcref
	.sall

; Define Storage
; format:  dss {1,2,4,6,8},name
;	   dss {1-65535}

ds1	equ	<label byte>
ds2	equ	<label word>
ds4	equ	<label dword>
ds6	equ	<label fword>
ds8	equ	<label qword>

dss	macro	nb,nm
	ifnb	<nm>
%    nm	ds&nb
	endif
	org	$+nb
	endm


; Define Memory Model
; format:  setmod {s,c,m,l,h}

mdls	equ	<small>
mdlc	equ	<compact>
mdlm	equ	<medium>
mdll	equ	<large>
mdlh	equ	<huge>
    ifndef mm
mm	equ	<s>
    endif

setmod	macro	mtype
    ifdef mdl&mtype
	.8086
% aa 	equ	<.model mdl&mtype>
%	aa
%	asyn	<mdl&mtype>
pb	equ	(@codesize shl 1)+4
    else
	asyn	<error: '&mtype' undefined>
    endif
	endm
asyn	macro	msg
    if2
%	%out	*** &msg memory model ***
    endif
	endm


; Directives

os	equ	<offset>
s	equ	<short>
mb	equ	<byte ptr>
mw	equ	<word ptr>
ml	equ	<dword ptr>

	.386P

eopg	macro
	.list
	page
	endm

liston	macro
	.list
	endm
	.cref
	liston

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.