Comme je l'ai déjà dit ailleurs je ne suis pas fan de ce genre d'appareils, par contre ils offrent des possibilités de réalisations intéressantes pour le bidouilleur, quand j'ai de la visite et que je fais une petite démonstration les gens me voient taper sur un manipulateur et entendent du bruit qui ne leur parle pas, c'est une toute autre histoire quand ils voient ma manipulation s'afficher en clair sur un écran LCD. Ils peuvent ainsi suivre mon discours. A noter qu'il n'affiche pas le message reçu du correspondant, seulement celui envoyé par l'opérateur.
Ce manipulateur offre la possibilité de modifier le rapport trait/points, ce qui permet de personnaliser sa manipulation. Le mien est réglé au "son vibro" avec des traits valant 4 points, mais on peut très bien lui faire imiter le cri du double-contact le soir au fond des bois. Il est également équipé d'un CQ auto personnalisé. Ce manipulateur est basé sur un arduino NANO, la manipulation est en mode iambic. J'ai conçu trois modèles de difficulté croissante pour les débutants qui voudraient le monter, le code est le même pour les trois schémas ci-dessous, seul le nombre d'entrées/sorties différe.

------------------------------------------ Version 1 -------------------------------------

Le plus simple. Il n'affiche rien mais s'occupe juste la génération de traits et points au rapport normal 1/3 comme décrèté par ce bon vieux Samuel. Pas besoin d'utiliser Eagle pour un schéma aussi simple, un petit croquis à main levée suffit:

------------------------------------------ Version 2 -------------------------------------


Sur celui-ci la durée des traits et points est réglable en intervenant dans le programme, on peut l'activer/désactiver à l'aide d'interrupteurs:

------------------------------------------ Version 3 -------------------------------------


Le dernier plus complet mais à peine plus compliqué propose l'affichage de la manipulation émise sur un écran LCD 16x2 et l'écoute locale du son:

------------------------------------------ Réalisation -------------------------------------


Le montage définitif en Manhattan avec un arduino NANO, la filasse peut paraître impressionnante mais il n'y a en fait rien de bien compliqué:

Les dimensions du boitier sont plus dictées par l'afficheur et toutes les commandes face-avant que par l'électronique elle-même:

Face avant créée avec le soft de F5BU.

Ensemble manipulateur éléctronique plus clé "Full Home-Made":

Vidéos en fonctionnement.

Le code arduino.

