samj Créations

dimanche 21 février 2016

S'amuser avec G'MIC et Gimp

Ombre portée & G'MIC

Image d'origine :
http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

jeudi 4 février 2016

Filtre "samj_Moirage_Spline" avec G'MIC Gimp

Ce filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Arrays & tiles > samj_Moirage_Spline

Voici deux rendus sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Moirage_Spline 179,127,81,127,4,0,-50,50,-50,50,256,0,0,43,29,17,127,8,0,-50,50,-50,50,256,0,0

mercredi 3 février 2016

Filtre "samj_Scintillements_Colores_Contours" avec G'MIC Gimp

Ce filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Contours > samj_Scintillements_Colores_Contours

Voici un rendu sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0
et un autre sur Gmicky qui peut être téléchargé directement depuis G'MIC.
Par David Revoy :
http://www.davidrevoy.com/
https://plus.google.com/+GMIC_software/posts/RFQ5yK1pT2y

Ligne de commande :

-samj_Scintillements_Colores_Contours 3,10,6,8,8,0.5,400,18,0,70,0,0,0,0,0,255

Ligne de commande :

-samj_Scintillements_Colores_Contours 2,8,6,6,6,0.4,400,18,15,70,0,0,0,0,0,255

*****

La version anglaise du filtre "samj_Scintillements_Colores" est accessible par :

Filtres > G'MIC > Arrays & tiles > Color Rays

mardi 2 février 2016

Filtre "samj_Scintillements_Colores" avec G'MIC Gimp

Ce filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Arrays & tiles > samj_Scintillements_Colores

Voici deux rendus sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Scintillements_Colores 58,50,42,255,16,8,0.5,600,12,0,60,2,0,0,0,0,255

Ligne de commande :

-samj_Scintillements_Colores 58,50,42,255,16,8,0.4,768,15,0,0,2,0,0,0,0,255

lundi 1 février 2016

Filtre "samj_Losanges_Colores" avec G'MIC Gimp

Filtre "samj_Losanges_Colores" avec G'MIC Gimp
Ce filtre qui est une variation de "amj_Pointes_De_Diamants_Colorees" est accessible par :

Filtres > G'MIC > Testing > Samj > Arrays & tiles > samj_Losanges_Colores

Voici deux rendus sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Losanges_Colores 30,26,21,255,16,0,0,0,1.5,0,1.8,2,0,0,0,0,255,4

Ligne de commande :

-samj_Losanges_Colores 30,26,21,255,16,1,0,0,1.5,0,1.4,2,0,0,0,0,255,4

dimanche 31 janvier 2016

Filtre "samj_Pointes_De_Diamants_Colorees" avec G'MIC Gimp

Ce nouveau filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Arrays & tiles > samj_Pointes_De_Diamants_Colorees

Voici deux rendus sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Pointes_De_Diamants_Colorees 29,24,20,255,10,0,100,0.5,0.5,15,2,0,0,0,0,255,4

Ligne de commande :

-samj_Pointes_De_Diamants_Colorees 23,18,14,255,8,180,72,1,1.8,0,2,0,0,0,0,255,4

samedi 30 janvier 2016

Filtre "samj_Bulles_Colorees" avec G'MIC Gimp

Ce nouveau filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Arrays & tiles > samj_Bulles_Colorees

Exemple de rendu sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Bulles_Colorees 64,64,64,255,8,-255,255,2.5,0.4,1,20,2,0,0,0,0,255

mercredi 27 janvier 2016

Filtre "samj_Fond_Brosse" avec G'MIC Gimp

Ce nouveau filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Artistic > samj_Fond_Brosse

Exemple de rendu sur l'image :
http://fontplay.com/freephotos/seventeen/fpx110610-02.jpg

Ligne de commande :

-samj_Fond_Brosse 3,1

mardi 26 janvier 2016

Filtre "Plasmic" avec G'MIC Gimp

Ce nouveau filtre "Plasmic" est inspiré par une création de Lylejk :
https://www.flickr.com/photos/34520999@N05/24513476052/sizes/o/
http://gimpchat.com/viewtopic.php?f=11&t=13595

Il est accessible par :

Filtres > G'MIC > Artistic > Plasmic

Exemple de rendu sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Plasmic 0,1.2,12,40,0,4,2,0

dimanche 24 janvier 2016

Filtre "samj_Contours_Colores" avec G'MIC Gimp

Ce nouveau filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Contours > samj_Contours_Colores

Exemple de rendu sur l'image :
http://fontplay.com/freephotos/seventeen/fpx110610-02.jpg

Ligne de commande :

-samj_Contours_Colores 1.1,2,40,5,0

Filtre "samj_Ellipses_Colorees" avec G'MIC Gimp

Ce nouveau filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Arrays & tiles > samj_Ellipses_Colorees

Exemple de rendu sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Ellipses_Colorees 50,50,50,255,12,8,2,0,0,0,0,255

vendredi 22 janvier 2016

Filtre "Reptile" avec G'MIC Gimp

Ce nouveau filtre est accessible par :

Filtres > G'MIC > Arrays & tiles > Reptile

Exemples de rendu du filtre "Reptile" sur un fond plasma et sur l'image
http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

jeudi 21 janvier 2016

Filtre "samj_test_G" avec G'MIC Gimp

Ce filtre qui modifie textures et couleurs de l'image est accessible par :

Filtres > G'MIC > Testing > Samj > Various > samj_test_G

Exemple de rendu sur l'image :
http://fontplay.com/freephotos/seventeen/fpx110610-02.jpg

Ligne de commande :

-samj_test_G 3,7,0,30

*****

Exemple de rendu "reptile" qui utilise ce filtre sur :
http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

mercredi 20 janvier 2016

Filtre "Skeletation" avec G'MIC Gimp

Le filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Contours > samj_Skeletation

Exemple de rendu sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Ligne de commande :

-samj_Skeletation 4,50,100,0,0,1

mardi 19 janvier 2016

Filtre "fond broderie" avec G'MIC Gimp

Le filtre est accessible par :

Filtres > G'MIC > Testing > Samj > Artistic > samj_fond_broderie

Exemple de rendu sur : http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

lundi 18 janvier 2016

Rendu utilisant le filtre "Skeleton" de G'MIC Gimp

Image d'origine :
http://www.flickr.com/photos/fontplaydotcom/6044205066/sizes/o/in/photostream/
Par www.fontplay.com CC BY 2.0

Rendu :

vendredi 15 janvier 2016

S'amuser avec G'MIC à partir d'une image vide

par samj le 15 janvier 2016

mardi 12 janvier 2016

Essai du nouveau filtre Droste avec G'MIC Gimp

Merci à Souphead pour le portage de ce filtre Mathmap sur G'MIC.

Ces exemples sont réalisés avec le fichier tiger.eps de GhostScript.

La ligne de commande Droste est :

-souphead_droste10 25,100,1,1,1,45,0,0,0,0,1,5,1,0,0,0,0,0,0,1,0,0,1,0,0,0,0,0

samedi 21 novembre 2015

Arduino Nano et LCD1602

Après avoir acheté quelques afficheurs LCD 1602 sur le site aliexpress.com il est apparu un problème de reconnaissance du port USB sur nos ordis lorsqu'ils étaient raccordés à un Arduino Nano en utilisant le schéma https://www.arduino.cc/en/Tutorial/HelloWorld . La résistance R4 de 220 Ohms semble poser problème.
Pour ne plus utiliser cette résistance R4 ainsi que le potentiomètre voici un petit montage qui utilise 2 sorties PWM ainsi qu'un exemple de programme de test.
Un transistor économique NPN 2N2222 branché en émetteur commun pilote la broche 12 (ou K) du circuit LCD 1602.
Un autre transistor économique PNP 2N2907 branché en collecteur commun pilote la broche 3 (ou VEE / Vo) du circuit LCD 1602.

Programme de test :

 /*   
    
  lcd1602 avec vatiations de luminosité de l'affichage et du fond.  
  samj le 21 novembre 2015  
  Domaine Public  
   
  Câblage :  
   
  Arduino  Resist.   2N2222        2N2907        LCD1602  
                    (E commun)   (C commun)  
   
  (+5)-------------------------------------------(2)  VCC  
  (+5)-------------------------------------------(15) LED +  
  (GND)------------------------------------------(1)  VSS  
  (GND)------------------------------------------(5)  R/W  
  (GND)-------------------(E)   
  (GND)------------------------------(C)  
  (3)------[4.7kOhm]------(B)  
  (5)------[4.7kOhm]-----------------(B)  
                          (C)---------------------(16) LED -  
                                     (E)----------(3) VEE  
  (7)---------------------------------------------(4) RS  
  (8)---------------------------------------------(6) Enable  
  (9)---------------------------------------------(11) DB4  
  (10)--------------------------------------------(12) DB5  
  (11)--------------------------------------------(13) DB6  
  (12)--------------------------------------------(14) DB7  
   
 */  
   
   
 /**********************************************  
  Initialisation  
 **********************************************/  
   
 #include <LiquidCrystal.h>  
 LiquidCrystal lcd(7, 8, 9, 10, 11 , 12); // LiquidCrystal(rs, enable, d4, d5, d6, d7)   
 int Sortie_PWM_Luminosite_Fond = 3;    // vers resistance 4.7kOhm reliée à la base 2N2222  
 int Sortie_PWM_Contrastes_Caracteres = 5; // vers resistance 4.7kOhm reliée à la base 2N2907  
 int Luminosite_Fond = 255;  
 int Luminosite_Caracteres = 50; // Ajuster cette valeur  
 int Variation_Luminosite_Caracteres;  
   
   
 /**********************************************  
  SETUP  
 **********************************************/  
 void setup()  
 {  
  pinMode(Sortie_PWM_Luminosite_Fond, OUTPUT);  
  pinMode(Sortie_PWM_Contrastes_Caracteres, OUTPUT);  
   
  FondEclaire(Luminosite_Fond, 10);  
    
  Variation_Luminosite_Caracteres = 0;  
  while(Variation_Luminosite_Caracteres < 255){  
   analogWrite(Sortie_PWM_Contrastes_Caracteres, Variation_Luminosite_Caracteres);  
   delay(20);  
   Variation_Luminosite_Caracteres++;  
  }  
   
  analogWrite(Sortie_PWM_Contrastes_Caracteres, Luminosite_Caracteres);  
   
  FondNoir(Luminosite_Fond, 20);  
  // message -> LCD  
  lcd.noCursor();   
  lcd.begin(16, 2);  
  lcd.setCursor(0,0);  
  lcd.print("Bonjour! Hello!");  
  lcd.setCursor(0,1);  
  lcd.print("V 20151121 / ");  
  lcd.print(Luminosite_Caracteres);  
  FondEclaire(Luminosite_Fond, 20);  
 }  
   
   
 /**********************************************  
  LOOP  
 **********************************************/  
 void loop()  
 {  
  FondNoir(Luminosite_Fond, 20);  
  analogWrite(Sortie_PWM_Luminosite_Fond, 0);  
  lcd.noDisplay();  
  FondEclaire(40, 50);  
  FondNoir(100, 25);  
  // message -> LCD  
  lcd.clear();  
  lcd.setCursor(0,0);  
  lcd.print("abcdefghijklmnop");  
  lcd.setCursor(0,1);  
  lcd.print("0123456789ABCDEF");  
  lcd.display();  
  FondEclaire(Luminosite_Fond,20);  
 }  
   
   
 /**********************************************  
  Fond Noir  
 **********************************************/  
 void FondNoir(int Luminosite_Origine, int BaseDeTemps)  
 {  
  int index=Luminosite_Origine;  
  analogWrite(Sortie_PWM_Luminosite_Fond, Luminosite_Origine);  
  while(index > 0){  
   analogWrite(Sortie_PWM_Luminosite_Fond, index);  
   delay(BaseDeTemps);  
   index=index-1;  
  }  
 }  
   
   
 /**********************************************  
  Fond Eclairé  
 **********************************************/  
 void FondEclaire(int Luminosite_Origine, int BaseDeTemps)  
 {  
  int index=Luminosite_Origine;  
  index=0;  
  analogWrite(Sortie_PWM_Luminosite_Fond, 0);  
  delay(2000);  
  while(index < Luminosite_Origine){  
   analogWrite(Sortie_PWM_Luminosite_Fond, index);  
   delay(BaseDeTemps);  
   index=index+1;  
  }  
  analogWrite(Sortie_PWM_Luminosite_Fond, Luminosite_Origine);  
 }  
   
 /* FIN */

