projekty/Source/example1/src/ad.c

Go to the documentation of this file.

/*
 * $Id: ad.c,v 1 2004/11/25 9:22:00 BorisK Exp $
 *
 * Copyright (C) 2004 ONTRACK s.r.o.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA    
 * 02111-1307, USA.
 *
 * [1] ARM-based Microcontroller LPC2119/2129/2194/2292/9994, "Preliminary User Manual", February 03, 2004
 *
 * Written by Boris Kralik <kralikbo@yahoo.com>, 2004
 *
 */

#include "ad.h"
#include "types.h"

/***********************************************************************************
        Name:           ADC_interrupt
        Description:    ADC interrupt routines
        Parameters:     void
        Return:         void
************************************************************************************/
static unsigned int     inputs[7];

void 
ADC_int(void)
{
        unsigned char iADchannel=0;
        uint32_t adVal;
        disableIRQ();
        adVal           =       AD_ADDR;
        iADchannel      =       ((adVal & 0x07000000) >> 24);
        adVal = ((adVal & 0xFFC0)>>6);
        adVal -= AD_OFFSET;// AD_OFFSET = Optocoupler transistor (T) saturation Voltage (cca 0.33 V)
        if (adVal <= 0) adVal = 0;
        #if 0
                UARTWriteStr("\n\rADC:0x");
                UARTWriteStr(itoa_16(adVal));
                UARTWriteStr(" [V] Converted chanel:");
                UARTWriteStr(itoa_16(iADchannel));
        #endif
        inputs[iADchannel]      =       adVal;
        VICVectAddr = 0;       // Acknowledge Interrupt
        enableIRQ();
}
#define NUM     10
uint16_t AD_read(unsigned char channel) 
{
//      if (isSet == FALSE) return 0;
//              else 
        uint16_t        i,val = 0;
        for (i=0;i<NUM;i++)
        {
                AD_Start();
                while((AD_ADDR & (1 << 31))) ;
                val+=inputs[(channel-100)];
        }
                return (val/NUM);
}

void AD_Start(void){
//      if (isSet == FALSE)
//              return;
        AD_ADCR |=      (1 << 24);
        //AD_ADCR       &=      0xF9FFFFFF;     //???
        #if 0
                UARTWriteStr("\n\rAD_Start");
        #endif

}
void AD_PowerDown(void){        //Not work OK
        AD_ADCR |=      (1 << 21);
}
void AD_PowerUp(void){          //Not work OK
        AD_ADCR &=      (0 << 21);
}
void AD_Set_Reg(unsigned char uchSel){
        #if 0
                UARTWriteStr("\n\rAD_Set_Reg");
        #endif
//      isSet = FALSE;
        AD_ADCR         =       0x00000000;
        AD_ADDR         =       0x00000000;
        switch(uchSel)
        {
                case AI0:
                        PCB_PINSEL0     &=      0xFF7FFFFF;//Set AI0
                        AD_ADCR         =       0x00200AF1;     //CLKDIV = (9+1) , Select AI[0]
                        #if 0
                                UARTWriteStr("\n\rAD_Set_Reg(0)");
                        #endif
                        break;
                case AI1:
                        PCB_PINSEL0     &=      0xFDFFFFFF;//Set AI1
                        AD_ADCR         =       0x00200AF2;//Select AI[1]
                        AD_ADCR         |=      (1 << 21);
                        break;
                case AI2:
                        PCB_PINSEL0     &=      0xF7FFFFFF;//Set AI2
                        AD_ADCR         =       0x00200004;     //Select AI[2]
                        break;
                case AI3:
                        PCB_PINSEL0     &=      0xDFFFFFFF;//Set AI3
                        AD_ADCR         =       0x00200008;     //Select AI[3]
                        break;
                case AI4://NOT used in uPCB, uPCBNew; not tested
                        PCB_PINSEL2     |=      (1 << 21);//Set AI4
                        PCB_PINSEL2     |=      (1 << 5);//P2.30 as AI4, P3.28 as AI7
                        PCB_PINSEL2     |=      (1 << 4);//P2.31 as AI5, P3.29 as AI6
                        AD_ADCR         =       0x00200010;     //Select AI[4]
                        break;
                case AI5://NOT used in uPCB, uPCBNew; not tested
                        PCB_PINSEL2     |=      (1 << 22);//Set AI5
                        PCB_PINSEL2     |=      (1 << 5);//P2.30 as AI4, P3.28 as AI7
                        PCB_PINSEL2     |=      (1 << 4);//P2.31 as AI5, P3.29 as AI6
                        AD_ADCR         =       0x00200020;     //Select AI[5]
                        break;
                case AI6://NOT used in uPCB, uPCBNew; not tested
                        PCB_PINSEL2     |=      (1 << 6);//Set AI6
                        PCB_PINSEL2     |=      (1 << 5);//P2.30 as AI4, P3.28 as AI7
                        PCB_PINSEL2     |=      (1 << 4);//P2.31 as AI5, P3.29 as AI6   
                        AD_ADCR         =       0x00200040;     //Select AI[6]
                        break;
                case AI7://NOT used in uPCB, uPCBNew; not tested
                        PCB_PINSEL2     |=      (1 << 7);//Set AI7
                        PCB_PINSEL2     |=      (1 << 5);//P2.30 as AI4, P3.28 as AI7
                        PCB_PINSEL2     |=      (1 << 4);//P2.31 as AI5, P3.29 as AI6
                        AD_ADCR         =       0x002000080;    //Select AI[7]
                        break;
        }
//      isSet = TRUE;
        #if 0
                UARTWriteStr("\n\rAD_Set_Reg(1)");
        #endif
}

---