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