|
|
|
@ -3516,22 +3516,16 @@ inline void gcode_G28() {
|
|
|
|
|
float measured_z,
|
|
|
|
|
z_before = probePointCounter ? Z_RAISE_BETWEEN_PROBINGS + current_position[Z_AXIS] : Z_RAISE_BEFORE_PROBING + home_offset[Z_AXIS];
|
|
|
|
|
|
|
|
|
|
if (probePointCounter) {
|
|
|
|
|
#if ENABLED(DEBUG_LEVELING_FEATURE)
|
|
|
|
|
if (DEBUGGING(LEVELING)) {
|
|
|
|
|
SERIAL_ECHOPAIR("z_before = (between) ", (Z_RAISE_BETWEEN_PROBINGS + current_position[Z_AXIS]));
|
|
|
|
|
SERIAL_EOL;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
else {
|
|
|
|
|
#if ENABLED(DEBUG_LEVELING_FEATURE)
|
|
|
|
|
if (DEBUGGING(LEVELING)) {
|
|
|
|
|
SERIAL_ECHOPAIR("z_before = (before) ", Z_RAISE_BEFORE_PROBING + home_offset[Z_AXIS]);
|
|
|
|
|
SERIAL_EOL;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
#if ENABLED(DEBUG_LEVELING_FEATURE)
|
|
|
|
|
if (DEBUGGING(LEVELING)) {
|
|
|
|
|
SERIAL_ECHOPGM("z_before = (");
|
|
|
|
|
if (probePointCounter)
|
|
|
|
|
SERIAL_ECHOPGM("between) ");
|
|
|
|
|
else
|
|
|
|
|
SERIAL_ECHOPGM("before) ");
|
|
|
|
|
SERIAL_ECHOLN(z_before);
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#if ENABLED(DELTA)
|
|
|
|
|
// Avoid probing the corners (outside the round or hexagon print surface) on a delta printer.
|
|
|
|
@ -4199,57 +4193,41 @@ inline void gcode_M42() {
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
double sum = 0.0, mean = 0.0, sigma = 0.0, sample_set[50];
|
|
|
|
|
int8_t verbose_level = 1, n_samples = 10, n_legs = 0, schizoid_flag = 0;
|
|
|
|
|
|
|
|
|
|
if (code_seen('V')) {
|
|
|
|
|
verbose_level = code_value_byte();
|
|
|
|
|
if (verbose_level < 0 || verbose_level > 4) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("?Verbose Level not plausible (0-4).\n");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
int8_t verbose_level = code_seen('V') ? code_value_byte() : 1;
|
|
|
|
|
if (verbose_level < 0 || verbose_level > 4) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("?Verbose Level not plausible (0-4).\n");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (verbose_level > 0)
|
|
|
|
|
SERIAL_PROTOCOLPGM("M48 Z-Probe Repeatability test\n");
|
|
|
|
|
|
|
|
|
|
if (code_seen('P')) {
|
|
|
|
|
n_samples = code_value_byte();
|
|
|
|
|
if (n_samples < 4 || n_samples > 50) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("?Sample size not plausible (4-50).\n");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
int8_t n_samples = code_seen('P') ? code_value_byte() : 10;
|
|
|
|
|
if (n_samples < 4 || n_samples > 50) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("?Sample size not plausible (4-50).\n");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
float X_current = current_position[X_AXIS],
|
|
|
|
|
Y_current = current_position[Y_AXIS],
|
|
|
|
|
Z_current = current_position[Z_AXIS],
|
|
|
|
|
X_probe_location = X_current + X_PROBE_OFFSET_FROM_EXTRUDER,
|
|
|
|
|
Y_probe_location = Y_current + Y_PROBE_OFFSET_FROM_EXTRUDER,
|
|
|
|
|
Z_start_location = Z_current + Z_RAISE_BEFORE_PROBING;
|
|
|
|
|
Z_start_location = current_position[Z_AXIS] + Z_RAISE_BEFORE_PROBING;
|
|
|
|
|
bool deploy_probe_for_each_reading = code_seen('E');
|
|
|
|
|
|
|
|
|
|
if (code_seen('X')) {
|
|
|
|
|
X_probe_location = code_value_axis_units(X_AXIS);
|
|
|
|
|
#if DISABLED(DELTA)
|
|
|
|
|
if (X_probe_location < MIN_PROBE_X || X_probe_location > MAX_PROBE_X) {
|
|
|
|
|
out_of_range_error(PSTR("X"));
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (code_seen('Y')) {
|
|
|
|
|
Y_probe_location = code_value_axis_units(Y_AXIS);
|
|
|
|
|
#if DISABLED(DELTA)
|
|
|
|
|
if (Y_probe_location < MIN_PROBE_Y || Y_probe_location > MAX_PROBE_Y) {
|
|
|
|
|
out_of_range_error(PSTR("Y"));
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
float X_probe_location = code_seen('X') ? code_value_axis_units(X_AXIS) : X_current + X_PROBE_OFFSET_FROM_EXTRUDER;
|
|
|
|
|
#if DISABLED(DELTA)
|
|
|
|
|
if (X_probe_location < MIN_PROBE_X || X_probe_location > MAX_PROBE_X) {
|
|
|
|
|
out_of_range_error(PSTR("X"));
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#if ENABLED(DELTA)
|
|
|
|
|
float Y_probe_location = code_seen('Y') ? code_value_axis_units(Y_AXIS) : Y_current + Y_PROBE_OFFSET_FROM_EXTRUDER;
|
|
|
|
|
#if DISABLED(DELTA)
|
|
|
|
|
if (Y_probe_location < MIN_PROBE_Y || Y_probe_location > MAX_PROBE_Y) {
|
|
|
|
|
out_of_range_error(PSTR("Y"));
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
#else
|
|
|
|
|
if (sqrt(X_probe_location * X_probe_location + Y_probe_location * Y_probe_location) > DELTA_PROBEABLE_RADIUS) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("? (X,Y) location outside of probeable radius.\n");
|
|
|
|
|
return;
|
|
|
|
@ -4257,20 +4235,15 @@ inline void gcode_M42() {
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
bool seen_L = code_seen('L');
|
|
|
|
|
|
|
|
|
|
if (seen_L) {
|
|
|
|
|
n_legs = code_value_byte();
|
|
|
|
|
if (n_legs < 0 || n_legs > 15) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("?Number of legs in movement not plausible (0-15).\n");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
if (n_legs == 1) n_legs = 2;
|
|
|
|
|
uint8_t n_legs = seen_L ? code_value_byte() : 0;
|
|
|
|
|
if (n_legs < 0 || n_legs > 15) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("?Number of legs in movement not plausible (0-15).\n");
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
if (n_legs == 1) n_legs = 2;
|
|
|
|
|
|
|
|
|
|
if (code_seen('S')) {
|
|
|
|
|
schizoid_flag++;
|
|
|
|
|
if (!seen_L) n_legs = 7;
|
|
|
|
|
}
|
|
|
|
|
bool schizoid_flag = code_seen('S');
|
|
|
|
|
if (schizoid_flag && !seen_L) n_legs = 7;
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Now get everything to the specified probe point So we can safely do a
|
|
|
|
@ -4299,26 +4272,29 @@ inline void gcode_M42() {
|
|
|
|
|
*/
|
|
|
|
|
setup_for_endstop_move();
|
|
|
|
|
|
|
|
|
|
probe_pt(X_probe_location, Y_probe_location, Z_RAISE_BEFORE_PROBING,
|
|
|
|
|
// Height before each probe (except the first)
|
|
|
|
|
float z_between = home_offset[Z_AXIS] + (deploy_probe_for_each_reading ? Z_RAISE_BEFORE_PROBING : Z_RAISE_BETWEEN_PROBINGS);
|
|
|
|
|
|
|
|
|
|
// Deploy the probe and probe the first point
|
|
|
|
|
probe_pt(X_probe_location, Y_probe_location,
|
|
|
|
|
home_offset[Z_AXIS] + Z_RAISE_BEFORE_PROBING,
|
|
|
|
|
deploy_probe_for_each_reading ? ProbeDeployAndStow : ProbeDeploy,
|
|
|
|
|
verbose_level);
|
|
|
|
|
|
|
|
|
|
raise_z_after_probing();
|
|
|
|
|
randomSeed(millis());
|
|
|
|
|
|
|
|
|
|
double mean, sigma, sample_set[n_samples];
|
|
|
|
|
for (uint8_t n = 0; n < n_samples; n++) {
|
|
|
|
|
randomSeed(millis());
|
|
|
|
|
delay(500);
|
|
|
|
|
if (n_legs) {
|
|
|
|
|
float radius, angle = random(0.0, 360.0);
|
|
|
|
|
int dir = (random(0, 10) > 5.0) ? -1 : 1; // clockwise or counter clockwise
|
|
|
|
|
|
|
|
|
|
radius = random(
|
|
|
|
|
#if ENABLED(DELTA)
|
|
|
|
|
DELTA_PROBEABLE_RADIUS / 8, DELTA_PROBEABLE_RADIUS / 3
|
|
|
|
|
#else
|
|
|
|
|
5, X_MAX_LENGTH / 8
|
|
|
|
|
#endif
|
|
|
|
|
);
|
|
|
|
|
float angle = random(0.0, 360.0),
|
|
|
|
|
radius = random(
|
|
|
|
|
#if ENABLED(DELTA)
|
|
|
|
|
DELTA_PROBEABLE_RADIUS / 8, DELTA_PROBEABLE_RADIUS / 3
|
|
|
|
|
#else
|
|
|
|
|
5, X_MAX_LENGTH / 8
|
|
|
|
|
#endif
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
if (verbose_level > 3) {
|
|
|
|
|
SERIAL_ECHOPAIR("Starting radius: ", radius);
|
|
|
|
@ -4383,26 +4359,21 @@ inline void gcode_M42() {
|
|
|
|
|
} // n_legs loop
|
|
|
|
|
} // n_legs
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* We don't really have to do this move, but if we don't we can see a
|
|
|
|
|
* funny shift in the Z Height because the user might not have the
|
|
|
|
|
* Z_RAISE_BEFORE_PROBING height identical to the Z_RAISE_BETWEEN_PROBING
|
|
|
|
|
* height. This gets us back to the probe location at the same height that
|
|
|
|
|
* we have been running around the circle at.
|
|
|
|
|
*/
|
|
|
|
|
do_blocking_move_to_xy(X_probe_location - (X_PROBE_OFFSET_FROM_EXTRUDER), Y_probe_location - (Y_PROBE_OFFSET_FROM_EXTRUDER));
|
|
|
|
|
if (deploy_probe_for_each_reading)
|
|
|
|
|
sample_set[n] = probe_pt(X_probe_location, Y_probe_location, Z_RAISE_BEFORE_PROBING, ProbeDeployAndStow, verbose_level);
|
|
|
|
|
else {
|
|
|
|
|
if (n == n_samples - 1)
|
|
|
|
|
sample_set[n] = probe_pt(X_probe_location, Y_probe_location, Z_RAISE_BEFORE_PROBING, ProbeStow, verbose_level); else
|
|
|
|
|
sample_set[n] = probe_pt(X_probe_location, Y_probe_location, Z_RAISE_BEFORE_PROBING, ProbeStay, verbose_level);
|
|
|
|
|
}
|
|
|
|
|
// The last probe will differ
|
|
|
|
|
bool last_probe = (n == n_samples - 1);
|
|
|
|
|
|
|
|
|
|
// Probe a single point
|
|
|
|
|
sample_set[n] = probe_pt(
|
|
|
|
|
X_probe_location, Y_probe_location,
|
|
|
|
|
z_between,
|
|
|
|
|
deploy_probe_for_each_reading ? ProbeDeployAndStow : last_probe ? ProbeStow : ProbeStay,
|
|
|
|
|
verbose_level
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Get the current mean for the data points we have so far
|
|
|
|
|
*/
|
|
|
|
|
sum = 0.0;
|
|
|
|
|
double sum = 0.0;
|
|
|
|
|
for (uint8_t j = 0; j <= n; j++) sum += sample_set[j];
|
|
|
|
|
mean = sum / (n + 1);
|
|
|
|
|
|
|
|
|
@ -4416,38 +4387,42 @@ inline void gcode_M42() {
|
|
|
|
|
sum += ss * ss;
|
|
|
|
|
}
|
|
|
|
|
sigma = sqrt(sum / (n + 1));
|
|
|
|
|
if (verbose_level > 1) {
|
|
|
|
|
SERIAL_PROTOCOL(n + 1);
|
|
|
|
|
SERIAL_PROTOCOLPGM(" of ");
|
|
|
|
|
SERIAL_PROTOCOL((int)n_samples);
|
|
|
|
|
SERIAL_PROTOCOLPGM(" z: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(current_position[Z_AXIS], 6);
|
|
|
|
|
delay(50);
|
|
|
|
|
if (verbose_level > 2) {
|
|
|
|
|
SERIAL_PROTOCOLPGM(" mean: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(mean, 6);
|
|
|
|
|
SERIAL_PROTOCOLPGM(" sigma: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(sigma, 6);
|
|
|
|
|
if (verbose_level > 0) {
|
|
|
|
|
if (verbose_level > 1) {
|
|
|
|
|
SERIAL_PROTOCOL(n + 1);
|
|
|
|
|
SERIAL_PROTOCOLPGM(" of ");
|
|
|
|
|
SERIAL_PROTOCOL((int)n_samples);
|
|
|
|
|
SERIAL_PROTOCOLPGM(" z: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(current_position[Z_AXIS], 6);
|
|
|
|
|
delay(50);
|
|
|
|
|
if (verbose_level > 2) {
|
|
|
|
|
SERIAL_PROTOCOLPGM(" mean: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(mean, 6);
|
|
|
|
|
SERIAL_PROTOCOLPGM(" sigma: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(sigma, 6);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
SERIAL_EOL;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// Raise before the next loop for the legs,
|
|
|
|
|
// or do the final raise after the last probe
|
|
|
|
|
if (n_legs || last_probe) {
|
|
|
|
|
do_blocking_move_to_z(last_probe ? home_offset[Z_AXIS] + Z_RAISE_AFTER_PROBING : z_between);
|
|
|
|
|
if (!last_probe) delay(500);
|
|
|
|
|
}
|
|
|
|
|
if (verbose_level > 0) SERIAL_EOL;
|
|
|
|
|
delay(50);
|
|
|
|
|
do_blocking_move_to_z(current_position[Z_AXIS] + Z_RAISE_BETWEEN_PROBINGS);
|
|
|
|
|
} // End of probe loop code
|
|
|
|
|
|
|
|
|
|
// raise_z_after_probing();
|
|
|
|
|
} // End of probe loop
|
|
|
|
|
|
|
|
|
|
if (verbose_level > 0) {
|
|
|
|
|
SERIAL_PROTOCOLPGM("Mean: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(mean, 6);
|
|
|
|
|
SERIAL_EOL;
|
|
|
|
|
delay(25);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
SERIAL_PROTOCOLPGM("Standard Deviation: ");
|
|
|
|
|
SERIAL_PROTOCOL_F(sigma, 6);
|
|
|
|
|
SERIAL_EOL; SERIAL_EOL;
|
|
|
|
|
delay(25);
|
|
|
|
|
|
|
|
|
|
clean_up_after_endstop_move();
|
|
|
|
|
|
|
|
|
|