Mp3 player extra simple

Soyez le premier à donner votre avis sur cette source.

Snippet vu 8 957 fois - Téléchargée 27 fois

Contenu du snippet

lecteur mp3 seulement avec un fichier mrc et tu le load dans tes remote pi ca marche.y'a encore des bug mais ca enpeche pas le lecteur de marcher comme il faut
je veu remercier un gars que j'ai rencontrer sur irc TyBoNum j'sai po trop ces qui mais i ma aider merci

rEw|nd

Source / Exemple :


#PLAYER MP3

menu status,channel {
  -
  Mp3 :/mp3
}

alias -l writesons { 
  /writeini sons.ini MP3 n [ $+ [ %a ] ] $1-
  did -a mp3 1 $nopath($1-)
  inc %a 1
}

alias mp3 {
  /dialog -m mp3 mp3
}

dialog mp3 {
  title "Lecteur Mp3 par rEw|nd"
  size -1 -1 181 75
  option dbu
  list 1, 5 5 150 55
  button "Play",2, 2 56 30 17 
  button "Stop",3, 35 56 30 17
  button "Pause",4, 68 56 30 17
  button "Resume",5,101 56 30 17
  button "...",6,134 56 14 17
  button "+",7,150 56 8 8
  button "-",8,150 65 8 8
  button "List",9,159 11 20 17
  button "In List",10, 159 31 20 17
  menu "Fichier",99
  item "Choisir le dossier où sont les MP3",97,99
  item "Définir une liste MP3 à jouer",96,99
  item "Fermer",98,99,cancel
  menu "About",95
  item "Crédits",94,95
}

dialog list {
  title "Liste des fichiers à jouer"
  size -1 -1 160 60
  option dbu
  list 2,4 4 125 50
  button "Ok",1,133 4 15 43,ok
}

dialog crédits {
  title "Crédits"
  size -1 -1 100 100
  option dbu
  text "Lecteur Mp3 by rEw|nd aidé par TyBoNuM.",99, 10 10 65 20,disable
  text "www.killing-script.fr.st",96,7 23 7 20 20
  text "www.simcool-script.fr.st",98,7 35 60 20
  text "http://www.ircfr.com",97,7 50 60 20
  button "Ok",1,133 4 15 43,ok
}
on *:dialog:mp3:menu:97:{
  set %mp3dir $sdir="Choissiez quel dossier contient vos MP3 "
  set %a 1
  $findfile(%mp3dir,*.mp3,0,writesons $1-)
}

on *:dialog:mp3:dclick:1:{
  /splay -p " $+ %mp3dir $+ $did(mp3,1).seltext $+ "
}

on *:dialog:mp3:sclick:2:{
  /splay -p " $+ %mp3dir $+ $did(mp3,1).seltext $+ "
}

on *:dialog:mp3:sclick:3:{
  /splay -p stop
}

on *:dialog:mp3:sclick:4:{
  /splay -p pause
}

on *:dialog:mp3:sclick:5:{
  /splay -p resume
}

on *:dialog:mp3:sclick:6:{
  set %mp3dir $sdir="Choissiez quel dossier contient vos MP3 "
  set %a 1
  $findfile(%mp3dir,*.mp3,0,writesons $1-)
}

on *:dialog:mp3:sclick:7:{
  //vol -vp $calc($vol(mp3) + 4000)
}

on *:dialog:mp3:sclick:8:{ 
  //vol -vp $calc($vol(mp3) - 4000)
}

on *:dialog:mp3:menu:96:{
  dialog -m list list
}

on *:dialog:mp3:sclick:9:{
  dialog -m list list
}

on *:dialog:mp3:sclick:10:{
  /splay -q " $+ %mp3dir $+ $did(mp3,1).seltext $+ "
  did -ai list 2 $did(mp3,1).seltext
}

on *:dialog:mp3:menu:94:{
  dialog -m crédits crédits
}
on *:dialog:mp3:init:0:{ 
  if (%mp3dir == $null) {  
    set %mp3dir $sdir="Choissiez quel dossier contient vos MP3 "
    set %a 1
    $findfile(%mp3dir,*.mp3,0,writesons $1-)
  }
  else {  
    set %a 1
    $findfile(%mp3dir,*.mp3,0,writesons $1-)
  }
}

A voir également

Ajouter un commentaire Commentaires
wennes
Messages postés
1
Date d'inscription
mardi 20 janvier 2009
Statut
Membre
Dernière intervention
20 janvier 2009

20 janv. 2009 à 22:33
pas mal
cs_Grais
Messages postés
33
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
13 décembre 2005

2 sept. 2005 à 17:48
Hum j'ai essayé :
/splay: no such file 'C:\Documents and Settings\Manager\Bureau\...
ça ne trouve pas le fichier essaye avec $sfile c'est + précis
cs_Grais
Messages postés
33
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
13 décembre 2005

2 sept. 2005 à 17:43
Une seule chose a dire ( psk je n'ai pas encore essayé ) regroupe c'est plus facile a lire

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.