Bienvenue aux nouveaux arrivants sur FantasPic !
- Pensez à lire les règles durant votre visite, il n'y en a pas beaucoup, mais encore faut-il les respecter .
- N’hésitez pas à faire des remarques et/ou suggestions sur le Forum, dans le but de l'améliorer et de rendre vos prochaines visites plus agréables.
- Vous pouvez regarder votre "panneau de l'utilisateur" afin de configurer vos préférences.
- Un passage par "l'utilisation du forum" est recommandé pour connaître les fonctionnalités du forum.
--- L’équipe FantasPic ---
- Pensez à lire les règles durant votre visite, il n'y en a pas beaucoup, mais encore faut-il les respecter .
- N’hésitez pas à faire des remarques et/ou suggestions sur le Forum, dans le but de l'améliorer et de rendre vos prochaines visites plus agréables.
- Vous pouvez regarder votre "panneau de l'utilisateur" afin de configurer vos préférences.
- Un passage par "l'utilisation du forum" est recommandé pour connaître les fonctionnalités du forum.
--- L’équipe FantasPic ---
MAX7219 et texte défilant
Bonsoir,
Ne pas oublier quand on utilise plusieurs MAX en série de répéter X fois les commandes, peut être la raison de la différence de luminosité.
J'ai fait faire un tour de 90° à mes deux MAX (pas simple avec des versions en DIP) et j'ai repris le programme :
et la routine d'affichage (des améliorations sont surement possible)
Pour moi cela semble fonctionner.
A+
Ne pas oublier quand on utilise plusieurs MAX en série de répéter X fois les commandes, peut être la raison de la différence de luminosité.
J'ai fait faire un tour de 90° à mes deux MAX (pas simple avec des versions en DIP) et j'ai repris le programme :
Code : Tout sélectionner
dim aff_buffer_1 as byte[8]
dim aff_buffer_2 as byte[8]
const table as byte[56]=(
$3C, $42, $42, $42, $42, $42, $42, $3C, ' 0
$18, $28, $48, $08, $08, $08, $08, $7E, ' 1
$3C, $42, $02, $0C, $10, $20, $40, $7E, ' 2
$3C, $42, $42, $42, $7E, $42, $42, $42, ' A
$7C, $42, $42, $7E, $42, $42, $42, $7C, ' B
$3E, $40, $40, $40, $40, $40, $40, $3E, ' C
$3C, $42, $66, $42, $5A, $42, $24, $18) '
et la routine d'affichage (des améliorations sont surement possible)
Code : Tout sélectionner
sub procedure aff_defilant(dim data1, vitesse as byte)
dim cpt, m,i ,ee as byte
m = $80
for cpt = 0 to 7
for i = 0 to 7
if table[i+(data1 * 8)] and m > 0 then
aff_buffer_1[i] = aff_buffer_1[i] or 1
end if
ecr_7219_def(i+1,aff_buffer_1[i],aff_buffer_2[i])
aff_buffer_2[i] = aff_buffer_2[i] <<1
if aff_buffer_1[i] and $80 > 0 then
aff_buffer_2[i] = aff_buffer_2[i] or 1
end if
aff_buffer_1[i] = aff_buffer_1[i] <<1
next i
for i = 0 to vitesse
delay_ms(1)
next i
m = m >> 1
next cpt
end sub
Pour moi cela semble fonctionner.
A+
MAX7219 et texte défilant
MAX7219 et texte défilant
- Gérard
Expert- Messages : 1640
- Âge : 65
- Enregistré en : septembre 2015
- Localisation : Alsace - Haut-Rhin
Patou pour ton implication. Je ne sais pas si j'aurai le temps pour tester cette semaine. A partir de mardi je peux souffler, donc plus de temps.
Edit : Patou, peux-tu m'expliquer un peu le S/P d'affichage? Il y a des choses qui m'échappent, merci d'avance.
Edit : Patou, peux-tu m'expliquer un peu le S/P d'affichage? Il y a des choses qui m'échappent, merci d'avance.
MAX7219 et texte défilant
MAX7219 et texte défilant
- Gérard
Expert- Messages : 1640
- Âge : 65
- Enregistré en : septembre 2015
- Localisation : Alsace - Haut-Rhin
patou149 a écrit :Source du message sub procedure aff_defilant(dim data1, vitesse as byte)
dim cpt, m,i ,ee as byte
m = $80
for cpt = 0 to 7
for i = 0 to 7
if table[i+(data1 * 8)] and m > 0 then
aff_buffer_1[i] = aff_buffer_1[i] or 1
end if
ecr_7219_def(i+1,aff_buffer_1[i],aff_buffer_2[i])
aff_buffer_2[i] = aff_buffer_2[i] <<1
if aff_buffer_1[i] and $80 > 0 then
aff_buffer_2[i] = aff_buffer_2[i] or 1
end if
aff_buffer_1[i] = aff_buffer_1[i] <<1
next i
for i = 0 to vitesse
delay_ms(1)
next i
m = m >> 1
next cpt
end sub
Bonjour,
Je me triture les quelques neurones qui restent mais je tourne en rond. Je vais finir par et .
Merci à toutes les âmes charitables qui passeront pas ici d'éclairer ma LED. (lanterne est dépassé)
MAX7219 et texte défilant
MAX7219 et texte défilant
- paulfjujo
Expert- Messages : 2589
- Âge : 73
- Enregistré en : juillet 2015
- Localisation : 01800
- Contact :
bonsoir à tous,
Gerard , je viens tout juste de tester/modifier une version pour 2 matrices 8x8 , en MikroC pour un 18F46K22
qui affiche soit du texte en Flash "0123456789"
ou en RAM..
"J= 0 T°AMB= 48.10 Deg"
defilant donc de droite à gauche ..
si cela t'interesse ,Lien sur le code ici..
je vais , par la suite l'etendre à 4 matrices..
Gerard , je viens tout juste de tester/modifier une version pour 2 matrices 8x8 , en MikroC pour un 18F46K22
qui affiche soit du texte en Flash "0123456789"
ou en RAM..
"J= 0 T°AMB= 48.10 Deg"
defilant donc de droite à gauche ..
si cela t'interesse ,Lien sur le code ici..
je vais , par la suite l'etendre à 4 matrices..
MAX7219 et texte défilant
- Gérard
Expert- Messages : 1640
- Âge : 65
- Enregistré en : septembre 2015
- Localisation : Alsace - Haut-Rhin
Bonjour tout le monde,
Merci à vous de vous inquiéter de mon petit souci.
@Patou : j'ai du mal à comprendre ton document, je ne vois pas comment est codé le chiffre "1" avec les valeurs que tu donnes.
@Paul : je n'arrive pas à décompresser ton zip.
Décidément, je porte la poisse avec ces matrices qui ne veulent pas se laisser dompter.
Mais je ne désespère pas, 2017 sera l'année de la réussite et comme dit la pub "Je l'aurai un jour, je l'aurai ..."
Merci à vous de vous inquiéter de mon petit souci.
@Patou : j'ai du mal à comprendre ton document, je ne vois pas comment est codé le chiffre "1" avec les valeurs que tu donnes.
@Paul : je n'arrive pas à décompresser ton zip.
Décidément, je porte la poisse avec ces matrices qui ne veulent pas se laisser dompter.
Mais je ne désespère pas, 2017 sera l'année de la réussite et comme dit la pub "Je l'aurai un jour, je l'aurai ..."
MAX7219 et texte défilant
MAX7219 et texte défilant
Retourner vers « Coin Fourre-tout »
Qui est en ligne
Utilisateurs parcourant ce forum : cyril13110 et 42 invités