Two weeks ago someone have requested a solution to easily measure a draft angle on the part. @N:\PPI\Nominatif\LALLIARD\Test-5x\2017_Essais-5-axes\Vidéo

I'm using the same solution but as usual with the help of a macro (PMILL 2017 / 2018) . This macro is call from a Key Shortcut (F2) in my case.
//
// Measure and display Draft angle Value
// F2 to call the macro
//
FUNCTION MAIN() {
If NOT member($session._keys, "DraftAngle") {
SESSIONPAR BOOL DraftAngle = 0
}
MEASURE CLEAR_ALL MODE VECTOR START MEASURE DIRECTION
MODE DIRECTION ALIGN GEOM
IF $session.DraftAngle==0 {
VIEW MODEL ; SHADE UNDERCUT
$session.DraftAngle=1
} ELSE {
// Get the Direction vector
REAL V_I= REAL($widget('DirectionInput.DirectionFrame.I').value)
REAL V_J= REAL($widget('DirectionInput.DirectionFrame.J').value)
REAL V_K= REAL($widget('DirectionInput.DirectionFrame.K').value)
REAL Calc =0
IF $V_K == 0 {
$Calc=90
} ELSE {
$Calc=sqrt(($V_I*$V_I)+($V_J*$V_J))
// PRINT $Calc
$Calc = Atan($Calc/$V_K)
if $Calc > 180 {
$Calc=$Calc-180
}
}
STRING $Qry = "Draft angle : " + $round($Calc,3)
BOOL Ret = 0
$Ret = QUERY $Qry
IF $Ret {
DIRECTION ACCEPT
$session.DraftAngle=0
} ELSE {
// Activate Direction measure mode for next value
MODE DIRECTION ALIGN GEOM
}
}
To use this macro add the shortcut into your keyboard shortcut

Then call the macro each time you need To mesure a point with F2 ( or your shortcut)
- One call will open the measurement Windows. Pick a point on the part where you want to get the draft angle
- Press again F2 to get the Value
If you not validate the value, you can pick a new point. Press again F2 to get the new value : if you validate the result the macro will close the measurement Windows.
