digital-8-15-u-pa	Binary to BCD Conversion Routine (4 Digit)