//Turn on Spindle clockwise
#include pins.h
#include vars.h

#define ADC_CHANNEL 1

main()
{
  timer=0;
  proc=plc_proc_spindle;

  speed=eparam/2;
 
  command=0x32; //set ADC offset register address
  parameter=0x800+(speed)+(ADC_CHANNEL<<12);
  message=PLCCMD_SET_CNC_EXTVAR;    timer=2;do{timer--;}while(timer>0);

  portset(OUTPUT_SPINDLE);

  gvarset(7370,1); timer=30;do{timer--;}while (timer>0); //Spindle State
  gvarset(7371,eparam); timer=30;do{timer--;}while (timer>0); //Spindle Speed Mirror register

  //delay after spindle started
  timer=spindle_on_delay; do{timer--;}while (timer>0); //delay for Spindle reach given speed

  exit(99);	//normal exit 
};