From 0d81ec4b6ebe8c54283da15175c2dd608cf1358f Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Mon, 9 Nov 2020 09:05:40 +0100
Subject: Binaeruhr.asm: Kommentare und Initialisierung praezisiert

---
 Binaeruhr.asm | 30 +++++++++++++++---------------
 1 file changed, 15 insertions(+), 15 deletions(-)

diff --git a/Binaeruhr.asm b/Binaeruhr.asm
index 59e2a22..8786e26 100644
--- a/Binaeruhr.asm
+++ b/Binaeruhr.asm
@@ -60,20 +60,20 @@
   ldi r17,0xd0
   ldi r16,0x55
   out OCR1AH,r17
-  out OCR1AL,r16            ; TimerB bis 0xd055 laufen lassen (= 300 Hz)
+  out OCR1AL,r16            ; Timer1 bis 0xd055 laufen lassen (= 300 Hz)
   ldi r16,0x09
   out TCCR1B,r16            ; no prescaler
   ldi r16,0x40
   out TIMSK,r16             ; Counter1 Output Compare A Match Interrupt Enable
 
-  ldi r16,0x55
-  out PORTB,r16             ; Muster auf PORTB (Zeilen)
+  ldi r16,0xff
+  out PORTB,r16             ; Zeilen (aus)
   ldi r16,0x7c
-  out PORTD,r16             ; 2x n.d., 2x Pull-up (Taster), Muster auf Spalten
+  out PORTD,r16             ; 1x n.d., 1x In (DCF77), 2x In mit Pull-up (Taster), 3x Spalten (aus), 1x n.d.
   ldi r16,0xff
-  out DDRB,r16              ; Ausgänge: PORTB (Zeilen)
+  out DDRB,r16              ; Ausgaenge: PORTB (Zeilen)
   ldi r16,0x70
-  out DDRD,r16              ; Ausgänge: PORTD4..6 (Spalten)
+  out DDRD,r16              ; Ausgaenge: PORTD4..6 (Spalten)
 
   ldi Spalte,0x10
   ldi r16,0x12
@@ -97,7 +97,7 @@ low_high_Funkflanke:
   mov r16,TicsL
   sub r16,lHTicsL           ; die gemessene "low" Zeit ist der Abstand der letzten lh-Flanke
   cpi r16,205
-  brcc Funkfehler           ; "low" > 2050ms -- hierzu ist *keine* Flanke vonnöten
+  brcc Funkfehler           ; "low" >= 2050ms -- hierzu ist *keine* Flanke vonnoeten
 
   sbis PIND,1
   rjmp nach_Funkflanke
@@ -109,10 +109,10 @@ low_high_Funkflanke:
   brcs Funkfehler           ; "low" < 950ms
 
   cpi r16,105
-  brcs neue_Funksekunde     ; 950ms < "low" < 1050ms (= normale Sekunde)
+  brcs neue_Funksekunde     ; 950ms <= "low" < 1050ms (= normale Sekunde)
 
   cpi r16,195
-  brcs Funkfehler           ; 1050ms < "low" < 1950ms
+  brcs Funkfehler           ; 1050ms <= "low" < 1950ms
 
   rjmp neue_Funkminute
 
@@ -121,7 +121,7 @@ high_low_Funkflanke:
   mov r16,TicsL
   sub r16,lHTicsL           ; 10 vs. 20 ( = 100ms vs. 200ms)
   cpi r16,26
-  brcc Funkfehler           ; high > 250ms -- hierzu ist *keine* Flanke vonnöten
+  brcc Funkfehler           ; high > 250ms -- hierzu ist *keine* Flanke vonnoeten
 
   sbic PIND,1
   rjmp nach_Funkflanke
@@ -164,13 +164,13 @@ Funk_initialisieren:
 neue_Funksekunde:
 
   sbrs Status,2
-  rjmp nach_Funkflanke
+  rjmp nach_Funkflanke      ; War die letzte Minute per Funk ok?
 
   mov r16,nTicsL
-  sub r16,TicsL             ; wie viele TicsL bis zur nächsten Sekunde (nach Quarz)
+  sub r16,TicsL             ; wie viele TicsL bis zur naechsten Sekunde (nach Quarz)
   mov nTicsL,TicsL          ; wir setzen es auf "jetzt"
-  cpi r16,50                ; wurde die Sekunde durch den Quarz schon gezählt?
-  brcs nach_Funkflanke      ; branch, wenn "noch nicht gezählt"
+  cpi r16,50                ; wurde die Sekunde durch den Quarz schon gezaehlt?
+  brcs nach_Funkflanke      ; branch, wenn "noch nicht gezaehlt"
   subi nTicsL,(256-100)     ; wir setzen es jetz auf "in 100 TicsL"
 
 nach_Funkflanke:
@@ -257,7 +257,7 @@ neue_Funkminute:
   sbr Status,0x04           ; die empfangene Minute ist ok
 
   mov nTicsL,TicsL
-  subi nTicsL,(256-100)     ; die nächste Sekunde startet in genau 100 TicsL
+  subi nTicsL,(256-100)     ; die naechste Sekunde startet in genau 100 TicsL
 
 neue_Funkminute_Ende:
   rjmp Funk_initialisieren
-- 
cgit v1.2.3-70-g09d2