Evaluated proc hex2bin {hex {sep {}} {endian B}} { str2bin [hex2str $hex] $sep $endian}