Function InWeaponRange

Returns true only if the specified object is within the range of the active CRE's currently equipped weapon.