FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» Logiciel de planétarium.
Série de musiques Emptypar Pedro Sam 23 Nov 2024 - 15:50

» Un autre pense-bête...
Série de musiques Emptypar Froggy One Jeu 21 Nov 2024 - 15:54

» Récupération du contenu d'une page html.
Série de musiques Emptypar Pedro Sam 16 Nov 2024 - 14:04

» Décompilation
Série de musiques Emptypar JL35 Mar 12 Nov 2024 - 19:57

» Un album photos comme du temps des grands-mères
Série de musiques Emptypar jjn4 Mar 12 Nov 2024 - 17:23

» traitement d'une feuille excel
Série de musiques Emptypar jjn4 Jeu 7 Nov 2024 - 3:52

» Aide-mémoire mensuel
Série de musiques Emptypar jjn4 Lun 4 Nov 2024 - 18:56

» Des incomprèhension avec Timer
Série de musiques Emptypar Klaus Mer 30 Oct 2024 - 18:26

» KGF_dll - nouvelles versions
Série de musiques Emptypar Klaus Mar 29 Oct 2024 - 17:58

» instructions panoramic
Série de musiques Emptypar maelilou Lun 28 Oct 2024 - 19:51

» Figures fractales
Série de musiques Emptypar Marc Ven 25 Oct 2024 - 12:18

» Panoramic et Scanette
Série de musiques Emptypar Yannick Mer 25 Sep 2024 - 22:16

» Editeur d étiquette avec QR évolutif
Série de musiques Emptypar JL35 Lun 23 Sep 2024 - 22:40

» BUG QR Code DelphiZXingQRCode
Série de musiques Emptypar Yannick Dim 22 Sep 2024 - 11:40

» fichier.exe
Série de musiques Emptypar leclode Ven 20 Sep 2024 - 19:02

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Novembre 2024
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier
Le Deal du moment :
Boutique Nike : -25% dès 50€ sur TOUT le ...
Voir le deal

 

 Série de musiques

Aller en bas 
AuteurMessage
Invité
Invité




Série de musiques Empty
MessageSujet: Série de musiques   Série de musiques EmptyMer 2 Déc 2009 - 23:38

Bonjour !

J'ai créé des musiques à base de celle que jjn4 avait donné dans "La musique adoucit les moeur".

Voici ses musique :

(Vue que je ne suis pas très bon pour ça j'en ait pris des très faciles)

Au clair de la lune :



Code:
dim a,b
label ici:hide 0
data 60,6 , 60,6 , 60,6 , 62,6 , 64,6 , 0,0
data 62,6 , 0,0 , 60,6 , 64,6 , 62,6 , 62,6
data 60,6 , 0,3
data 60,6 , 60,6 , 60,6 , 62,6 , 64,6 , 0,0
data 62,6 , 0,0 , 60,6 , 64,6 , 62,6 , 62,6
data 60,6 , 0,4
data 62,6 , 62,6 , 62,6 , 62,6 , 57,6 , 0,0 , 57,6
data 0,0 , 62,6 , 60,6 , 59,6 , 57,6 , 55,6 , 0,3
data 60,6 , 60,6 , 60,6 , 62,6 , 64,6 , 0,0
data 62,6 , 0,0 , 60,6 , 64,6 , 62,6 , 62,6
data 60,6 , 0,100
midi_on
midi_volume 127
ici:
 read a : read b
 if a<>0 then midi_play a,b : goto ici
 wait 500
 if b<>100 then goto ici
midi_off
terminate

Le petit agneau de Mary :


Code:
dim a,b
label ici:hide 0
data 64,6 , 62,6 , 60,6 , 62,6
data 64,6 , 64,6 , 64,6 , 0,0
data 62,6 , 62,6 , 62,6 , 0,0
data 64,6 , 64,6 , 64,6 , 0,0
data 64,6 , 62,6 , 60,6 , 62,6
data 64,6 , 64,6 , 64,6 , 0,0 , 60,6
data 62,6 , 64,6 , 62,6
data 60,6 , 0,100
midi_on
midi_volume 127
ici:
 read a : read b
 if a<>0 then midi_play a,b : goto ici
 wait 500
 if b<>100 then goto ici
midi_off
terminate

La glace, ça glisse :


Code:
dim a,b
label ici:hide 0
data 64,6 , 62,6 , 60,6 , 62,6
data 64,6 , 64,6 , 64,6 , 0,0
data 62,6 , 62,6 , 62,6 , 0,0
data 64,6 , 64,6 , 64,6 , 0,0
data 64,6 , 62,6 , 60,6 , 62,6
data 64,6 , 64,6 , 64,6 , 0,0 , 60,6
data 62,6 , 64,6 , 62,6
data 60,6 , 0,100
midi_on
midi_volume 127
ici:
 read a : read b
 if a<>0 then midi_play a,b : goto ici
 wait 500
 if b<>100 then goto ici
midi_off
terminate

Le petit soldat :

Code:
dim a,b
label ici:hide 0
data 64,2 , 60,6 , 62,6 , 0,0
data 64,2 , 64,6 , 60,6 , 0,0
data 69,6 , 71,6 , 0,1 , 60,6 , 62,6 , 0,1 , 0,0
data 62,2 , 0,0
data 64,6 , 64,6 , 60,6 , 0,0
data 69,6 , 71,6 , 0,1 , 72,6 , 62,6 , 0,0
data 64,6 , 60,6 , 62,6 , 62,6 , 0,0
data 60,1 , 0,100
midi_on
midi_volume 127
ici:
 read a : read b
 if a<>0 then midi_play a,b : goto ici
 wait 500
 if b<>100 then goto ici
midi_off
terminate

Le cygne :

Code:
dim a,b
label ici:hide 0
data 72,6 , 71,6 , 72,6 , 0,0
data 69,2 , 69,6 , 0,0
data 71,6 , 72,6 , 71,6 , 0,0
data 69,3 , 0,0
data 72,6 , 71,6 , 72,6 , 0,0
data 62,6 , 64,6 , 60,6 , 0,0
data 71,6 , 72,6 , 71,6 , 0,0
data 69,3 , 0,100
midi_on
midi_volume 127
ici:
 read a : read b
 if a<>0 then midi_play a,b : goto ici
 wait 500
 if b<>100 then goto ici
midi_off
terminate

(J'avait ses musique dans un vieux livre)
Revenir en haut Aller en bas
jjn4

jjn4


Nombre de messages : 2747
Date d'inscription : 13/09/2009

Série de musiques Empty
MessageSujet: ++   Série de musiques EmptyMer 2 Déc 2009 - 23:59

Bravo, Nicolas !!!
Te voilà maintenant élevé au rang des disciples du cercle des grands musicomanes !
sunny
Revenir en haut Aller en bas
http://jjn4.e-monsite.com
 
Série de musiques
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Scan port COM série
» pack musiques d'ambiance pour vos jeux
» Serie de "And"
» Rechercher une séquence dans une série de fichiers
» Port série COM RS232

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: