Der Nachfolger des WDR-Computerclub mit Wolfgang Back und Wolfgang Rudolph - ...und immer ein Bit übrigbehalten!


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: DCF Sycronisirung funktioniert nicht Kategorie: C-Control I Micro (von Martin - 11.12.2005 0:03)
 Als Antwort auf Re: DCF Sycronisirung funktioniert nicht von YAZO - 9.12.2005 22:38
Martin nutzt:  Micro

>
> > hab ja die systemerweiterung geladen.
> > Aber bei meiner Doco ist für DCFSYNC ein anderer Wert angegeben?
> > const DCFSYNC=FD09h
> > Welche ist die richtige?
>
> Hello
> Ja, du programmierst BASIC++ da ist die Definition einer
> Konstanten etwas anders.
> Dann lautet die Demo so:
>
> '--------------------------
> '------ I/O PORTS ---------
> '--------------------------
> define DCFIN    port[4]
> define TASTER   port[3]
> define LED      port[5]
> define BEEPER   port[6]
> '--------------------------
> '---- SYSTEM MEMORY -------
> '--------------------------
> define OLD_SEC      byte[1]
> define  a           byte[2]
> '--------------------------
> '---- SYSTEM JUMPS  -------
> '--------------------------
> const DCFSYNC=FD09h
>
>
> SYS DCFSYNC
> '------- DIE UHR EINSTELLEN ---------------------
> LED=on
> HOUR=0
> MINUTE=0
> SECOND=0
> baud R9600
> pause 5
> print"START"
> '--------------------------------------------------
> '        SYNCHRONIZE THE RTC WITH DCF77           -
> '--------------------------------------------------
>
> #TICKING
> IF DCFIN=off then LED=on
> if DCFIN=on then LED=off
> if OLD_SEC = second then goto TICKING
>
> #BLINK
> OLD_SEC=second
> print HOUR;
> print":";
> print MINUTE;
> print ":";
> print SECOND
> if RXD then beep 100,5,BEEPER
> goto TICKING
>
>
>
>
> syscode "page0_ext1.s19"
>
>


Hallo habe dein Programm kopiert, Led und Beep gelöscht und danach in die Micro kopiert.
Die constante steht in meinem Programm genauso wie bei dir drinnen


define DCFIN    port[4]
define TASTER   port[3]
define LED      port[5]
define BEEPER   port[6]
'--------------------------
'---- SYSTEM MEMORY -------
'--------------------------
define OLD_SEC      byte[1]
define  a           byte[2]
'--------------------------
'---- SYSTEM JUMPS  -------
'--------------------------
const DCFSYNC=FD09h


SYS DCFSYNC
'------- DIE UHR EINSTELLEN ---------------------
LED=on
HOUR=0
MINUTE=0
SECOND=0
baud R9600
pause 5
print"START"
'--------------------------------------------------
'        SYNCHRONIZE THE RTC WITH DCF77           -
'--------------------------------------------------

#TICKING
IF DCFIN=off then LED=on
if DCFIN=on then LED=off
if OLD_SEC = second then goto TICKING

#BLINK
OLD_SEC=second
print HOUR;
print":";
print MINUTE;
print ":";
print SECOND
if RXD then beep 100,5,BEEPER
goto TICKING




syscode "page0_ext1.s19"


 Antwort schreiben

Bisherige Antworten:

Re: DCF Sycronisirung funktioniert nicht (von YAZO - 11.12.2005 13:42)
Re: DCF Sycronisirung funktioniert nicht (von Martin - 11.12.2005 0:05)