

Les gifs montrent qu'un hector pourrait jouer ces clips avec une assez bonne qualité.
Modérateurs : Papy.G, fneck, Carl
Code : Tout sélectionner
' Sommateur
Echant = Echant - o
' Integrator
Integrator += Echant
If Integrator >= 0 Then
Byte_Hector = &H80 'mise en place du bit son
o = 127 ' &H80
Else
Byte_Hector = &H0 'mise en place du bit son
o = -127
End If
Code : Tout sélectionner
Echant -= Taux * d2 ' Récupération de l'erreur n-2
Echant += (1 + Taux) * d1 ' Récupération de l'erreur n-1
If Echant > 0 Then
Byte_Hector = &H80 'mise en place du bit son
Sortie = 127 ' valeur son à prendre en compte
Else
Byte_Hector = &H0 'mise en place du bit son
Sortie = -127 ' valeur son à prendre en compte
End If
d2 = d1 ' Déplacement de l'erreur
d1 = (Echant - Sortie) ' Calcul nouvelle erreur !
Code : Tout sélectionner
' Dent de scie
Saw = Saw + 32 ' vitesse de zone en pente, mettre 16 pour une pente plus faible.. (à modifier empiriquement)
If Saw>127 Then
Saw = -128 ' descente brutale; /|/|/|/|/|..
End If
' Comparaison échantillon vs dent de scie, et sortie du bit
If Echant < Saw Then
Byte_Hector = &H80
Else
Byte_Hector = &H00
End If
Je ne comprends pas bien: à 8khz le signal devrait être pas mal correct. Quand tu dis qu'il n'est pas bon avec la valeur 32, ça veut dire que ça ressemble à rien, ou autre chose style : on entends trop la porteuse à 8khz? Par curiosité, mets 16 ou 8 à la place du 32, ça va descendre la fréquence de la porteuse pour l'envoyer dans le signal utile et donc la masquer un peu plus j'espère.