43 lines
1.1 KiB
NASM
43 lines
1.1 KiB
NASM
|
title prefix
|
||
|
|
_CODE segment para public 'BC_CODE'
|
||
|
|
_CODE ends
|
||
|
|
CSEG segment para public 'CODESG'
|
||
|
|
CSEG ends
|
||
|
|
CODE segment para public 'CODE'
|
||
|
|
CODE ends
|
||
|
|
SHELL segment para public 'CODESG'
|
||
|
|
SHELL ends
|
||
|
|
CLEAR segment para public 'CODESG'
|
||
|
|
CLEAR ends
|
||
|
|
BC_ICN_CODE segment para public 'INIT_CODE'
|
||
|
|
BC_ICN_CODE ends
|
||
|
|
BC_IDS_CODE segment para public 'INIT_CODE'
|
||
|
|
BC_IDS_CODE ends
|
||
|
|
INIT_CODE segment para public 'INIT_CODE'
|
||
|
|
INIT_CODE ends
|
||
|
|
|
||
|
|
; DSEG must come first and not be CONST or _DATA so that other language
|
||
|
|
; obj's do not mess with the location of DSEG
|
||
|
|
DSEG segment common 'DATASG'
|
||
|
|
DSEG ends
|
||
|
|
CONST segment para public 'CONST'
|
||
|
|
CONST ends
|
||
|
|
DATA segment para public 'DATA'
|
||
|
|
DATA ends
|
||
|
|
BC_DATA segment word public 'BC_VARS'
|
||
|
|
BC_DATA ends
|
||
|
|
named_common segment word common 'BC_VARS'
|
||
|
|
named_common ends
|
||
|
|
BC_FT segment word public 'BC_SEGS'
|
||
|
|
BC_FT ends
|
||
|
|
BC_CN segment para public 'BC_SEGS'
|
||
|
|
BC_CN ends
|
||
|
|
BC_DS segment para public 'BC_SEGS'
|
||
|
|
BC_DS ends
|
||
|
|
COMMON segment para common 'BLANK'
|
||
|
|
COMMON ends
|
||
|
|
LAST_SEGMENT segment para public 'LAST_SEGMENT'
|
||
|
|
LAST_SEGMENT ends
|
||
|
|
DGROUP group DSEG,CONST,DATA,BC_DATA,BC_FT,BC_CN,BC_DS,COMMON
|
||
|
|
end
|