BASCOM Uhr mit Butterfly

Hallo zusammen,

an ein bisschen Quältext solls nicht hängen. Ist eigentlich nur eine
geringfügige Änderung eines Bsp.textes von Josef Franz Vögel im
Bascom.

$regfile = "M169DEF.DAT"      ' Butterfly

Config Clock = Soft
Disable Interrupts

'configure the date format
Config Date = Ymd , Separator = -                           '
ANSI-Format
'This sample does not have the clock started so interrupts are not
enabled
' Enable Interrupts

'dim the used variables
Dim Lvar1 As Long
Dim Mday As Byte
Dim Bweekday As Byte , Strweekday As String * 10
Dim Strdate As String * 8
Dim Strtime As String * 8
Dim Bsec As Byte , Bmin As Byte , Bhour As Byte
Dim Bday As Byte , Bmonth As Byte , Byear As Byte
Dim Lsecofday As Long
Dim Wsysday As Word
Dim Lsyssec As Long
Dim Wdayofyear As Word


 Do
' Example 1 with internal RTC-Clock
_sec = 12 : _min = 30 : _hour = 18                          ' Load
RTC-Clock for example - testing

Lsecofday = Secofday()
Print "Second of Day of " ; Time$ ; " is " ; Lsecofday
Loop

Mit diesem Code macht's im Simulator und im Butterfly keine
fortlaufende Zeit.

Gruß Sebastian

Ich das zwar kann zwar nicht Bascom, aber die Zeilen:

Config Clock = Soft
Disable Interrupts

Deuten darauf hin, dass die Interrupts deaktiviert sind und nicht
aktiviert werden. Ich sehe auch keine Interrupt-Routine
(Tick-Tack)

OK, sind aber als Beispiele im Bascom dabei und sollten doch eigentlich
funzen?!
Der Butterfly hat auch ein 32.xxkhz Quarz für ne Uhr.

Danke für die Info MasterFX. Bin davon ausgegangen, dass die Timer
autark laufen, wie ich das von anderen Proz. kenne (CC1 / CC2-> ok
Betrieb Sys. dahinter)und der Wert sich dann im Time$ bzw. Date$
wiederfinden.
Das sollte dann bei den Beispielen aber auch mit dabeistehen, da ich
mir vorstellen kann, dass andere Einsteiger beim nachvollziehen die
gleichen Probleme haben.

Für einen schnellen Programmablauf teile ich dann die interne 8Mhz
Clock? Aber wozu dann der externe 32k Uhrenquarz?

Sorry,
Config Clock = Soft ; Disable Interrupts funktioniert anscheinend nur
bei MCU`s mit interem RTC und demnach auch Time$ und Date$.
Lt DB hat der 169er nicht.
Das mit den Timer-Interrupt will beim 169er unter BASCOM nicht funzen.
Stell ich mich zu blöd an.
Im BASCOM-Simulator läuft folgendes Demo nur mit dem 2313 nicht aber
mit dem 169er (auch nicht auf dem Butterfly in real)
Der Timer läuft und läuft und trotzdem wird kein Interrupt ausgelöst.
Bascompoblem? Lt DB muss er.

$regfile = "2313def.dat"
'$regfile = "m169def.dat"  ' keine Chance
$crystal = 8000000


'Configute the timer to use the clock divided by 1024
Config Timer0 = Timer , Prescale = 1024

'Define the ISR handler
On Ovf0 Tim0_isr
'you may also use TIMER0 for OVF0, it is the same
'On Timer0 Tim0_isr ' dasselbe


Enable Timer0                                               ' enable
the timer interrupt
Enable Interrupts                                           'allow
interrupts to occur
Do
 Print Timer0  'your program goes here
Loop

'the following code is executed when the timer rolls over
Tim0_isr:
  Print "     *";
Return

End

Hallo !

Ich benutze BASCOM. Aber damit die Uhrzeit "richtig" läuft muss doch der 
Attiny "logischerweise" immer mit Strom versorgt werden oder nicht ? 
Also so wie der BIOS mit seiner kleinen Batterie.

MfG,

Tugrul Ö.

Verdammt !! Tut mir leid. Ich war im falschem Thread !!!!!