Schéma et raccordements :

samedi 16 mai 2015

S'amuser avec G'MIC

Les commandes utilisées sur une image de 800*800 pixels

-gimp_chessboard 80,80,0,0,0,1,0,0,0,255,255,255,255,255,0
-Annular_Steiner_Chain_Round_Tile 800,1,0,0,100,0,100,4,85.0909,1,0,0,0,255,0,255,255,0,0,0,0,255,0,0
-samj_Cercle_Polaire 1,0,0,1,0,0,2,0,0,0,50,50
-samj_Barbouillage_Paint_Daub 2,2,100,0.2,1,4,1,2,8

Rendu

samedi 2 mai 2015

Cercles adjacents avec G'MIC Gimp

Accès au filtre sur G'MIC Gimp par :

Rendering > Adjacent Annular Steiner Chains

lundi 27 avril 2015

Rayons de couleurs en spirale avec G'MIC Gimp

Accès au filtre sur G'MIC Gimp par :

Rendering > Twisted Rays

Voici 3 exemples :

samedi 25 avril 2015

Cercles Concentriques G'MIC Gimp

Accès au filtre sur G'MIC Gimp par :

ARRAYS & TILES > Concentric Circles A

Trois essais :

Sur l'image : http://fontplay.com/freephotos/seventeen/fpx110610-02.jpg

Avec Symmetrizoscope

dimanche 19 avril 2015

Filtre "Annular Steiner Chain Round Tiles" - G'MIC Gimp

Accès sur G'MIC Gimp par :

ARRAYS & TILES > Annular Steiner Chain Round Tiles

Voici deux exemples créés avec ce filtre sur cette image :
http://fontplay.com/freephotos/seventeen/fpx110610-02.jpg

Les lignes de commandes :

-Annular_Steiner_Chain_Round_Tile_en 800,1,0,0,100,0,100,30,0,0,0,0,0,255,0,255,255,0,127,0,0,255,127,0

-Annular_Steiner_Chain_Round_Tile_en 800,1,0,0,100,180,70,24,0,1,0,0,0,255,6,255,255,0,127,0,0,255,127,0

Une composition à partir de ce filtre :

lundi 13 avril 2015

Filtre "Variations On A Single Color" - G'MIC Gimp

Accès sur G'MIC Gimp par :

Artistic > Variations On A Single Color

Voici deux exemples créés avec ce filtre sur cette image :
http://fontplay.com/freephotos/seventeen/fpx110610-02.jpg

Variations_On_A_Single_Color_1.jpg

-samj_texture_coloree_en 0,0.7,200,125,50,5,5,45,200,4,0.2,1,10,1,1

Variations_On_A_Single_Color_2.jpg

-samj_texture_coloree_en 1,0.7,173,34,127,5,5,45,200,4,0.2,8,5,1,1

dimanche 12 avril 2015

Signal sinusoïdal sortie PWM pour Arduino UNO

Voici un petit programme qui permet de créer un signal sinusoïdal sur la sortie PWM d'un Arduino UNO.
La fréquence de sortie est limitée.
Le signal de sortie PWM (pin 6) est filtré. Le filtre utilisé est fait avec des composants disponibles à la maison (suffisants pour les tests).

Le programme DDS_Sinewave_Generator.ino :

// Sources
// http://web.csulb.edu/~hill/ee470/Lab%202d%20-%20Sine_Wave_Generator.pdf
// http://web.csulb.edu/~hill/ee470/sinewave_pcm.zip
// samj le 12 avril 2015

