You are correct. I modified the code to the following a few days ago.
Move1:
interim = position1 & %00001111
Lbyte = interim | %00000000
interim = position1 & %11110000
Hbyte = (interim >> 4) | %10000000

Your's look more compact I think I will change mine. Thanks. I'm learning.