analog axis select

// Script takes the analogue value of switch pin
// and changes value of buf[0] to indicate
// which axis selection it represents
//  Example only - ArcEye 2013

int switchPin = A0; // select the input pin from the switch
float switchValue = 0; // variable to store the value coming from the switch
int Xthreshold, Ythreshold, Zthreshold, Athreshold;
char buf;

void setup() {
 
  // Xthreshold, Ythreshold, Zthreshold, Athreshold need to be determined by
  // experimentation with the switch and initialised as the 
  // value beyond which the next axis is being selected
//    Xthreshold = xxx
//    Ythreshold = xxx
//    Zthreshold = xxx
//    Athreshold = xxx
  // initialize serial communication:
  Serial.begin(9600);
}


void loop() 
{
  delay(500);
  
  switchValue = analogRead(switchPin);
  
  // if an axis is selected
  if(switchValue > 0 &&  switchValue < Athreshold) 
    {
     buf = 0; // defaults to Off
     
    if(switchValue > 0 && switchValue < Xthreshold)
        buf = 1;
    else if(switchValue > Xthreshold && switchValue < Ythreshold)
        buf = 2; 
    else if(switchValue > Ythreshold && switchValue < Zthreshold)
        buf = 3;
    else if(switchValue > Zthreshold && switchValue < Athreshold)
        buf = 4;

    Serial.print(buf);
    }
}

component ADCreceive               "Receives serial byte from Arduino running ADC-send.ino and sets selected pin";

pin out bit Offselect = 0           "TRUE if Off";
pin out bit Xselect = 0             "TRUE if X selected";
pin out bit Yselect = 0             "TRUE if Y selected";
pin out bit Zselect = 0             "TRUE if Z selected";
pin out bit Aselect = 0             "TRUE if A selected";

option singleton yes;               
option userspace yes;
option extra_setup yes;             // use this to open port
option extra_cleanup yes;           // use this to close port

author "ArcEye arceye@mgware.co.uk 2013";
license "GPL";
;;

#include <stdio.h>    /* Standard input/output definitions */
#include <stdlib.h> 
#include <stdint.h>   /* Standard types */
#include <string.h>   /* String function definitions */
#include <unistd.h>   /* UNIX standard function definitions */
#include <fcntl.h>    /* File control definitions */
#include <errno.h>    /* Error number definitions */
#include <termios.h>  /* POSIX terminal control definitions */
#include <sys/ioctl.h>
#include <sys/signal.h>
#include <sys/types.h>

#define BAUDRATE B9600
#define DEVICE "/dev/ttyUSB0"
int fd;                             // file descriptor
struct termios oldtio,newtio;       // new and saved old port setup

hal_bit_t pins[5];

int setupSerialPort()       
{
      fd = open(DEVICE, O_RDWR | O_NOCTTY ); 
        if (fd <0)
            {
            perror(DEVICE); 
            exit(-1); 
            }
        
        tcgetattr(fd,&oldtio); /* save current port settings */
        
        bzero(&newtio, sizeof(newtio));
        newtio.c_cflag = BAUDRATE | CRTSCTS | CS8 | CLOCAL | CREAD;
        newtio.c_iflag = IGNPAR;
        newtio.c_oflag = 0;
        
        /* set input mode (non-canonical, no echo,...) */
        newtio.c_lflag = 0;
         
        newtio.c_cc[VTIME]    = 0;   /* inter-character timer unused */
        newtio.c_cc[VMIN]     = 5;   /* blocking read until 5 chars received */
        
        tcflush(fd, TCIFLUSH);
        return( tcsetattr(fd,TCSANOW,&newtio) ); // -1 for error 0 is OK

}



void user_mainloop(void)
{
int c, x;
char ch;
    
    pins[0] = Offselect; pins[1] = Xselect; pins[2] = Yselect; pins[3] = Zselect; pins[4] = Aselect;
    
    while (fd != -1) 
        {
        read(fd,&ch,1);        
               
        for(x = 0; x < 5; x++)
            {
            if(ch == x)
                pins[x] = 1;
            else
                pins[x] = 0;
            }
    
        usleep(500000); // 1/2 sec
        }
    fprintf(stderr, "Exiting");
    exit(0);
         
}



EXTRA_SETUP()
{
     if(setupSerialPort() == -1)
        {
        fprintf(stderr,"Error opening ttyUSB0");
        }
}

EXTRA_CLEANUP()
{
    tcsetattr(fd, TCSANOW, &oldtio);
    close(fd);
    fprintf(stderr,"All cleaned up");
}