HEXA$="FFFF" VAR V,H$ FOR I=0TO LEN(HEXA$)-1 H$=MID$(HEXA$,I,1) V=V<<4OR INSTR("01234567889ABCDEF",H$) NEXT ? V