You've not describe your accuracy requirements.

You'll get very reasonable accuracty simply doing this. It you're doing a long string of calculations, you may need more accuracy.

. mov a,r1
. mov b,#064h
. mul ab
. mov r6,b

done