begin process at 2012 02 13 23:10:43
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > LA PETITE MUSIQUE DU HAUT-PARLEUR SYSTÈME

LA PETITE MUSIQUE DU HAUT-PARLEUR SYSTÈME


 Information sur la source

Note :
7,67 / 10 - par 3 personnes
7,67 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Divers Niveau :Débutant Date de création :02/09/2004 Vu / téléchargé :3 962 / 593

Auteur : GlanduSchmoldu

Ecrire un message privé
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

 Description

Hé bien c'est une classe qui permet de faire de la musique avec le speaker de la carte mère. On écrit la musique sous forme de chaine (octave & note & altération & rythme), puis elle est convertie en fréquences et en durées. On peux mémoriser plusieurs voix et en jouer une ou plusieurs en même temps, au tempo voulu.

En plus du module de classe (Speaker.cls) il y a un projet de démonstration avec quelques partitions pour l'exemple.

Source

  • 'Format d'une note : Octave(fac) & Note(oblig) & Altération(fac) & Rythme(fac)
  • 'Si l'octave ou le rythme n'est pas précisé c'est le même que le précédent
  • 'Octave : de 0 à 9
  • 'Note : de A à G, ou S (silence)
  • 'Altération : # ou &
  • 'Rythme : r (ronde), b (blanche), n (noire), c (croche), d (double), t (triple), q (quadruple)
  • 'La : "A"
  • 'Do dièse 4 : "4C#"
  • 'Si bémol : "B&"
  • 'Sol noire 2 : "2Gn"
  • 'Ré bémol blanche pointé : "D&b."
  • 'Fa 2 temps 1/2 (liaison) : "Fb_c
  • 'Do et sol en blanche : "C|Gb"
  • 'Accord do 7e en croche double pointé : "C|E|G|B&c.."
  • 'Au clair de la lune : "3Cc C C D En D Cc E D D Cb"
  • 'jouer une voix
  • Speaker.Charger "Cc C C D En D Cc E D D Cb"
  • Speaker.Jouer
  • 'la jouer plus vite (par défaut ça joue à 60)
  • Speaker.Jouer 120
  • 'rajouter 2 voix et jouer les 3
  • Speaker.Charger "1Cb. Dn C D Cb", 2
  • Speaker.Charger "6Cn S E D C S C", 3
  • Speaker.Jouer
  • 'jouer les voix 2 à 3 très vite
  • Speaker.Jouer 200, 2, 3
  • 'effacer la voix 1
  • Speaker.Charger "", 1
  • 'commencer à jouer une note
  • Speaker.JouerNote "A#|Dn._b"
  • 'l'arrêter
  • Speaker.StopperNote
'Format d'une note : Octave(fac) & Note(oblig) & Altération(fac) & Rythme(fac)
'Si l'octave ou le rythme n'est pas précisé c'est le même que le précédent

'Octave : de 0 à 9
'Note : de A à G, ou S (silence)
'Altération : # ou &
'Rythme : r (ronde), b (blanche), n (noire), c (croche), d (double), t (triple), q (quadruple)

'La : "A"
'Do dièse 4 : "4C#"
'Si bémol : "B&"
'Sol noire 2 : "2Gn"
'Ré bémol blanche pointé : "D&b."
'Fa 2 temps 1/2 (liaison) : "Fb_c
'Do et sol en blanche : "C|Gb"
'Accord do 7e en croche double pointé : "C|E|G|B&c.."

'Au clair de la lune : "3Cc C C D En D Cc E D D Cb"


'jouer une voix
Speaker.Charger "Cc C C D En D Cc E D D Cb"
Speaker.Jouer

'la jouer plus vite (par défaut ça joue à 60)
Speaker.Jouer 120

'rajouter 2 voix et jouer les 3
Speaker.Charger "1Cb. Dn C D Cb", 2
Speaker.Charger "6Cn S E D C S C", 3
Speaker.Jouer

'jouer les voix 2 à 3 très vite
Speaker.Jouer 200, 2, 3

'effacer la voix 1
Speaker.Charger "", 1

'commencer à jouer une note
Speaker.JouerNote "A#|Dn._b"

'l'arrêter
Speaker.StopperNote

 Conclusion

Ce code ne marche que sur 2000 et XP, l'API Beep fonctionne mal sur les autres systèmes. Et puis la classe n'est pas très complète j'ai pas eu le temps de finir, à vous de l'améliorer.

Note : suivant les buzzer on entend des choses assez différentes. Il faut bien faire attention à la propriété "Echantillonage" : normalement plus elle est faible mieux ça marche, mais certains buzzers émettent un grésillement infame si elle est trop petite. Pour ce que j'ai vu, ça marche pas mal entre 1 et 30 ms.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip VISUALISEUR D'IMAGES BASIQUE AVEC ASSOCIATION DE FORMATS
Source avec Zip Source avec une capture NOTIFICATEUR DE MAILS AVEC AFFICHAGE DES OBJET ET ENVOYEUR, ...
Source avec Zip MODULE SYSTRAY MONO-ICONE AVEC INFOBULLE, TOUT ÇA COMMENTÉ

 Sources de la même categorie

Source avec Zip TEXTBOX EN NUMÉRIQUE par 320C
Source avec Zip DÉCIMAL TO HEXDECIMAL par loulou27200
SOUS-TITRES : INCRÉMENTATION DE TOUTES LES CHAÎNES DE CARACT... par ALMIRA
Source avec Zip Source avec une capture EVALUER UN NOMBRE D'OBJETS AVEC UNE BALANCE ET DEUX ÉCHANTIL... par lexsty
Source avec Zip Source avec une capture PETIT LOGICIEL DE DEVIS SANS BD par lololilizozo

Commentaires et avis

Commentaire de Scalpweb le 02/09/2004 19:13:30

Cool comme source !
Et j'aime bien ton pseudo ;-)

Commentaire de azerty25 le 03/09/2004 09:40:48

Bien pensé ;)
Le probleme, c'est que j'ai pas branché l'HP Systeme, je n'aime pas les vieux bruits qu'ils font :p

Commentaire de el_teedee le 03/09/2004 12:46:42

c cool comme source, mais moi j'ai un shuttl et j'ai bien peur de ne pas avoir de speaker sur la CM :/
donc ca marche pô snif

Commentaire de azerty25 le 04/09/2004 00:11:14

Bé en fait, je crois que ça dépend des cartes. Certaines ont un connecteur pour brancher un speaker d'env 3 cm de diamètre, d'autre ont les 2 (connect+HP intégré). J'ai déja eu des cartes qui faisaient les BIP malgré le cable non branché du speaker supplémentaire, et d'autres non.

Commentaire de robytwo le 07/01/2006 20:18:09

Cool. Il faut du temps pour apprendre à écrire une partition.

Commentaire de FLYeRNeT le 29/06/2006 17:02:50

Trés sympa cette source !

Je crois que je vais intégrer quelques musiques basiques dans mes programmes.... mdr ! ;)

 Ajouter un commentaire




Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,264 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales