Faites de la musique avec votre TI. |
Auteur |
Message |
alexvire
Autorisation : Membre
Nb de messages : 241
Inscrit le : Dim 10 Mai 2009, 13:31
|
Posté le : Lun 05 Juil 2010, 16:11
|
|
|
Bonjour, en m'inspirant d'un programme déjà existant, j'avais fais un programme en ASM permettant de produire des sons, le voilà: (Pour entendre les sons, voir ici.)
ZSOUND: (Ne faites pas d'erreurs !)
Code | F306D078D300CD8E42213A803641CDEC4ECDFC4E43C5CD8E42213A803642CDEC4ECDFC4E63C1C53E
FFD300440010FD3EFCD300440010FDC110ECFBC9
End
0000
End |
Pour le faire fonctionner, entrez une valeur comprise entre 0 et 255 dans les variables A et B puis faites Envoi(9prgmZSOUND) pour produire un son. Biensûr vous pouvez créer un programme (A l'aide des boucles "For(" par exemple.) qui change les valeurs des variables tout en lançant le programme ASM. Les valeurs de A sont le tempo tandis que celles de B sont la sonorité. (Grave ou aigu.)
---------------------- Salut, visitez mon site:

Et mon forum !
Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI. |
 |
|
|
Akmdad
Autorisation : Membre
Nb de messages : 717
Inscrit le : Mar 22 Jui 2010, 21:03
|
Posté le : Lun 05 Juil 2010, 17:53
|
|
|
bravo pour ton prog!
voici Piano, qui va avec!
a utiliser en tournant la calto écran a droite et les toutes les touches!
Code |
100->A
Lbl 1
codetouche->C
C/10->C
partDéc(C)×2->D
partEnt(C)+D->C
C×10->C
C×2+20->B
If C>20
Envoi(9prgmZSOUND
Goto 1
|
---------------------- retrouvez moi sur twitter!!!
j'ai une ti 82 stats fr et une ti89 titanium  |
 |
|
|
Akmdad
Autorisation : Membre
Nb de messages : 717
Inscrit le : Mar 22 Jui 2010, 21:03
|
Posté le : Mar 06 Juil 2010, 3:49
|
|
|
c'est génial l'ASM
---------------------- retrouvez moi sur twitter!!!
j'ai une ti 82 stats fr et une ti89 titanium  |
 |
|
|
Akmdad
Autorisation : Membre
Nb de messages : 717
Inscrit le : Mar 22 Jui 2010, 21:03
|
Posté le : Mar 06 Juil 2010, 16:40
|
|
|
pas de remerciements???
---------------------- retrouvez moi sur twitter!!!
j'ai une ti 82 stats fr et une ti89 titanium  |
 |
|
|
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Mar 06 Juil 2010, 19:59
|
|
|
Je crois que personne n'a encore testé.
|
 |
|
|
Akmdad
Autorisation : Membre
Nb de messages : 717
Inscrit le : Mar 22 Jui 2010, 21:03
|
Posté le : Mar 06 Juil 2010, 20:40
|
|
|
testez-le alors
---------------------- retrouvez moi sur twitter!!!
j'ai une ti 82 stats fr et une ti89 titanium  |
 |
|
|
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Jeu 08 Juil 2010, 11:37
|
|
|
J'ai pas les écouteurs qui vont avec.
|
 |
|
|
Akmdad
Autorisation : Membre
Nb de messages : 717
Inscrit le : Mar 22 Jui 2010, 21:03
|
Posté le : Jeu 08 Juil 2010, 11:48
|
|
|
moi non plus mais t'as une radio reglable am, fm?
---------------------- retrouvez moi sur twitter!!!
j'ai une ti 82 stats fr et une ti89 titanium  |
 |
|
|
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Jeu 08 Juil 2010, 11:50
|
|
|
Oui mais la fréquence ne va que jusqu'à 160 en AM.
Et puis ici il faut brancher des écouteurs ou des hauts parleurs à la Ti
|
 |
|
|
Akmdad
Autorisation : Membre
Nb de messages : 717
Inscrit le : Mar 22 Jui 2010, 21:03
|
Posté le : Jeu 08 Juil 2010, 11:53
|
|
|
faux, tu peux utiliser l'AM enfin si t'y arrive...moi sa marche a 702
---------------------- retrouvez moi sur twitter!!!
j'ai une ti 82 stats fr et une ti89 titanium  |
 |
|
|
Mégaforce22
Autorisation : Membre
Nb de messages : 11
Inscrit le : Mer 09 Nov 2011, 18:49
|
Posté le : Sam 19 Nov 2011, 19:21
|
|
|
j'ai les écouteurs mais j'attends d'être sur ordi(je suis sur téléphone là) pour télécharger l'ASM car c'est risqué à la main et que j'ai pas de backup à jour.
Edit: cela ne marche pas.
---------------------- "Alors Dieu voulut créer l'homme parfait. Puis il se rappela qu'il m'avait déjà créé." L'Évangile selon Saint-Moi,1,1. |
 |
|
|
Sangohan38
Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Sam 19 Nov 2011, 20:21
|
|
|
Double post, remontage de sujet ... Toi tu commence mal.
Sinon, essaye avec la radio en mode AM.
Sangohan38
|
 |
|
|
charlesjean
Autorisation : Membre
Nb de messages : 32
Inscrit le : Lun 08 Oct 2012, 18:28
|
Posté le : Lun 05 Nov 2012, 18:49
|
|
|
je vous met tous au défi d' écrire une belle mélodie avec
ce prgm en mettant les numéros correspondant aux notes dans une liste(pas plus de 999 notes!)
Code | dim(La->c
200->A
for(e,1,c
La(e)->b
Envoi(9prgmNOM DU PRGM
End |
(La=liste a)
---------------------- une journée sans rire est une journée perdue .
rire 30 minutes par jour rends la santé et augmente la durée de vie!
(ne remplace pas l'avis d'un spécialiste ou d'un professionnel de la santé,veuillez consulter un médecin) |
 |
|
|
ld
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
|
Posté le : Lun 05 Nov 2012, 19:05
|
|
|
Bravo pour ton prgm ! Excellent !
Pour ma part j'ai les écouteurs avec la prise Jack compatible.
Charlesjean je relève le défis de faire jouer Für Elise à cette calto ! 
---------------------- Note Éphéméride Chrono Bombrman BlueFishEncryptor Labygénérateur Nord BandeauDeTexte LunarPhase Syracuse Papy-Jump Convertisseur ! SolveurDeSudoku VérificateurDeCodesBanquaire PrgmADiviser CryptageDeVigenere MiniSolv Reed-Solomon Code128Géodésie |
 |
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
charlesjean
Autorisation : Membre
Nb de messages : 32
Inscrit le : Lun 08 Oct 2012, 18:28
|
Posté le : Lun 05 Nov 2012, 20:16
|
|
|
bonne idée,voici quelqu'un de courageux!
---------------------- une journée sans rire est une journée perdue .
rire 30 minutes par jour rends la santé et augmente la durée de vie!
(ne remplace pas l'avis d'un spécialiste ou d'un professionnel de la santé,veuillez consulter un médecin) |
 |
|
|
ld
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
|
Posté le : Mar 06 Nov 2012, 18:07
|
|
|
Charlejean ? 
Euh... L’intervalle entre deux valeurs de B ne semble pas proportionnel à la fréquence.
Si on imagine par exemple:
B=100 alors F=400Hz
alors la suite:
B=200 alors F=800HZ
n'est pas vrai.
De plus la durée des notes semble aussi se raccourcir en allant pour une même valeur de A.
Cà ne va pas être simple.
C'est normal tout çà ? 
Question qui n'a aucun rapport:
Comment fait'on sur ce forum pour mettre des liens vers ses programmes, de façon a ce que l'adresse n'apparaisse pas s'il vous plait ? Du genre cliquer "ici".
---------------------- Note Éphéméride Chrono Bombrman BlueFishEncryptor Labygénérateur Nord BandeauDeTexte LunarPhase Syracuse Papy-Jump Convertisseur ! SolveurDeSudoku VérificateurDeCodesBanquaire PrgmADiviser CryptageDeVigenere MiniSolv Reed-Solomon Code128Géodésie |
 |
|
|
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mar 06 Nov 2012, 19:00
|
|
|
Il me semble probable que les fréquences soient générées par une division de la fréquence de la calculatrice par B+constante ou 2^B. (on effectuerait une temporisation entre deux impulsions de son)
[url=http]ici[*/url]
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
 |
|
|
ld
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
|
Posté le : Mar 06 Nov 2012, 19:16
|
|
|
Non je ne pense pas que ce soit "B + constante"...
Pour l'autre c'est probable mais d'où sors-tu 2^B ? Comme çà ??
Merci pour [url=http]ici[/url] 
Tu as fait une erreur il y avait une étoile * en trop.
---------------------- Note Éphéméride Chrono Bombrman BlueFishEncryptor Labygénérateur Nord BandeauDeTexte LunarPhase Syracuse Papy-Jump Convertisseur ! SolveurDeSudoku VérificateurDeCodesBanquaire PrgmADiviser CryptageDeVigenere MiniSolv Reed-Solomon Code128Géodésie |
 |
|
|
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mar 06 Nov 2012, 21:29
|
|
|
2^B parce qu'imbriquer des boucles ou utiliser de la récursivité permet de simuler un diviseur de fréquence.
En électronique logique on utilise des bascules Toggle synchrones en série, chaque bascule divisant la fréquence de l'horloge par 2. B bascules divisent par 2^B.
f=F/2^B
(ici je néglige la durée d'execution des instructions qui simuleraient le diviseur)
B+constante parce qu'une boucle peut temporiser de B cycles, et qu'il faut tenir compte des cycles d'execution de la boucle.
Cependant je me suis trompé en l'énonçant, ce serait f=1/(B+cst)
EDIT: il est encore plus simple d'incrémenter un/des registres/variables et de tester le bit B pour arriver à une division de fréquence par 2^B.
Ou bien les exeperts de l'assembleur on trouvé une autre méthode.
Dans tous les cas je manque d'expérience.
Cependant on peut chercher expérimentalement des notes.
L'étoile permettait d'être sûr que tu visses (verbe voir) le code source.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
 |
|
|
ld
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
|
Posté le : Mar 06 Nov 2012, 21:34
|
|
|
PARIS GAGNE !
http://tout82.free.fr/forum/sujet.php?message=48305#48305
---------------------- Note Éphéméride Chrono Bombrman BlueFishEncryptor Labygénérateur Nord BandeauDeTexte LunarPhase Syracuse Papy-Jump Convertisseur ! SolveurDeSudoku VérificateurDeCodesBanquaire PrgmADiviser CryptageDeVigenere MiniSolv Reed-Solomon Code128Géodésie |
 |
|
|