http://www.ousob.com --- Legacy Redefined #include <extend50.h> #define SPACE 0x20 CLIPPER b_hex2char() { int i = 0; int nRv = 0; char buff[33]; char buff2[33]; unsigned int num; if( !ISCHAR(1) ){ buff[0] = '\0'; buff2[0] = '\0'; _retc(buff2); return; } buff2[0] = '\0'; for( i=0; i<strlen(_parc(1)) && i<32; i++ ){ buff[i] = _parc(1)[i]; } buff[i] = '\0'; for( i=0; i<32768; i++ ){ sprintf(buff2,"%02x\0",i); if( strcmpi(buff,buff2) == 0 ){ nRv = i; break; } } _retni(nRv); return; }