Opto interrupter ;>

[deimantas]

Hi,
The problem with your current aproach is that if the input stays high longer than it takes for the program to cycle it will keep on counting. Think of it, the input goes high, the variable is incremented and the program starts over, the input is still high, the variable get incremented and the program starts over and so on.

We're talking micro seconds here so if one pulse from your opto-interupter is 2ms long you may count from 0-10 in one single pulse. You need to wait for the input to go high, increment your count variable then wait for the input to go low again before you allow another count. Something like:

loop:
  if opto = 1 then
    counts = counts+1
    if counts >=10 THEN 
      high led
    endif
    

While opto = 1      'Loop here until input goes low.
    Wend
   endif
goto loop

A better way though would be to use one of the PICs internal timers configured as a counter and simply let it count the pulses. Have a look at the TMR1 section of the datasheet.

About your code then, you haven't DEFINEd the oscillator speed and there's a colon missing after the loop label...

/Henrik.

EDIT: OK, I give up....why the heck does the editor keeps inserting code tags on it's own in the middle of a section already surounded by code tags??

Thank You, i will read about TMR1, i played some time and thinked about counting pulses and wited program which works fine for now

ANSEL = 0
OSCCON = $60
TRISB = %00001000
TRISA = %00000000
cnt var byte
opto var PORTB.3
led VAR PORTB.4
led2 var PORTB.5
low led
cnt = 0
opto = 0
Begin:
if opto = 1 then skc
goto begin

skc:
cnt=cnt+1
if cnt >=20 then ledas
pause 50
goto begin

ledas:
cnt = 0
high led
goto begin
end

But doing it with wile its much better than my idea but now i have problem with doing another process like controlling motor and counting optocoupler pulses, i need use interrupts without question i think :/ OSC is 4Mhz.