Lecteur mp3 by mc_abber

Commenter

Contenu du snippet

Soyez sympa...
C'est mon tout premier lecteur Mp3..

Source / Exemple : 


alias mp3p { dialog -md mp3p mp3p }   
dialog mp3p {   
  title "    .::[ Mp3 ]::.  "  
  size -1 -1 198 173  
  option dbu  
  edit "", 1, 30 6 131 10, disable center  
  box "", 2, 36 23 116 50  
  button "+dir", 3, 80 32 29 14  
  button "Play", 4, 44 51 29 14  
  button "Pause", 5, 78 51 29 14  
  button "Stop", 6, 112 51 29 14  
  box "", 7, 39 92 117 50  
  text "Volume:", 8, 59 85 69 8, center  
  button "+", 9, 79 103 37 12  
  button "-", 10, 78 120 37 12  
}  
On *:dialog:mp3p:sclick:*:{  
  if ($did == 3) { set %MP3Dir $sfile( *.* , Choisissez un fichier audio ) | did -ra $dname 1 $remove($nopath(%Mp3dir),.mp3,.wma,.wav,.mid))  }  
  if ($did == 4) { splay %Mp3dir | amsg 4(15Mp34) 4(15 $+ $remove($nopath(%Mp3dir),.mp3,.wma,.wav,.mid) $+ 4) 4(15AbBeR-§cRipT4) }  
  if ($did == 5) { if %pause == 1 { splay resume | %pause = 0 | did -ra $dname 5 Pause } | else { splay pause | %pause = 1 | did -ra $dname 5 Resume } } 
  if ($did == 6) { splay stop | did -ra $dname 1 $remove($nopath(%Mp3dir),.mp3,.wma,.wav,.mid) (Stop) }  
  if ($did == 9) { //vol -vp $calc($vol(mp3) + 5000) }  
  if ($did == 10) { //vol -vp $calc($vol(mp3) - 5000) }
}

Conclusion :


Pour le lancer tapez /mp3p

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 (cs_Abber)