DRehzahlmessung

[Sven04]

Hi Leute,
weiß von euch jemand wei ich das Beispielprogramm Für Drehzahlsensoren von Robotikhradware aändern muss, dass ich die Drehzahl an einem T1 Pin des AtMega32 messen kann?


Original Code(Robotikhardware):
Config Int0 = Falling

Config Timer1 = Timer, Prescale = 256
Const Timervorgabe = 3036
Const Markierungenproscheibe = 120

Dim Zaehlerirq0 As Long
Dim Impulseprosekunde As Long
Dim Impulseprominute As Long
Dim Umdrehungenprominute As Integer

Print
Print "* RN-Control 1.4 *"
Print "Drehzahl Messung"; ""



Zaehlerirq0 = 0
On Int0 Irq0
Enable Int0

On Timer1 Timer_irq
Enable Timer1

Enable Interrupts


Do
Print
Print "Impulse Sek: "; Impulseprosekunde
Impulseprominute = Impulseprosekunde * 60
Umdrehungenprominute = Impulseprominute / Markierungenproscheibe
Print "Umdreh. Min: "; Umdrehungenprominute
Wait 3
Loop

End




'Pro Impuls (Markierung auf Scheibe) ein Aufruf
Irq0:
Incr Zaehlerirq0
Return


'Pro Sekunde ein Aufruf
Timer_irq:
Timer1 = Timervorgabe
Impulseprosekunde = Zaehlerirq0
Zaehlerirq0 = 0
Return

MFG
Sven

[felack]

Der T1-Pin ist ein Zählereingang und Int0 ist ein Interrupteingang. Das kann man nicht einfach ändern.

felack

[Sven04]

Hi,
ich wollte eigentlich nur wissen ob man das Programm so abändern kann, dass eine Drehzahlmessung auch am T1-Pin möglich ist und wenn ja wie man das ändern müsste.


Sven