PIC16F877A, How to add timer delays on output?

[joseph]

thanks cncmachineguy! the code posted above works i just change the byte variable into a word and i can time upto my requirements




however i have another similar project that is having problem, the code is:

@ DEVICE pic16f877a,WDT_ON, PWRT_ON, BOD_ON
DEFINE OSC 8
define ADIN_RES 10
DEFINE ADC_BITS 10
DEFINE ADC_CLOCK 3
DEFINE ADC_SAMPLEUS 50

TMP VAR word
SLM var word
delay var word


COUNT1 VAR word ' COUNTER FOR PORTD.5
TRISA = %00000011
TRISB = %00000000
TRISD.0 = %0
TRISD.1 = %0
ADCON0 = %11000101
ADCON1 = %10000000


COUNT1 = 0


START:
delay = 0
ADCIN 0 , SLM
ADCIN 1 , TMP

delay  =((tmp * (46/200)) + 8)*384
if tmp =< 30 THEN                    
   DELay = 3625
   ELSE 
    IF tmp => 80 THEN
   delay = 10244
      ELSE
     delay = 384 * ((tmp * (46/200)) + 8) / 2
     ENDIF
ENDIF  
 
IF(PORTb.5=1) AND (COUNT1<delay) THEN skip1 
IF SLM => 621 then
 high PORTb.5
 else
 low PORTb.5
endif
COUNT1 = 0



SKIP1:
pause 20
COUNT1 = COUNT1 + 1


GOTO START

i need to vary the output delay based on the ambient temperature, but the result is inaccurate

[joseph]

UP! :

@ DEVICE pic16f877a,WDT_ON, PWRT_ON, BOD_ON
DEFINE OSC 8
define ADIN_RES 10
DEFINE ADC_BITS 10
DEFINE ADC_CLOCK 3
DEFINE ADC_SAMPLEUS 50

TMP VAR word
SLM var word
delay var word


COUNT1 VAR word ' COUNTER FOR PORTD.5
TRISA = %00000011
TRISB = %00000000
TRISD.0 = %0
TRISD.1 = %0
ADCON0 = %11000101
ADCON1 = %10000000


COUNT1 = 0


START:
delay = 0
ADCIN 0 , SLM
ADCIN 1 , TMP

 
if tmp =< 30 THEN                    
   DELay = 3625
   ELSE 
    IF tmp => 80 THEN
   delay = 10244
      ELSE                               
     delay = 384 * (tmp * (46/200) + 8)
     ENDIF
ENDIF  
 
IF SLM => 621 then
 high PORTb.5
 else
 low PORTb.5
endif
COUNT1 = 0

lod:
IF (PORTb.5=1) AND (COUNT1<DELAY) THEN skip1 
goto start
SKIP1:
pause 100
COUNT1 = COUNT1 + 1
goto lod

tried the code posted above with no luck

[cncmachineguy]

Can you give us any clues? What does it do or not do?

[joseph]

the circuit has two analog inputs, SLM and TMP, if SLM reaches the value 621 then PORTB.5 is turned on for a period of time proportional to TMP with the formula 384 * (tmp * (46/200) + 8)

the minimum time is 3625 seconds if TMP is less than 30, maximum is 10244 if TMP is equal or higher than 80

vref is set to VDD