Kod: Zaznacz cały

:M6_MESS 
  if ValidTool(GetActTool) or UserExe then GotoLabel('M6_ENDPROCES');
  SetX(CTX); SetY(CTY);  ExeMove(0);
  RefZ(-1); ExeRef(PROBE_ON, F_NAJAZD);
  SetToolPos(CT_HEIGHT); 

Kod: Zaznacz cały

  const
  ...                   
   // linijki do dopisania w sekcji const
                          
  F_MESS=1500;            // Szybkość najazdu na czujnik długości
  F_REF_SLOW=50;          // Szybkość drugiego (dokładnego) pomiaru
  FAST_DOWN=50.0;         // (mm) Zakres szybkiego ruchu w dół do czujnika
  SLOW_DIST=2.0;          // (mm) odjazd do ponownego pomiaru  
  ...
  ...
  ...
:M6_MESS 
  if ValidTool(GetActTool) or UserExe then GotoLabel('M6_ENDPROCES');  
  SetX(CTX); SetY(CTY); ExeMove(0);             // Dojazd nad czujnik
  SetZ(PosZ - FAST_DOWN); ExeMove(0);           // Szybki zjazd do czujnika
  RefZ(-1); ExeRef(PROBE_ON_SOFT, F_MESS);      // Pierwszy pomiar (zgrubny)
  SetZ(PosZ + SLOW_DIST); ExeMove(0);           // Wycofanie
  RefZ(-1); ExeRef(PROBE_ON, F_REF_SLOW);       // Drugi pomiar (dokładny)
  SetToolPos(CT_HEIGHT); 

  ...
  ...