My second effort.
Code:@ DEVICE PIC16F886,LVP_OFF @ DEVICE PIC16F886,FCMEN_OFF @ DEVICE PIC16F886,IESO_OFF @ DEVICE PIC16F886,BOR_OFF @ DEVICE PIC16F886,CPD_OFF @ DEVICE PIC16F886,CP_OFF @ DEVICE PIC16F886,MCLRE_OFF @ DEVICE PIC16F886,PWRTE_ON @ DEVICE PIC16F886,WDT_OFF @ DEVICE PIC16F886,INTRC_OSC_NOCLKOUT @ DEVICE PIC16F886,WRT_OFF @ DEVICE PIC16F886,MCLR_OFF @ DEVICE PIC16F886,BOD_OFF @ DEVICE PIC16F886,PROTECT_OFF Define OSC 8 'Set PicBasic Pro processor speed to 8 Mhz (Must match oscillator value) OSCCON = %01110001 'Internal 8 mhz Osc CM1CON0 = 0 'Comparator Off CM2CON0 = 0 'Comparator Off TRISA = %11111111 'SET PORTA AS INPUTS TRISB = %00000000 'SET PORTB AS OUTPUTS TRISC = %11111111 'SET PORTC AS INPUTS ANSEL = %00001111 'SET INPUTS AN0-AN3 AS ANALOG INPUTS ADCON0 = %01000001 'SETUP ADC CONVERTER MODULE FOSC/8 & ENABLE ADC MODULE ADCON1 = %10000000 'SETUP ADC RIGHT JUSTIFY SET REFV to VDD & VSS 'Define ADCIN parameters Define ADC_BITS 10 'Set number of bits in result (10) Define ADC_CLOCK 3 'Set clock source (3=rc) Define ADC_SAMPLEUS 50 'Set sampling time in microseconds (50us) include "modedefs.bas" 'Allows the use of the serin/serout command




Bookmarks