/* Programme de manipulateur CW iambic, avec rapport cyclique trait/point variable. Affichage de la manipulation sur un afficheur LCD 16x2. Jean Claude Buisson F6FCO le 21 janvier 2012. Dernière modification le 04 novembre 2012 (V27 iambic) */ // ---------------- inits afficher LCD #include <LiquidCrystal.h> // librairie LCD #define RS 7 // broche 4 du LCD #define E 6 // broche 6 du LCD #define D4 5 // broche 11 du LCD #define D5 4 // broche 12 du LCD #define D6 9 // broche 13 du LCD #define D7 8 // broche 14 du LCD LiquidCrystal lcd(RS, E, D4, D5, D6, D7);// initialisation LCD en mode 4 bits // --------------- inits géné CW char F6FCO [155]= "TETE00TTET0000TETE00TTET0000TEE00E000000EETE000TEEEE000EETE000TETE000TTT000000EETE000TEEEE000EETE000TETE000TTT000000EETE000TEEEE000EETE000TETE000TTT0003"; char LETTRE[8]; char CH1; char CH2; //---------------- inits entrées sorties #define pin_points 2 // contact points sur pin 2 (interrupt n°0) #define pin_traits 3 // contact traits sur pin 3 (interrupt n°1) #define pin_CW 10 // sortie traits/points sur pin 10 #define pin_buzzer 11 // sortie buzzer sur pin 11 #define pin_CQ 12 // broche interrupteur CQ #define pin_vitesse A1 // potentiomètre de 10K vitesse de manipulation #define pin_longueur_espaces A2 // #define pin_longueur_traits A3 // //------------------ inits génération traits/points #define tonalite 480 int point = 200; #define nb_col 16 #define nb_lignes 2 int valp = 0; int valt = 0; int val = 0; int vitesse=0; // vitesse de manipulation int ptr_lettre=0; int space_lettre=0; int space_mot=0; int ptr_case_lcd=1; int ptr_ligne_lcd=1; int tit=1; volatile int point_futur=0; // variables servant aux interruptions volatile int trait_futur=0; volatile int valx =0; unsigned long tempo1; unsigned long tempo2; unsigned long tempo3; //---------------------- inits variables espaces et traits float valeur_trait = 3; // 3 valeur d'un trait en nb points float intervalle=1; // 1 intervalle entre chaque point /* -------------------------------------------------------*/ void setup() { pinMode(pin_CW,OUTPUT); pinMode(pin_traits,INPUT); pinMode(pin_points,INPUT); pinMode(pin_CQ,INPUT); Serial.begin(9600); // liaison avec le PC // --- Initialisation LCD --- LiquidCrystal lcd(RS, E, D4, D5, D6, D7);// initialisation LCD en mode 4 bits ptr_ligne_lcd=1; ptr_case_lcd=1; lcd.begin(16,2); delay(100); lcd.setCursor(5,nb_lignes); lcd.write("F6FCO"); delay(500); lcd.setCursor(1,nb_lignes); lcd.write("-=("); lcd.setCursor(11,nb_lignes); lcd.write(")=- "); delay(1500); lcd.clear(); lcd.setCursor(0,0); //*----- déclaration des interruptions interrupts(); attachInterrupt(0,valid_point,CHANGE); // quand état bas sur broche 2 attachInterrupt(1,valid_trait,CHANGE); // quand état bas sur broche 3 } //*_________________ Fonctions ____________________________ void points_iambic() { digitalWrite(pin_CW, HIGH); tone(pin_buzzer,tonalite,point); delay(point); digitalWrite(pin_CW,LOW); noTone(pin_buzzer); delay(point*intervalle); ptr_lettre ++; LETTRE[ptr_lettre]='E'; tempo2= millis(); } void traits_iambic () { digitalWrite(pin_CW,HIGH); tone(pin_buzzer,tonalite,point*valeur_trait); delay(point*valeur_trait); digitalWrite(pin_CW,LOW); noTone(pin_buzzer); delay(point*intervalle); ptr_lettre ++; LETTRE[ptr_lettre]='T'; tempo2= millis(); } void valid_point(){ valx = digitalRead(pin_traits); // on lit la valeur sur la broche entrée 3 if (valx==HIGH) { point_futur=1; } } void valid_trait(){ valx = digitalRead(pin_points); // on lit la valeur sur la broche entrée 2 if (valx==HIGH) { trait_futur=1; } } //_________________ Fin fonctions _____________________ void loop() { /* analyse des commutateurs espace/traits */ val=analogRead(pin_longueur_traits); if (val>=500){ valeur_trait = 4; // modif de la longueur du trait } else { valeur_trait = 3; } val=analogRead(pin_longueur_espaces); if (val>=500){ intervalle=0.8; // modif de la longueur de l'intervalle } else { intervalle=1; } /* CQ CQ CQ de F6FCO K -------------*/ int ptr=0; // pointeur pour la lecture du CQ val =digitalRead(pin_CQ); while (val== 0) { val =digitalRead(pin_CQ); if (F6FCO[ptr]=='T') { digitalWrite(pin_CW,HIGH); tone(pin_buzzer,tonalite,point*valeur_trait); delay(point*valeur_trait); digitalWrite(pin_CW,LOW); delay(point*intervalle); } if (F6FCO[ptr]=='E') { digitalWrite(pin_CW, HIGH); tone(pin_buzzer,tonalite,point); delay(point); digitalWrite(pin_CW,LOW); delay(point*intervalle); } if (F6FCO[ptr]=='0') { digitalWrite(pin_CW,LOW); delay(point*intervalle); noTone(pin_buzzer); } ptr++; if (F6FCO[ptr]=='3') { ptr=0; delay(2500); } } /* réglage de la vitesse -------------------------------*/ vitesse = analogRead(pin_vitesse); point = int((vitesse/6)+20); /* génération points et traits ------------------------- */ tempo1 = millis(); /* ------- points */ val = digitalRead(pin_points); if(val==LOW || point_futur==1 ) // génération des points si appui points { points_iambic(); point_futur=0; } /* -------- traits */ val = digitalRead(pin_traits); if (val==LOW || trait_futur==1) // génération des traits si appui traits { traits_iambic(); trait_futur=0; } /*--------------------------*/ if (tempo1>tempo2+(point*intervalle*1.5)) { space_lettre=1; } if (tempo1>tempo2+(point*intervalle*5)) { space_mot=1; } //-------------- gestion des colonnes et lignes du lcd if (ptr_case_lcd >= 16) { ptr_case_lcd=0; if (ptr_ligne_lcd==0) { ptr_ligne_lcd = 1; lcd.setCursor(ptr_case_lcd,ptr_ligne_lcd); } else { lcd.begin(16,2); ptr_ligne_lcd = 0; lcd.setCursor(ptr_case_lcd,ptr_ligne_lcd); } } //-------------------------------------------------- if (space_lettre==1){ space_lettre=0; if (space_mot==1 & ptr_lettre!=0){ lcd.write(' '); ptr_case_lcd++; space_mot=0; } if (LETTRE[1]=='T'){ // --------------------- Lettre T if (LETTRE[2]==' '){ lcd.write('T'); ptr_case_lcd++; } if (LETTRE[2]=='T'){ // --------------------- Lettre M if (LETTRE[3]==' '){ lcd.write('M'); ptr_case_lcd++; } if (LETTRE[3]=='T'){ // --------------------- Lettre O if (LETTRE[4]==' '){ lcd.write('O'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- Lettre CH if (LETTRE[5]==' '){ lcd.write('CH'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- Chiffre 0 if (LETTRE[6]==' '){ lcd.write('0'); ptr_case_lcd++; } } if (LETTRE[5]=='E'){ // --------------------- Chiffre 9 if (LETTRE[6]==' '){ lcd.write('9'); ptr_case_lcd++; } } } if (LETTRE[4]=='E'){ // --------------------- Chiffre 8 if (LETTRE[5]=='E'){ if (LETTRE[6]==' '){ lcd.write('8'); ptr_case_lcd++; } if (LETTRE[6]=='E'){ // --------------------- Signe : if (LETTRE[7]==' '){ lcd.write(':'); ptr_case_lcd++; } } } } } if (LETTRE[3]=='E'){ // --------------------- Lettre G if (LETTRE[4]==' '){ lcd.write('G'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- Lettre Q if (LETTRE[5]==' '){ lcd.write('Q'); ptr_case_lcd++; } } if (LETTRE[4]=='E'){ // --------------------- Lettre Z if (LETTRE[5]==' '){ lcd.write('Z'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- Signe virgule if (LETTRE[6]=='T'){ if (LETTRE[7]==' '){ lcd.write(','); ptr_case_lcd++; } } } if (LETTRE[5]=='E'){ // --------------------- Chiffre 7 if (LETTRE[6]==' '){ lcd.write('7'); ptr_case_lcd++; } } } } } if (LETTRE[2]=='E'){ // --------------------- Lettre N if (LETTRE[3]==' '){ lcd.write('N'); ptr_case_lcd++; } if (LETTRE[3]=='E'){ // --------------------- Lettre D if (LETTRE[4]==' '){ lcd.write('D'); ptr_case_lcd++; } if (LETTRE[4]=='E'){ // --------------------- Lettre B if (LETTRE[5]==' '){ lcd.write('B'); ptr_case_lcd++; } if (LETTRE[5]=='E'){ // --------------------- Chiffre 6 if (LETTRE[6]==' '){ lcd.write('6'); ptr_case_lcd++; } } if (LETTRE[5]=='T'){ // --------------------- Signe = if (LETTRE[6]==' '){ lcd.write('='); ptr_case_lcd++; } } } if (LETTRE[4]=='T'){ // --------------------- Lettre X if (LETTRE[5]==' '){ lcd.write('X'); ptr_case_lcd++; } if (LETTRE[5]=='E'){ // --------------------- signe / if (LETTRE[6]==' '){ lcd.write('/'); ptr_case_lcd++; } } } } if (LETTRE[3]=='T'){ // --------------------- Lettre K if (LETTRE[4]==' '){ lcd.write('K'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- Lettre Y if (LETTRE[5]==' '){ lcd.write('Y'); ptr_case_lcd++; } } // --------------------- Lettre C if (LETTRE[4]=='E'){ if (LETTRE[5]==' '){ lcd.write('C'); ptr_case_lcd++; } } } } } /* __________________________________ Tous les caractères commencant par un point */ if (LETTRE[1]=='E'){ // --------------------- Lettre E if (LETTRE[2]==' '){ lcd.write('E'); ptr_case_lcd++; } if (LETTRE[2]=='E'){ // --------------------- Lettre I if (LETTRE[3]==' '){ lcd.write('I'); ptr_case_lcd++; } if (LETTRE[3]=='T'){ // --------------------- Lettre U if (LETTRE[4]==' '){ lcd.write('U'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- Lettre U accent if (LETTRE[5]=='E'){ // --------------------- signe ? if (LETTRE[6]=='E'){ if (LETTRE[7]==' '){ lcd.write('?'); ptr_case_lcd++; } } } if (LETTRE[5]==' '){ lcd.write('U'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- Chiffre 2 if (LETTRE[6]==' '){ lcd.write('2'); ptr_case_lcd++; } } } if (LETTRE[4]=='E'){ // --------------------- Lettre F if (LETTRE[5]==' '){ lcd.write('F'); ptr_case_lcd++; } if (LETTRE[5]=='E'){ // --------------------- Lettre é if (LETTRE[6]==' '){ lcd.write('E'); ptr_case_lcd++; } } } } if (LETTRE[3]=='E'){ // --------------------- Lettre S if (LETTRE[4]==' '){ lcd.write('S'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- Lettre V if (LETTRE[5]==' '){ lcd.write('V'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- 3 if (LETTRE[6]==' '){ lcd.write('3'); ptr_case_lcd++; } } } if (LETTRE[4]=='E'){ // --------------------- Lettre H if (LETTRE[5]==' '){ lcd.write('H'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- Chiffre 4 if (LETTRE[6]==' '){ lcd.write('4'); ptr_case_lcd++; } } if (LETTRE[5]=='E'){ // --------------------- Lettre 5 if (LETTRE[6]==' '){ lcd.write('5'); ptr_case_lcd++; } } } } } if (LETTRE[2]=='T'){ // --------------------- Lettre A if (LETTRE[3]==' '){ lcd.write('A'); ptr_case_lcd++; } if (LETTRE[3]=='T'){ // --------------------- Lettre W if (LETTRE[4]==' '){ lcd.write('W'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- Lettre J if (LETTRE[5]==' '){ lcd.write('J'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- Chiffre 1 if (LETTRE[6]==' '){ lcd.write('1'); ptr_case_lcd++; } } if (LETTRE[5]=='E'){ // --------------------- Signe apotsrophe if (LETTRE[6]==' '){ lcd.write(' '); ptr_case_lcd++; } } } if (LETTRE[4]=='E'){ // --------------------- Lettre P if (LETTRE[5]==' '){ lcd.write('P'); ptr_case_lcd++; } if (LETTRE[5]=='T'){ // --------------------- Lettre A accent if (LETTRE[6]==' '){ lcd.write('A'); ptr_case_lcd++; } } } } if (LETTRE[3]=='E'){ // --------------------- Lettre R if (LETTRE[4]==' '){ lcd.write('R'); ptr_case_lcd++; } if (LETTRE[4]=='T'){ // --------------------- signe point if (LETTRE[5]=='E'){ if (LETTRE[6]=='T'){ if (LETTRE[7]==' '){ lcd.write('.'); ptr_case_lcd++; } } } } if (LETTRE[4]=='E'){ // --------------------- Lettre L if (LETTRE[5]==' '){ lcd.write('L'); ptr_case_lcd++; } } } } } for (int i; i<=8; i++) {// on vide LETTRE[] LETTRE[i]=' '; } ptr_lettre=0; } }