Thank you very much for your help ,Richard !
I made the changes, but now CCPR1L = 0
Code:
Define OSC 4
OSCCON = %01101010 'sets the internal oscillator to 4Mhz
DEFINE ADC_BITS 8
DEFINE ADC_CLOCK 3
DEFINE ADC_SAMPLEUS 100
ADCON0 = %00000000
ADCON1 = %00000011
FVRCON = %10000010 'voltage reference set to 2.048V
CM1CON0 = 0 ' COMPARATORS OFF
CM1CON1 = 0
CM2CON0 = 0 ' COMPARATORS OFF
CM2CON1 = 0
CPSCON0 = 0 'CAPACTIVE SENSE MODULE OFF
RCSTA.7 = 0 'SERIAL PORT OFF
'APFCON0 = %10000000
'APFCON1 = %00001010
'APFCON1.3 = 1
TRISA = %00000011
TRISB = %00000000
TRISC = %00000100 ' PORTC.2 input
ANSELA = %00000011
ANSELB = %00000000
ANSELC = %00000100 ' ANALOG INPUT AN6
OPTION_REG.7 = 1 ' disable WPU
WPUA = %00000000
WPUB = %00000000
WPUC = %00000000
porta = 0
portb = 0
portc = 0
inh1 var portc.4
inh2 var portc.0
adval var byte
duty1 var byte
duty2 var byte
duty1 = 0
t2con=4
PR2 = 255
ccp1con=16
pause 200
'========================PROGRAM=============================
main:
adcin 6 , adval
pause 10
CCPR1L = adval ;set pwm
duty1 = adval
hpwm 2 , duty1, 2000
high inh1
high inh2
goto main
end
'=============================================================
Bookmarks