$stream =~ tr/1/F/;
print "0x$stream\n";