MIXER

Commentaire de Francky23012301 le 08/04/2006 19:47:43

Surprenant les effets mais

*Impossibilité d'enregistrer les modif : c'est le but d'une table de mixage

*Dommage que pas possibilité de scratching

*Les valeurs max sont trop élevées : ca détruit completement de sons

*Pas d'effet Wah-Wah : ca c'est impardonnable lol

Il manque l'essentiel : les commentaires. Cette source en tant que telle n'est pas destinées aux débutants.

TU n'explique pas le principe des effets

Pour résumer tres bonne source mais pas poussée assez loin et absence d'explications

Commentaire de Nicolas___ le 08/04/2006 21:25:27

c'est pas un compo mais une librairie pour l info ...
Donc c'est comme je l'ai dis Bass ou on trouve ca ici http://www.un4seen.com/
Et pas de prob je travaille pour l'enregistrement ( j'ai deja une possibilite mais j'utilise MMsystem et j'aimerais utiliser uniquement Bass ...)
Je vais regarder pour les valeurs ...
Bon c'est clair le Wah-Wah manque mais j'ai pas trouver dsl ;) lol
Je vais mettre des commentaires mais si tu veux des explications suppl va sur le site de Bass et telecharge l'aide( Ca n'explique pas le fonctionnement mais ca explique comment les generer c'est deja ca !)

Bon pour le scratching tu me fait pleurer parce que j'ai essayer absolument d'en faire un " fait maison" mais je n'arrive pas a faire un truc qui tue !

Ciao

Commentaire de Matt 261 le 09/04/2006 09:02:21

Pour l'effet de Wah-Wah regarde dans les exemples fournis avec la dll Bass. Tu dois avoir téléchargé un zip avec dedans un bonne dizaine d'exemples.

Commentaire de Matt 261 le 09/04/2006 15:16:48

Ah bon... je croyais pourtant. Bon c'est pas grâce tu finiras bien par trouver ^^...

Commentaire de Nicolas___ le 10/04/2006 13:58:27

Avis au possesseur de dinosaure :

IL faut avoir une résolution de minimum 800x600 pour afficher correctement la fenetre

Ciao

Commentaire de Matt 261 le 10/04/2006 17:27:46

Mince pourquoi ça ne marche pas le système de notes ???

Commentaire de Matt 261 le 10/04/2006 17:52:52

Qu'est-ce que tu veux dire Econs par "petit probblème passagé" ?

Commentaire de Matt 261 le 10/04/2006 17:55:35

Bein chez moi j'ai beau mettre 8 il me dit pas que j'ai mis la note... AU SECOURS LES ADMINS... :-(

Commentaire de econs le 10/04/2006 22:25:32 administrateur CS

MATT261 > Seules les notes de florenth et proteus39 sont passées.
Aucune trace d'une quelconque action de ta part. Le site n'est plus en phase de maintenance, donc çà devrait passer. Des notes ont été attribuées ce soir à certaines sources. Donc, çà fonctionne. Dès lors, les admins ne peuvent pas faire grand chose pour toi.
Le problème doit se trouver de ton côté.

Commentaire de quarto le 12/04/2006 06:14:54

Assez génial comme programme... Pour moi, c'est un plaisir de découvrir des outils aussi sympa ! Y-a-t-il une limite à la taille des fichiers ?... (Je supose que oui)...
Question stupide(une de plus): C'est quoi un effet de scratch ?

Ma note : 9 (parce que je n'ai pas tout compris dans le source... Avec des commentaires plus poussés, j'aurais probablement mis plus !)

Commentaire de Matt 261 le 14/04/2006 17:20:54

Pour le spectre il y en a déjà un exemple dans le zip de bass32. Il suffit d'enlever tout ce que tu ne veux pas et le tour est joué!

Commentaire de Nicolas___ le 16/04/2006 22:34:41

Bon ca y est j'ai mis a jour ...
On a ce qu'avait proposé Florenth(cad possibilité de remettre a default les valeurs)
+ une sauvegarde de vos fichiers sample et de la bibliotheque pour ne pas tjs devoir les reprendre ... ( a aimer ou pas , de toute facon vous avez le choix , tt prevus !)

Ciao

Commentaire de WhiteHippo le 23/04/2006 02:53:56

Bonjour Nicolas___, j'ai quelques remarques sur ton code, remarques qui concernent principalement les constantes, ou plutôt leur non utilisation :(

Pour un soucis de maintenance du code il serait préférable d'ecrire :

const
  FREQUENCE_INITIALE = 55900 ;

procedure TForm1.IniFreqS1Click(Sender: TObject);
begin
  frequenceS1.Position:=FREQUENCE_INITIALE ;
end;

ou encore :

const
  FX_PARAMEQ_1   = 1 ;
  FX_PARAMEQ_2   = 2 ;
  FX_PARAMEQ_3   = 3 ;
  FX_REVERB      = 4 ;
  FX_ECHO        = 5 ;
  FX_FLANGER     = 6 ;
  FX_COMPRESSION = 7 ;
  FX_CHORUS      = 8 ;
  FX_GARGLE      = 9 ;

procedure TForm1.Chorus(n:integer;sorte:integer;Valeur:integer);
const
  CHORUS_WET_DRY_MIX = 1 ;
  CHORUS_DEPTH       = 2 ;
  CHORUS_FEEDBACK    = 3 ;
  CHORUS_FREQUENCY   = 4 ;
  CHORUS_DELAY       = 5 ;
begin
  BASS_FXGetParameters(fx[FX_CHORUS,n], @ch);

  case sorte of
    CHORUS_WET_DRY_MIX : ch.fWetDryMix :=Valeur; //100
    CHORUS_DEPTH       : ch.fDepth     :=Valeur; //100
    CHORUS_FEEDBACK    : ch.fFeedback  :=Valeur; //-99..99
    CHORUS_FREQUENCY   : ch.fFrequency :=Valeur; //10
    CHORUS_DELAY       : ch.fDelay     :=Valeur; //20
  end ;

  BASS_FXSetParameters(fx[FX_CHORUS,n], @ch);
end;

Les constantes encore et toujours :

procedure TForm1.CdelayS1Change(Sender: TObject);
begin
  chorus(1,FX_ECHO,20-CDelayS1.Position);
  c5s1.Caption:=inttostr(20-CDelayS1.Position);
end;

Le 20 ici devrait être remplacé par CDelayS1.Max. Si demain tu dois modifier la valeur max de ton composant "TTrackbar" il te faudra rechercher puis modifier à la main chacune des valeurs 20 dans ton code. (Remarque applicable également à tous les autres "TTrackbar")


Les constantes chaines sont elles aussi non exploitées. Par exemple la chaine constante 'Musique' est utilisée une quarantaine de fois, soit, en exagerant, une quarantaine de possibilités de se tromper si on veut la modifier.

Je sais on va me ressortir l'éternel Cherche/Remplace !!! ok, MAIS, imaginons que par megarde j'appuye sur la touche 4 invonlontairement sur l'UNE des 40 chaines, alors j'aurais :

  WriteInteger('Musique4','Compression_Son1',CS1.position);

Ce qui est correct pour le compilateur. L'erreur risque d'etre difficilement reperable dans le code. Il faudra executer le programme pour s'appercevoir du bug.

Avec l'emploi d'une chaine constante, on aurait :

const
  INI_SECTION_MUSIQUE   = 'Musique'          ;
  INI_MUSIQUE_COMP_SON1 = 'Compression_Son1' ;

  WriteInteger(INI_SECTION_MUSIQUE,INI_MUSIQUE_COMP_SON1 ,CS1.position);

dans ce cas, l'appui sur la touche 4 par inadvertance entrainera une erreur au niveau du compilateur, et sera donc detectée au plus tôt ;)

Enfin, en ce qui concerne les TSpeedbutton "Choix1S1" et suivants :

procedure TForm1.Choix1S1Click(Sender: TObject);
begin
  lireEffets(path+'choix1S1.MBC',1);
  LChoixS1.Caption:=inttostr(1);
end;

Une seule procedure aurait pu être créée, le sender permettant de différencier l'appelant et donc le fichier MBC concerné. ( Le "Sender" des méthodes est là pour ça, fournir l'appelant, il ne faut donc pas hésiter à en user voire en abuser :)

