.MODEL SMALL
include msystem.mac
include sys.mac
include install.e
.CODE
common	<byte	disk		0>
common	<byte	pro_head	0>
common	<byte	pro_treck	80>	; TotSect[+13h]/TrkSect[+18h]/HeadCnt[+1Ah]
common	<byte	pro_sector	1>
common	<byte	max_sector	15>
common	<word	diskbuf		NIL>
;---	Инициализиpовать пеpеменные
func	initvars,,,,public
	getmem	<len_buf>,<diskbuf>
endf
END