#include pins.h
#include vars.h
main()
{
  timer=0;

  if (proc==plc_proc_spindle)
  {
    if (lift_up>1)
    {
      gvarset(7080,speed_z);//set speed
      g0moveA(absolute,4,lift_up*100);//absolute programming; Z axis;
      timer=200; do{timer--;}while (timer>0);//wait till motion started
      do { code=gvarget(6060); } while(code==0);      //wait till motion is stopped
    };
  };

  portclr(OUTPUT_MIST);
  portclr(OUTPUT_FLOOD);
  gvarset(7372,0);//Reset Mist State
  gvarset(7373,0);//Reset Flood State

  dac01=0x0;

  portclr(OUTPUT_SPINDLE);
  portclr(OUTPUT_CCW_SPINDLE);
  gvarset(7370,0);//Spindle State
  gvarset(7371,0);//Spindle Speed Mirror register

  command=PLC_MESSAGE_SPINDLE_SPEED_CHANGED;
  parameter=0;
  message=PLCCMD_REPLY_TO_MYCNC;
  timer=10; do{timer--;}while (timer>0); //pause to push the message with Spindle Speed data

  proc=plc_proc_idle;
  message=PLCCMD_MOTION_ABORT;
  exit(99);
};