// Schema du filtre de sortie à brancher sur Pin 6 pwm Arduino UNO (fait avec des composants disponibles à la maison)
//
// Pin6____270ohms__________0.47mH__________0.47mH____________________Tension de sortie sinusoïdale
// | | | |
// | | | |
// 470nF 1000nF 470nF 270ohms
// | | | |
// 0V________________|_______________|_______________|__________|
//
//
// Autre schéma http://interface.khm.de/wp-content/uploads/2009/12/dds_lowpass1251.jpg

/*
* sinewave_pcm
*
* Generates 8-bit PCM sinewave on pin 6 using pulse-width modulation (PWM).
* For Arduino with Atmega368P at 16 MHz.
*
* Uses timers 1 and 0. Timer 1 reads the sinewave table, SAMPLE_RATE times a second.
* The sinewave table has 256 entries. Consequently, the sinewave has a frequency of
* f = SAMPLE_RATE / 256
* Each entry in the sinewave table defines the duty-cycle of Timer 0. Timer 0
* holds pin 6 high from 0 to 255 ticks out of a 256-tick cycle, depending on
* the current duty cycle. Timer 0 repeats 62500 times per second (16000000 / 256),
* much faster than the generated sinewave generated frequency.
*
* References:
* http://www.atmel.com/dyn/resources/prod_documents/doc2542.pdf
* http://www.analog.com/library/analogdialogue/archives/38-08/dds.html
* http://www.evilmadscientist.com/article.php/avrdac
* http://playground.arduino.cc/Code/PCMAudio
* http://www.arduino.cc/playground/Code/R2APCMAudio
* http://www.scienceprog.com/generate-sine-wave-modulated-pwm-with-avrmicrocontroller/
* http://www.scienceprog.com/avr-dds-signal-generator-v10/
* http://documentation.renesas.com/eng/products/region/rtas/mpumcu/apn/sinewave.pdf
* http://ww1.microchip.com/downloads/en/AppNotes/00655a.pdf
*
* By Gary Hill
* Adapted
*/

#include <stdint.h>
#include <avr/interrupt.h>
#include <avr/io.h>
#include <avr/pgmspace.h>

// Varie selon modèle, ici UNO, la fréquence est limitée (BF)
// #define SAMPLE_RATE 10000 // T~26 ms F~38.4 Hz
// #define SAMPLE_RATE 100000 // T~2.6 ms F~384 Hz
// #define SAMPLE_RATE 26000 // F~100 Hz
#define SAMPLE_RATE 26000 // F~100 Hz

/*
* The sinewave data needs to be unsigned, 8-bit
*
* sinewavedata.h should look like this:
* const int sinewave_length=256;
*
* const unsigned char sinewave_data[] PROGMEM = {0x80,0x83, ...
*
*/

/* Sinewave table
* Reference:
* http://www.scienceprog.com/generate-sine-wave-modulated-pwm-with-avr-microcontroller/
*/

const int sinewave_length=256;

const unsigned char sinewave_data[] PROGMEM = {
0x80,0x83,0x86,0x89,0x8c,0x8f,0x92,0x95,0x98,0x9c,0x9f,0xa2,0xa5,0xa8,0xab,0xae,
0xb0,0xb3,0xb6,0xb9,0xbc,0xbf,0xc1,0xc4,0xc7,0xc9,0xcc,0xce,0xd1,0xd3,0xd5,0xd8,
0xda,0xdc,0xde,0xe0,0xe2,0xe4,0xe6,0xe8,0xea,0xec,0xed,0xef,0xf0,0xf2,0xf3,0xf5,
0xf6,0xf7,0xf8,0xf9,0xfa,0xfb,0xfc,0xfc,0xfd,0xfe,0xfe,0xff,0xff,0xff,0xff,0xff,
0xff,0xff,0xff,0xff,0xff,0xff,0xfe,0xfe,0xfd,0xfc,0xfc,0xfb,0xfa,0xf9,0xf8,0xf7,
0xf6,0xf5,0xf3,0xf2,0xf0,0xef,0xed,0xec,0xea,0xe8,0xe6,0xe4,0xe2,0xe0,0xde,0xdc,
0xda,0xd8,0xd5,0xd3,0xd1,0xce,0xcc,0xc9,0xc7,0xc4,0xc1,0xbf,0xbc,0xb9,0xb6,0xb3,
0xb0,0xae,0xab,0xa8,0xa5,0xa2,0x9f,0x9c,0x98,0x95,0x92,0x8f,0x8c,0x89,0x86,0x83,
0x80,0x7c,0x79,0x76,0x73,0x70,0x6d,0x6a,0x67,0x63,0x60,0x5d,0x5a,0x57,0x54,0x51,
0x4f,0x4c,0x49,0x46,0x43,0x40,0x3e,0x3b,0x38,0x36,0x33,0x31,0x2e,0x2c,0x2a,0x27,
0x25,0x23,0x21,0x1f,0x1d,0x1b,0x19,0x17,0x15,0x13,0x12,0x10,0x0f,0x0d,0x0c,0x0a,
0x09,0x08,0x07,0x06,0x05,0x04,0x03,0x03,0x02,0x01,0x01,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x05,0x06,0x07,0x08,
0x09,0x0a,0x0c,0x0d,0x0f,0x10,0x12,0x13,0x15,0x17,0x19,0x1b,0x1d,0x1f,0x21,0x23,
0x25,0x27,0x2a,0x2c,0x2e,0x31,0x33,0x36,0x38,0x3b,0x3e,0x40,0x43,0x46,0x49,0x4c,
0x4f,0x51,0x54,0x57,0x5a,0x5d,0x60,0x63,0x67,0x6a,0x6d,0x70,0x73,0x76,0x79,0x7c};

