This is your tricky bit solved...

BigWord=(Fint*10)+Fdec

Naturally, you cant have Fint bigger than 6552 to start with.

Now to do some easy stuff like turning Gold into Lead...