s = 17108073
k = s Mod 10000
centerOfMass = k / 2
MsgBox centerOfMass