[an error occurred while processing this directive]
[an error occurred while processing this directive]
|
Что-нибудь оптимальнее чем :)
#define tobcd( bin ) ((((( bin ) % 10000 ) / 1000 ) << 12 ) \
+ (((( bin ) % 1000 ) / 100 ) << 8 ) \
+ (((( bin ) % 100 ) / 10 ) << 4 ) \
+ (( bin ) % 10 ))
(на 4 тетрады)
E-mail: info@telesys.ru