int outputPin = 6; // (PCINT22/OC0A/AIN0)PD6, Arduino Digital Pin 6
volatile uint16_t sample;
// This is called at SAMPLE_RATE kHz to load the next sample.
ISR(TIMER1_COMPA_vect) {
if (sample >= sinewave_length) {
sample = -1;
}
else {
OCR0A = pgm_read_byte(&sinewave_data[sample]);
}
++sample;
}

void startPlayback()
{
pinMode(outputPin, OUTPUT);
// Set Timer 0 Fast PWM Mode (Section 14.7.3)
// WGM = 0b011 = 3 (Table 14-8)
// TOP = 0xFF, update OCR0A register at BOTTOM
TCCR0A |= _BV(WGM01) | _BV(WGM00);
TCCR0B &= ~_BV(WGM02);
// Do non-inverting PWM on pin OC0A, arduino digital pin 6
// COM0A = 0b10, clear OC0A pin on compare match,
// set 0C0A pin at BOTTOM (Table 14-3)
TCCR0A = (TCCR0A | _BV(COM0A1)) & ~_BV(COM0A0);
// COM0B = 0b00, OC0B disconnected (Table 14-6)
TCCR0A &= ~(_BV(COM0B1) | _BV(COM0B0));
// No prescaler, CS = 0b001 (Table 14-9)
TCCR0B = (TCCR0B & ~(_BV(CS02) | _BV(CS01))) | _BV(CS00);
// Set initial pulse width to the first sample.
OCR0A = pgm_read_byte(&sinewave_data[0]);
// Set up Timer 1 to send a sample every interrupt.
cli(); // disable interrupts
// Set CTC mode (Section 15.9.2 Clear Timer on Compare Match)
// WGM = 0b0100, TOP = OCR1A, Update 0CR1A Immediate (Table 15-4)
// Have to set OCR1A *after*, otherwise it gets reset to 0!
TCCR1B = (TCCR1B & ~_BV(WGM13)) | _BV(WGM12);
TCCR1A = TCCR1A & ~(_BV(WGM11) | _BV(WGM10));
// No prescaler, CS = 0b001 (Table 15-5)
TCCR1B = (TCCR1B & ~(_BV(CS12) | _BV(CS11))) | _BV(CS10);
// Set the compare register (OCR1A).
// OCR1A is a 16-bit register, so we have to do this with
// interrupts disabled to be safe.
OCR1A = F_CPU / SAMPLE_RATE; // 16e6 / 8000 = 2000
// Enable interrupt when TCNT1 == OCR1A (p.136)
TIMSK1 |= _BV(OCIE1A);
sample = 0;
sei(); // enable interrupts
}

void setup()
{
startPlayback();
}

void loop()
{
while (true);
}

Le signal :