;/////////////////////////////////////////////////////////////////////
; Функция #02. Номер текущего диска.
;
; вход: нет
; выход: A - номер диска (0=A,1=B,..)
;	 C - номер последнего диска в системе
;/////////////////////////////////////////////////////////////////////
CURDISK_FN:
	LD	A,(LDRIVE)
	LD	C,A
	LD	A,(CurrentPath)
	SUB	'A'
	RET	NC
	LD	A,DSS_Error.sys.INVALID_DRIVE
	RET
CURDISK:
	LD	A,(LDRIVE)
	LD	C,A
	LD	A,(FatBuffer.DRIVE)
	AND	A
	RET 
;