Un pti lecteur mp3

Soyez le premier à donner votre avis sur cette source.

Snippet vu 9 792 fois - Téléchargée 25 fois

Contenu du snippet

ba c un lecteur mp3, c'est une de mes premieres sources donc voila je suis heureux de vous la faire partager.
Mais ce lecteur mp3 est sur de marcher et est facil .

Source / Exemple :


????????????????????????????????????????????????????
??  SOURCE PROVENANT DU SER-SCRIPT PAR SER      ??
?? ?MERCI DE LAISSER CETTE FRASE DANS VO REMOTE??
?????????????????????????????????????????????????????

menu menubar {
  -
  MP3 Player:{
    set %dialog.nbre 1
    while ( ($dialog(%dialog.nbre) != mp3) && ($dialog(%dialog.nbre) != $null )) { inc %dialog.nbre 1 }
    if ( $dialog(%dialog.nbre) == mp3) { dialog -o mp3 mp3 }
    else { dialog -m mp3 mp3 }
    unset %dialog.nbre
  }
}

dialog mp3 {
  title Player MP3
  size -1 -1 300 260

  button "Fermer",1,110 230 80 25,ok
  edit "MP3",2,5 5 240 20
  button "MP3",21,250 5 45 20
  button "Jouer",3,5 230 75 25
  button "Stop",4,220 230 75  25

  text "Album : ",5,5 30 140 20
  text "Titre : ",6,5 55 140 20
  text "Artiste : ",7,5 80 140 20
  text "Année : ",8,5 105 140 20
  text "Commentaire : ",9,5 130 140 20
  text "Genre : ",10,5 155 140 20
  text "Piste : ",11,5 180 140 20
  text "Longueur : ",12,5 205 140 20
  text "Version : ",13,155 30 140 20
  text "Débit : ",14,155 55 140 20
  text "Variable : ",15,155 80 140 20
  text "Sample : ",16,155 105 140 20
  text "Mode : ",17,155 130 140 20
  text "Copyright : ",18,155 155 140 20
  text "Privé : ",19,155 180 140 20
  text "CRC : ",20,155 205 140 20
}

alias mp3truefalse {
  if $1 == $true return Oui
  else return Non
}

alias mp3choose {
  set %mp3 $file="ChOisIs ton MP3" [ [ $readini mirc.ini dirs mp3s ] $+ \*.mp3 ]
  did -ra mp3 2 $nopath(%mp3)
  did -ra mp3 5 Album : $mp3(%mp3).album
  did -ra mp3 6 Titre : $mp3(%mp3).title
  did -ra mp3 7 Artiste : $mp3(%mp3).artist
  did -ra mp3 8  Année : $mp3(%mp3).year
  did -ra mp3 9 $mp3(%mp3).comment
  did -ra mp3 10 Genre : $mp3(%mp3).genre
  did -ra mp3 11 Piste : $mp3(%mp3).track
  did -ra mp3 12 Longueur : $duration($calc($mp3(%mp3).length / 1024))
  did -ra mp3 13 Version : $mp3(%mp3).version
  did -ra mp3 14 Débit : $mp3(%mp3).bitrate kbps
  did -ra mp3 15 Variable : $mp3truefalse($mp3(%mp3).variable)
  did -ra mp3 16 Sample : $mp3(%mp3).sample khz
  did -ra mp3 17 Mode : $mp3(%mp3).mode
  did -ra mp3 18 Copyright : $mp3truefalse($mp3(%mp3).copyright)
  did -ra mp3 19 Privé : $mp3truefalse($mp3(%mp3).private)
  did -ra mp3 20 CRC : $mp3truefalse($mp3(%mp3).crc)
}

on *:dialog:mp3:sclick:21:{
  editbox -s /mp3choose $+ $chr(13) $+ $chr(10)
}

on *:dialog:mp3:sclick:4:splay STOP

on *:dialog:mp3:sclick:3:{
  did -ra mp3 5 Album : $mp3(%mp3).album
  did -ra mp3 6 Titre : $mp3(%mp3).title
  did -ra mp3 7 Artiste : $mp3(%mp3).artist
  did -ra mp3 8  Année : $mp3(%mp3).year
  did -ra mp3 9 $mp3(%mp3).comment
  did -ra mp3 10 Genre : $mp3(%mp3).genre
  did -ra mp3 11 Piste : $mp3(%mp3).track
  did -ra mp3 12 Longueur : $duration($calc($mp3(%mp3).length / 1024))
  did -ra mp3 13 Version : $mp3(%mp3).version
  did -ra mp3 14 Débit : $mp3(%mp3).bitrate kbps
  did -ra mp3 15 Variable : $mp3truefalse($mp3(%mp3).variable)
  did -ra mp3 16 Sample : $mp3(%mp3).sample khz
  did -ra mp3 17 Mode : $mp3(%mp3).mode
  did -ra mp3 18 Copyright : $mp3truefalse($mp3(%mp3).copyright)
  did -ra mp3 19 Privé : $mp3truefalse($mp3(%mp3).private)
  did -ra mp3 20 CRC : $mp3truefalse($mp3(%mp3).crc)
  mp3ame
  splay %mp3
}

alias mp3ame {
  if $server == $null halt
  set %mp3.title $mp3(%mp3).title
  if %mp3.title == $null || %mp3.title == "" { set %mp3.title $nopath(%mp3) }
  set %mp3.artist $mp3(%mp3).artist
  if %mp3.artist == $null || %mp3.artist = "" { set %mp3.artist Artiste Inconnu }
  set %mp3.duration $duration($calc($mp3(%mp3).length / 1024))
  echo -a 4[9 %mp3.artist 4]12 -4[9 %mp3.title 4]12 -4[9 %mp3.duration 4]
  unset %mp3.*
}

Conclusion :


Eh bien vous mettez cela dans vos remote et voila c'est bon
Ser maladie musicalement transmisible :) lol

A voir également

Ajouter un commentaire Commentaire
Messages postés
199
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
7 avril 2005

Trop incomplet.
Pas de playlist.
...

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.