From 1e4c30d62f79b4b0984b628f7590dc93c2f67ac7 Mon Sep 17 00:00:00 2001
From: entropia <entropia@foo2.intranet.entropia.de>
Date: Thu, 1 Apr 2010 22:20:55 +0200
Subject: [PATCH] untested finished

---
 projekte/soundz/_8bit/_8bit.pde | 70 +++++++++++++++------------------
 1 file changed, 31 insertions(+), 39 deletions(-)

diff --git a/projekte/soundz/_8bit/_8bit.pde b/projekte/soundz/_8bit/_8bit.pde
index 6e4d5a7..21f1a2c 100644
--- a/projekte/soundz/_8bit/_8bit.pde
+++ b/projekte/soundz/_8bit/_8bit.pde
@@ -1,7 +1,11 @@
 /*
+ * 8 bit counter melody
+ *
+ * idea from http://www.youtube.com/watch?v=hXgb8Y20aIk / http://eightbitsquare.ytmnd.com/
+ *
  * Soundcode von: Michael Smith <michael@hurts.ca> - http://www.arduino.cc/playground/Code/PCMAudio
- * CapSense: http://www.arduino.cc/playground/Main/CapSense
  * basierend auf code von Alex Wenger 2009 ("Arduino Physical Computing ...")
+ *
  */
 #include <stdint.h>
 #include <avr/interrupt.h>
@@ -35,29 +39,26 @@ const unsigned char sintab[] PROGMEM = {
 };
 
 
-volatile uint16_t sample1;   // welches ist das nächste Sample aus der Sinustabelle
+volatile uint16_t sample[8];   // welches ist das nächste Sample aus der Sinustabelle
 // die oberen 7 bit zeigen in die Tabelle, die restlichen 
 // bits sind kommastellen
-volatile uint16_t sample2;
-volatile uint16_t sample3;
 
 uint16_t vol;               // aktuelle Lautstärke
 volatile uint16_t set_vol;  // gewuenschte Lautstärke
-volatile uint16_t tone1;     // Tonhöhe in "Inkrementiereinheiten"
-volatile uint16_t tone2;     // Tonhöhe in "Inkrementiereinheiten"
-volatile uint16_t tone3;     // Tonhöhe in "Inkrementiereinheiten"
-
+volatile uint16_t tone_[8];     // Tonhöhe in "Inkrementiereinheiten"
 
 // Interruptroutine, diese wird 8000 mal pro Sekunde aufgerufen und berechnet den nächsten
 // Wert für die Tonausgabe
 ISR(TIMER1_COMPA_vect) {
   static int timer1counter;      // Zähler um Lautstärkeänderung langsamer zu machen
-  int wert;
+  int wert = 0;
 
   // Wert an der Stelle sample1/512 aus der sinus-Tabelle lesen
-  wert = pgm_read_byte(&sintab[(sample1 >> 9)])+
-         pgm_read_byte(&sintab[(sample2 >> 9)])+
-         pgm_read_byte(&sintab[(sample3 >> 9)]);
+  for(int i=0; i<8; i++) {
+    wert += pgm_read_byte(&sintab[(sample[i] >> 9)]);
+  };
+  wert/=8;
+  
   // Wert mit der aktuellen Lautstärke multiplizieren
   wert = (wert * vol) / 256; 
   // PWM Hardware anweisen ab jetzt diesen Wert auszugeben
@@ -65,9 +66,9 @@ ISR(TIMER1_COMPA_vect) {
 
   // nächstes Sample in der Sinustabelle abhängig vom gewünschten
   // Ton auswählen.
-  sample1 += tone1;                
-  sample2 += tone2;                
-  sample3 += tone3;                
+  for(int i=0; i<8; i++) {
+    sample[i] += tone_[i];
+  };
 
   // Lautstärke anpassen wen gewünscht (nur alle 50 Interrupts, damit
   // es schön langsam passiert.
@@ -122,25 +123,14 @@ void startPlayback()
   TIMSK1 |= _BV(OCIE1A);
 
   // Startwerte
-  sample1 = 0;                
-  sample2 = 0;                
-  sample3 = 0;                
+  for(int i=0; i<8; i++) {
+    sample[i] = 0;
+  }   
 
   // Global Interrupts wieder einschalten.
   sei();
 }
 
-// Aendert Ton und Lautstärke
-// ton (50-4000Hz)
-// volume (0-256);
-void SetFreq(int ton1,int ton2, int ton3, int volume)
-{
-  tone1 = (128ul*512ul*ton1)/8000;
-  tone2 = (128ul*512ul*ton2)/8000;
-  tone3 = (128ul*512ul*ton3)/8000;
-  set_vol  = volume;
-}
-
 void setup()                    
 {
   startPlayback();
@@ -149,15 +139,17 @@ void setup()
 #include "pitches.h"
 void loop()                    
 {
-   for(int counter = 0; counter<256; counter++) {
-     SetFreq((counter & _BV(0))?(NOTE_C4):0,
-             (counter & _BV(1))?(NOTE_A3):0,
-             (counter & _BV(2))?(NOTE_F3):0,
-             80);
-     if ((counter % 8) != 0) {
-        _delay_ms(500);
-     }
+   set_vol = 80;
+
+   for(int counter = 1; counter<256; counter++) {
+     #define BLA ((128ul*512ul)/8000)
+     tone_[0] = (counter & _BV(0))?(NOTE_C4*BLA):0;  
+     tone_[1] = (counter & _BV(1))?(NOTE_A3*BLA):0;
+     tone_[2] = (counter & _BV(2))?(NOTE_F3*BLA):0;
+     tone_[3] = (counter & _BV(2))?(NOTE_D3*BLA):0; 
+     tone_[4] = (counter & _BV(2))?(NOTE_B2*BLA):0;
+     tone_[5] = (counter & _BV(2))?(NOTE_G2*BLA):0;
+     tone_[6] = (counter & _BV(2))?(NOTE_E2*BLA):0;
+     tone_[7] = (counter & _BV(2))?(NOTE_C2*BLA):0;
    }     
 }
-
-