Lecteur mp3

Commenter

Contenu du snippet

ben sé un lecteur mp3

Source / Exemple : 


; Add-on créé by SamsungMan
alias mp3 { dialog -dm mp3 mp3 | set %mp3 $findfile(%location,*.mp3 ,0,1,did -a mp3 1 $nopath($1-)) }
menu menubar,channel {
  -
  Lecteur mp3:/mp3
  -
}
on *:load:{
  /echo -a 4Lecteur Mp3 chargée.
}
dialog mp3 {
  title "Lecteur mp3 by SamsungMan"
  size -1 -1 152 170
  option dbu
  text "Lecteur Mp3", 1, 0 10 150 8, center
  button "Play", 2, 6 26 36 12
  button "Stop", 3, 6 44 36 12
  button "Pause", 4, 6 64 36 12
  button "Reprendre", 5, 6 84 36 12
  button "+", 7, 6 124 13 12
  button "-", 8, 30 138 12 12
  list 11, 46 54 102 102, size
  box "Informations", 12, 46 19 102 34
  text "Titre :", 13, 48 28 16 8
  text "Durée :", 16, 48 40 24 8
  box "Volume", 18, 2 112 44 44
  box "Contrôle", 19, 2 18 44 82
  text "© 2004-2005 SamungMan", 20, 2 160 62 8
  edit "", 21, 66 26 82 10, disable autohs
  edit "", 24, 68 39 40 10, disable autohs
  button "Choisir un repertoire ", 25, 0 0 150 8
  button "Fermer", 6, 71 159 76 10, ok cancel
}

On *:dialog:init:*:*{
/autoauth

On *:dialog:mp3:sclick*:*:{  
  if ($did == 25) { 
    set %location $sdir="Choisis le repertoire de tes MP3" C:\ 
    did -ra mp3 1 %location 
    set %mp3 $findfile(%location,*.mp3 ,0,1,did -a mp3 11 $nopath($1-))
  }
  if ($did == 8) {
    vol -v $calc($vol(master) - 5000)
  }    
  if ($did == 4) {
    splay -p pause
  }
  if ($did == 2) { 
    set %mp3 %location $+ $did(11).seltext
    set %mp3titre $mp3(%mp3).title      
    set %mp3time $duration($calc($mp3(%mp3).length / 1000 )) 
    if (%mp3 == $null) { /echo -a 4Erreur ! 1Choisis un mp3 dans la liste ! }
    if (%mp3titre == $null) { set %mp3titre [Inconnu] }
    if (%mp3time == $null) { set %mp3time [Inconnu] }
    did -ra mp3 21 %mp3titre
    did -ra mp3 24 %mp3time
    /ame 9,15©10,15°14,15o4.12,15 12,15écoute4,15 %mp3titre 1,15Durée 9,15[4,15 %mp3time 9,15] 4,15.14,15o10,15°9,15©
    splay %mp3   
  }
  if ($did == 5) {
    splay -p resume
  }
  if ($did == 7) {
    vol -v $calc($vol(master) + 5000)
  }
  if ($did == 3) {
    splay -p stop
  }
}

Conclusion :


voila

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (Samsung741)