PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : wer kann mir en minicode für eine zeitschaltuhr schreiben?


cyberx
04.04.2005, 18:46
hi,
ich habe mir jetzt im "Andere Microcontroller" Unterforum die schaltungen zusammengeschnorrt ;-) nächstes wochenende wird dann gebaut.
Jetzt meine Frage, kann mir jemand ein fertigen code für eine Zeitschaltuhr schreiben?Ich kann kein basekom und möchte mir das auch wegen eines controllers nicht aneignen.

Ich bräuchte eine Zeitschaltung, die nach dieser:
https://www.roboternetz.de/phpBB2/download.php?id=2610
Schaltung nach 3h für eine minute einschaltet, und danach wieder 3h aus, wieder 1min ein, usw.
Ich habe mir basecom avr runtergeladen. komme nur überhauptnicht damit klar. (Programmsprachentechnisch)
Es währe echt nett wenn mir jemand so ein programm schreiben könnte.

edith:
Ich habe mir 10,12 und 16mhz quarze für diese schaltung bestellt...(falls das für den code wichtig sein solle)

mfg
Jens
uwegw
04.04.2005, 19:47
sowas hier?


$regfile = "2313def.dat" 'welchen avr wir nehmen
$crystal = 10000000 ' frequenz 10MHz (hier ändern für anderen quarz)
Config Portb = Output 'den port as ausgang einstellen

Do 'beginn der endlosschleife, der teil zwischen do und loop wird immer wieder durchlaufen
Portb.4 = 1 'ausgang an
Wait 60 'minute warten
Portb.4 = 0 'ausgang aus
Wait 10800 '3 stunden warten
Loop

end


die meiste zeit hab ich gebraucht um auszurechnen wieviele sekunden drei stunden sind...
cyberx
04.04.2005, 20:15
danke!
also so:


$regfile = "2313def.dat" '2313
$crystal = 12000000 ' frequenz 12MHz
Config Portb = Output 'den port as ausgang einstellen

Do 'beginn der endlosschleife, der teil zwischen do und loop wird immer wieder durchlaufen
Portb.4 = 1 'ausgang an
Wait 60 'minute warten
Portb.4 = 0 'ausgang aus
Wait 10800 '3 stunden warten
Loop

end
wenn ich 12mhz quarz verwende?
mfg
jens
uwegw
05.04.2005, 16:35
so isses... ob das ganze so läuft hab ich nicht getestet weil ich keinen 2313 besitze aber es sollte eigentlich stimmen...
CR-Racing
05.04.2005, 17:42
Ich würde das eher mit einem Timer-Interupt machen,
den diese " Wait " geschichten sind auf längere zeit gesehen ziemlich ungenau.

Gruß CR
uwegw
05.04.2005, 17:47
war auch nur ne kurze demonstration des prinzips...
ich würd das ganze in assembler schreiben dann ists auch quarzgenau...
11.04.2005, 12:30
... oder die Tmer verwenden, dann ist es auch in Bascom Quarzgenau.

mfg.

Dietmar