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
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.