(@DIAMETER * 0.10) (@STEPDOWN * 0.10) (@DIAMETER * 0.50) (@DIAMETER * @PERCENT_DIAMETER) (@PERCENT_MAXIMUM * 0.55) (@DIAMETER * 0.05) (@DIAMETER * 0.01) Dim Offset Dim Constant Constant = 5.0mm If @TOOL_TYPE = @BALL Then Offset = @CORNER_RADIUS * 0.15 * 0.2 ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then Offset = @FLAT_RADIUS * 0.2 Else Offset = @DIAMETER * 0.5 * 0.15 * 0.2 End If result = Min(Constant, Offset) 200.0mm (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (@CORNER_RADIUS * 2) If @TOOL_TYPE = @BALL Then result = @CORNER_RADIUS ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then result = 1.9 * @FLAT_RADIUS Else result = 1.9 * @DIAMETER / 2 End If ((@STEPDOWN + 2.0mm) * 1.1) ((@STEPDOWN + 2.0mm) * 1.1) (@STEPDOWN + 2.0mm) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@STEPDOWN * 0.10) (@DIAMETER * 0.50) (@DIAMETER * @PERCENT_DIAMETER) (@PERCENT_MAXIMUM * 0.55) (@DIAMETER * 0.05) (@DIAMETER * 0.01) Dim Offset Dim Constant Constant = 5.0mm If @TOOL_TYPE = @BALL Then Offset = @CORNER_RADIUS * 0.15 * 0.2 ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then Offset = @FLAT_RADIUS * 0.2 Else Offset = @DIAMETER * 0.5 * 0.15 * 0.2 End If result = Min(Constant, Offset) 200.0mm (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (@CORNER_RADIUS * 2) If @TOOL_TYPE = @BALL Then result = @CORNER_RADIUS ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then result = 1.9 * @FLAT_RADIUS Else result = 1.9 * @DIAMETER / 2 End If ((@STEPDOWN + 2.0mm) * 1.1) ((@STEPDOWN + 2.0mm) * 1.1) (@STEPDOWN + 2.0mm) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@STEPDOWN * 0.10) (@DIAMETER * 0.50) (@DIAMETER * @PERCENT_DIAMETER) (@PERCENT_MAXIMUM * 0.55) (@DIAMETER * 0.05) (@DIAMETER * 0.01) Dim Offset Dim Constant Constant = 5.0mm If @TOOL_TYPE = @BALL Then Offset = @CORNER_RADIUS * 0.15 * 0.2 ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then Offset = @FLAT_RADIUS * 0.2 Else Offset = @DIAMETER * 0.5 * 0.15 * 0.2 End If result = Min(Constant, Offset) 200.0mm (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (@CORNER_RADIUS * 2) If @TOOL_TYPE = @BALL Then result = @CORNER_RADIUS ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then result = 1.9 * @FLAT_RADIUS Else result = 1.9 * @DIAMETER / 2 End If ((@STEPDOWN + 2.0mm) * 1.1) ((@STEPDOWN + 2.0mm) * 1.1) (@STEPDOWN + 2.0mm) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@STEPDOWN * 0.10) (@DIAMETER * 0.50) (@DIAMETER * 0.05) (@DIAMETER * 0.01) Dim Offset Dim Constant Constant = 5.0mm If @TOOL_TYPE = @BALL Then Offset = @CORNER_RADIUS * 0.15 * 0.2 ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then Offset = @FLAT_RADIUS * 0.2 Else Offset = @DIAMETER * 0.5 * 0.15 * 0.2 End If result = Min(Constant, Offset) (@STEPDOWN * 2) (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) ((@STEPDOWN + 2.0mm) * 1.1) ((@STEPDOWN + 2.0mm) * 1.1) (@STEPDOWN + 2.0mm) (@CORNER_RADIUS) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@STEPOVER * SQRT(1.0 + 1 / TAN (1.0))) (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@DIAMETER * @PERCENT_DIAMETER) (@PERCENT_MAXIMUM * 0.55) (@DIAMETER * 0.05) (@DIAMETER * 0.01) Dim Offset Dim Constant Constant = 5.0mm If @TOOL_TYPE = @BALL Then Offset = @CORNER_RADIUS * 0.15 * 0.2 ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then Offset = @FLAT_RADIUS * 0.2 Else Offset = @DIAMETER * 0.5 * 0.15 * 0.2 End If result = Min(Constant, Offset) 200.0mm (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (@CORNER_RADIUS * 2) If @TOOL_TYPE = @BALL Then result = @CORNER_RADIUS ElseIf @TOOL_TYPE = @BULL Or @TOOL_TYPE = @FLAT Then result = 1.9 * @FLAT_RADIUS Else result = 1.9 * @DIAMETER / 2 End If (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.45) (@STEPOVER * 2) (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) ((@STEPDOWN + 2.0mm) * 1.1) ((@STEPDOWN + 2.0mm) * 1.1) (@STEPDOWN + 2.0mm) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.45) 2.0mm (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) ((@STEPDOWN + 2.0mm) * 1.1) ((@STEPDOWN + 2.0mm) * 1.1) (@STEPDOWN + 2.0mm) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@STEPOVER * SQRT(1.0 + 1 / TAN (1.0))) (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1)) (@DIAMETER * 0.10) (@STEPOVER * SQRT(1.0 + 1 / TAN (1.0))) (@KEEP_TOOL_DOWN_DISTANCE / @DIAMETER * 100) (Max (@VERTICAL_ARC_ENTRY * 1.1, @VERTICAL_ARC_EXIT * 1.1))