Can anyone please help me with my project? - Rate meter

[Humbleworker]

Utilizing a laserlight and a phototransistor (RA0), I have created a counter. I'm using PIC16F628A with an onboard 4mhz oscillator. Right now it only displays how many objects have passed by. I would like to add another function which is to display the rate of objects that pass per min. or per hour. I don't know how to incorporate this into the program. Can anyone help me?

[sayzer]

By "rate", did you mean the number of people passed in one minute?

IF yes, then use Timer1 module of the PIC at 1:8 scale and have 500ms timing interval. This way, you can have Timer1 module timing in the background while you can at the sametime have your counting in the foreground.

OR

You can just use simple PAUSE command to create 1 minute timing interval and have your counting in a WHILE statement.

For example,

CountPin VAR PORTA.0
Timing   VAR WORD
Counter  VAR WORD
Timing = 0
Counter= 0

Start:

WHILE Timing < 6000
	IF CountPin = 0 THEN
		WHILE CountPin = 0 : WEND

		Counter = Counter + 1   'Number of people Passed
		Timing  = Timing  + 1	'Timing: 6,000x10ms=60,000ms (1 min) 
		PAUSE 10

	ENDIF
WEND

Timing = 0

Goto Start