Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: Tacho anzeige Kategorie: Hardware (von Dieter Kalkofen - 2.12.2004 19:15)
 Als Antwort auf Re: Tacho anzeige von Carsten - 29.11.2004 10:06

>
>
> >
> >

 Hallo Carsten
 Ich Habe das Programm geändert hir das Listing

'Frquenzmesser
define myWord    word[1]
define hiByte    byte[1]
define loByte    byte[2]
define TEMPVAL   byte[4]

define BUS BYTEPORT[1]

define LE1  port[09] 'Lash 1 Counter 1
define LE2  port[10] 'Lach 2
define LE3  port[11] 'Lach 3 Counter 2
define LE4  port[12] 'Lach 4
define BYSI port[16] 'Redy Signal

BEEP 400,25,10
BEEP 400,25,10

#INIT
'--UMLEITUNG DER PRINT-FUNKTION AUF DAS CONFIG-MODULE -
print"#ON_CONFIG#";             'UMGELEITET
get TEMPVAL                     'den aktuellen Wert lesen
put (TEMPVAL or &B0000110)      'Bits setzten und zurück schreiben
print"#OFF#";                   'Umleitung abschalten

LE1=0 : LE2=0 : LE3=0 : LE4=0
BUS=0 : BYSI=0
PULSE LE1 : PULSE LE2
PULSE LE3 : PULSE LE4

PUT 12
PRINT "Fequenzmessung:"
PRINT "V 27,11,2004"

'--------------------------------------------------------------------------------------------------

#LOOP
'Start Counter 1 u 2
FREQ1=0 : FREQ2=0
TIMER=0
BYSI=1
WAIT TIMER=25 '25
myWord=FREQ2
'
BUS=hiByte : PULSE LE3
BUS=loByte : PULSE LE4
'
BYSI=0
'
'Start Cunter 2
FREQ2=0
TIMER=0
BYSI=1
WAIT TIMER=25
'
myWord=FREQ2
BUS=hiByte : PULSE LE3
BUS=loByte : PULSE LE4
'
myWord=FREQ1
BUS=hiByte : PULSE LE1
BUS=loByte : PULSE LE2
'
if FREQ1=9000 then FREQ1=0
if FREQ2=9000 then FREQ2=0
'
BYSI=0
'
GOTO LOOP

END

Ich glaube das der
Fehler vom Signalgenerator verursacht wird eventuel einstreungen inder Signalleitung
oder über das Masseptenzial

Mit freundlichen Gruss

 Dieter

 Antwort schreiben

Bisherige Antworten: