27 lines
511 B
C
27 lines
511 B
C
#include "cmd.h"
|
|
|
|
/*** hstoi - convert a hex string to an integer
|
|
*
|
|
* Conversion stops when the first non-hex character is found. If the first
|
|
* character is not a hex character, 0 is returned.
|
|
*
|
|
* Eric K. Evans, Microsoft
|
|
*/
|
|
|
|
hstoi(s)
|
|
TCHAR *s ;
|
|
{
|
|
int result = 0 ;
|
|
int digit ;
|
|
|
|
for( ; s && _istspace(*s) ; s++)
|
|
;
|
|
|
|
for ( ; s && _istxdigit(*s) ; s++) {
|
|
digit = (int) (*s <= TEXT('9')) ? (int)*s - (int)'0' : (int)_totlower(*s)-(int)'W' ;
|
|
result = (result << 4)+digit ;
|
|
} ;
|
|
|
|
return(result) ;
|
|
}
|