De plus je n'ai toujours pas compris l'utilisation du inttostr !!!
un simple LChoixS1.Caption:='1'; aurait suffit.

Cordialement.

Commentaire de Nicolas___ le 23/04/2006 19:00:22

Mais j'ai quelque chose a ajoute par rapport a cela :

" Le 20 ici devrait être remplacé par CDelayS1.Max. Si demain tu dois modifier la valeur max de ton composant "TTrackbar" il te faudra rechercher puis modifier à la main chacune des valeurs 20 dans ton code. (Remarque applicable également à tous les autres "TTrackbar") "

Il n'y a logiquement aucune raisons que je change ceci car se sont les valeus max que l'on peut attribuer a chancun des effets .

Dans l'aide de bass
" fDelay Number of milliseconds the input is delayed before it is played back, in the range from 0 to 20. The default value is 0 ms. "

D'ou le 20 ...

Ce n'est pas de la mauvaise volonté de travailler je te rassure ...

Ciao

Commentaire de Nicolas___ le 24/04/2006 20:11:28

"...sachant que le delay est un FLOAT..." et bien tu vois , j'ai appris un truc la !
Je le savais mais je n'y ai pas pensé , je vais donc faire comme tu l'as di avec la valeur Max et faire des Track plus précise ( pour voir si ca change beaucoup , ca on verra bien ...)

Allez Re-Merci !!!

Ciao

Ps : la MAJ risque d'attendre longtemps ( exams bientot ! ) mais elle arrivera surement un jour.

Commentaire de regismarion le 27/05/2006 08:18:44

Bjr Nicolas j' ai juste relooké ton mixer avec les composants Almédiadev il méritait bien ça! vu qu'il faut les licences pour ces composants vous trouverez sur mon site 'http://site.voila.fr/vieuxredg' ce mixer relooké por les possesseurs des licences adéquat Mail me pour le source A+

Commentaire de deja utiliser tu dit le 01/10/2006 18:49:00

Comment on compile et avec quel programme et ou peut-on trouver se programme ?
Merci de repondre ;-)
Ps:Mon nom ses anthony se pseudo ses juste que j'avais pas envie de chercher et a chaque fois sa me metait "ce pseudo est deja utiliser" mdr

Commentaire de deja utiliser tu dit le 01/10/2006 19:40:07

Salut Matt 261,
J'ai instaler Delphi 6 Ensuite il ya eux plus rien Meme pas un racourci sur le bureau ni rien !
que-ce-que je doit fair?
Merci de repondre

Commentaire de deja utiliser tu dit le 01/10/2006 20:12:42

Oui tout ses Bien Passer Mais J'ai Plus Facile
Laissons Tomber C'est mieu ;-)
Merci quand meme (j'espere que sa sa te derenge pas:p)

Commentaire de mlamlm le 21/08/2007 16:32:42

As tu pense a pouvoir non pas enregistrer l'entrée micro ùmais de pouvoir directement la mixer via un des canaux du sample ?

Bàt MLAMLM  (Marc)