贯入法自动计算