mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-25 01:14:21 +00:00
31 lines
896 B
C
31 lines
896 B
C
|
||
/*----------------------------------------------------------------------*\
|
||
| NAME : get_drv |
|
||
| CREATED : 5-August-83 LAST MODIFIED: 12-September-83 |
|
||
| FUNCTION: Get_drv extracts the drive code from the FCB passed |
|
||
| to it and converts it to an ASCII character that |
|
||
| that code represents. |
|
||
| INPUT : ptr to FCB to check. |
|
||
| OUTPUT : Returns A-P drive value. |
|
||
\*----------------------------------------------------------------------*/
|
||
|
||
#include <portab.h>
|
||
#include "utildef.h"
|
||
#include "cpmfunc.h"
|
||
|
||
/* THIS REFERENCE IS IN CPMFUNC.H
|
||
EXTERN WORD dir_get();
|
||
*/
|
||
|
||
BYTE get_drv( fcb )
|
||
BYTE fcb[]; /* ptr to current FCB */
|
||
{
|
||
BYTE drv; /* current drive (A-P) */
|
||
|
||
if( *fcb == 0 )
|
||
drv = dir_get() + 'A';
|
||
else
|
||
drv = fcb[0] + 'A' - 1;
|
||
return( drv );
|
||
}
|
||
|