X-Git-Url: https://hackdaworld.org/gitweb/?a=blobdiff_plain;f=monolyzer%2Ftimer.asm;h=f5297fe0ca4c3fe8200c3c521e30a11c286f7cf7;hb=HEAD;hp=2f14b6999ed77ccf72d92bf7c943a344acc3ae34;hpb=1117f788c441bc3d8caf90e5fb883e11696e1757;p=my-code%2Fatmel.git

diff --git a/monolyzer/timer.asm b/monolyzer/timer.asm
index 2f14b69..f5297fe 100644
--- a/monolyzer/timer.asm
+++ b/monolyzer/timer.asm
@@ -1,10 +1,75 @@
 ; timer functions
 
-TIMER1_INIT:
+TIMER1_INIT_NP:
 
-	; clock select, prescaler 8
-	ldi tmp1,0x02
+	; clock select, no prescaler
+	in tmp1,TCCR1B
+	cbr tmp1,(1<<CS12)
+	cbr tmp1,(1<<CS11)
+	sbr tmp1,(1<<CS10)
 	out TCCR1B,tmp1
 
 	ret
 
+TIMER1_INIT_8:
+
+	; clock select, prescaler 64
+	in tmp1,TCCR1B
+	cbr tmp1,(1<<CS12)
+	sbr tmp1,(1<<CS11)
+	cbr tmp1,(1<<CS10)
+	out TCCR1B,tmp1
+
+	ret
+
+TIMER1_INIT_64:
+
+	; clock select, prescaler 64
+	in tmp1,TCCR1B
+	cbr tmp1,(1<<CS12)
+	sbr tmp1,(1<<CS11)
+	sbr tmp1,(1<<CS10)
+	out TCCR1B,tmp1
+
+	ret
+
+TIMER1_INIT_256:
+
+	; clock select, prescaler 256
+	in tmp1,TCCR1B
+	sbr tmp1,(1<<CS12)
+	cbr tmp1,(1<<CS11)
+	cbr tmp1,(1<<CS10)
+	out TCCR1B,tmp1
+
+	ret
+
+TIMER1_INIT_1024:
+
+	; clock select, prescaler 1024
+	in tmp1,TCCR1B
+	sbr tmp1,(1<<CS12)
+	cbr tmp1,(1<<CS11)
+	sbr tmp1,(1<<CS10)
+	out TCCR1B,tmp1
+
+	ret
+
+TIMER1_INT_ENABLE:
+
+	; overflow interrupt enable
+	in tmp1,TIMSK
+	sbr tmp1,(1<<TOIE1)
+	out TIMSK,tmp1
+
+	ret
+
+TIMER1_INT_DISABLE:
+
+	; overflow interrupt disable
+	in tmp1,TIMSK
+	cbr tmp1,(1<<TOIE1)
+	out TIMSK,tmp1
+
+	ret
+