begin process at 2010 02 09 16:54:44
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > LECTEUR @MP3 ET BIEN SUR LA PITITE @PLAYLIST KI VA AC ( TOUT EN PIKWIN )

LECTEUR @MP3 ET BIEN SUR LA PITITE @PLAYLIST KI VA AC ( TOUT EN PIKWIN )


 Information sur la source

Note :
Aucune note
Catégorie :AddOns Classé sous :mp3, playlist, player, musique, picwin Niveau :Débutant Date de création :08/09/2003 Date de mise à jour :05/10/2003 22:47:14 Vu / téléchargé :2 859 / 157

Auteur : abdoulax

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (8)
Ajouter un commentaire et/ou une note


 Description

Cliquez pour voir la capture en taille normale
Tout ds le ZIP , sinon g laisser mon ancienne version pr les curieux ....

pour changer les skins il fo remplacer le nom du skin par minimp3.jpg

####################
## ancien commentaire ##
####################

derniere modification ajout de control volume & d'info sur le mp3 .

bon hier gt motiver , ct le week end , il faisait pas baux dc pr une fois g pas fais une source bidon ac trois lignes . J'avais déjà poster un lecteur mp3 , dailleur ct ma premiere source ( lol ct ya un moment , mem si elle était pas mal pr une premiere source ms elle été trop compliqué ac des lignes en trop ... ) .

Donc voilà , je poste un nouvo lecteur mp3 en pikwin que je contes optimiser ac déjà  pas mal de fonctions ( les basic ) . Je poste cette source ki n'est que béta pr que vs m'aidier à l'améliorer en m'informant des erreurs que j'aurai pue faire et aussi en me donnant quelque idées . J'espere que cette source va vs plaire ...

    

Source

  • ##############
  • ## ancien script ##
  • ##############
  • --------------------------------------------------------------------------------------
  • ********************************** by abdoulax *****************************en cours *
  • --------------------------------------------------------------------------------------
  • alias mp3 { .timer 1 .1 { mp3suite } | window -doapBkC +dL @mp3 1 1 400 20 | set %play off }
  • alias mp3suite {
  • drawrect -f @mp3 12 1 0 0 400 20
  • drawrect @mp3 4 1 0 0 400 20
  • mp3suite2
  • drawrect -f @mp3 1 1 150 2 225 16
  • }
  • alias mp3suite2 {
  • drawtext @MP3 4 10 2 <
  • drawtext @MP3 4 30 2 <<
  • if ( %play == off ) {
  • drawtext @MP3 4 60 2 >
  • drawline @mp3 4 1 60 5 60 16
  • }
  • else { drawtext @MP3 4 60 2  }
  • drawtext @MP3 4 80 2 >>
  • drawtext @MP3 4 110 2 >
  • drawtext @MP3 4 130 2  
  • drawline @mp3 4 1 131 5 141 5
  • drawline @mp3 4 1 131 15 141 15
  • drawtext @MP3 4 385 2 X
  • }
  • alias mp3suite3 {
  • drawrect -f @mp3 12 1 375 1 24 18
  • if ($mouse.x >= 385) && ($mouse.x <= 395) && ($mouse.y >= 2) && ($mouse.y <= 18) { drawtext @MP3 11 385 2 X }
  • else { drawtext @MP3 4 385 2 X }
  • }
  • alias placemp3 { window @mp3 $calc($mouse.dx - $1) $calc($mouse.dy - $2) | if ($mouse.key & 1) .timer $+ $ticks -m 1 0 placemp3 $1- }
  • menu @mp3 {
  • mouse {
  • if ($mouse.x >= 9) && ($mouse.x <= 18) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 10 2 < }
  • elseif ($mouse.x >= 30) && ($mouse.x <= 40) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 30 2 << }
  • elseif ($mouse.x >= 60) && ($mouse.x <= 70) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | if ( %play == off ) { drawtext @MP3 11 60 2 > | drawline @mp3 11 1 60 5 60 16 } | else { drawtext @MP3 11 60 2  } }
  • elseif ($mouse.x >= 80) && ($mouse.x <= 90) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 80 2 >> }
  • elseif ($mouse.x >= 110) && ($mouse.x <= 120) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 110 2 > }
  • elseif ($mouse.x >= 130) && ($mouse.x <= 140) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 130 2   | drawline @mp3 11 1 131 5 141 5 | drawline @mp3 11 1 131 15 141 15 }
  • elseif ($mouse.x >= 385) && ($mouse.x <= 395) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 385 2 X }
  • elseif ( %mp3sel == sel ) { mp3suite2 | unset %mp3sel }
  • }
  • sclick {
  • if ($mouse.x >= 385) && ($mouse.x <= 395) && ($mouse.y >= 2) && ($mouse.y <= 18) { window -c @mp3 | .timermp3 off | splay -wmp stop | unsetmp3 }
  • elseif ($mouse.x >= 60) && ($mouse.x <= 70) && ($mouse.y >= 2) && ($mouse.y <= 18) { playmp3 }
  • elseif ($mouse.x >= 130) && ($mouse.x <= 140) && ($mouse.y >= 2) && ($mouse.y <= 18) { mp3playstop }
  • elseif ($mouse.x >= 80) && ($mouse.x <= 90) && ($mouse.y >= 2) && ($mouse.y <= 18) { splay seek $calc( $inmp3.pos + 10000 ) | set %ctimemp3 $calc(%ctimemp3 - 10 ) | textmp3suite2 }
  • elseif ($mouse.x >= 30) && ($mouse.x <= 40) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( $calc( $calc($inmp3.pos - 10000 ) - 10000 ) > 0 ) { set %ctimemp3 $calc(%ctimemp3 + 10 ) } | else { set %ctimemp3 $ctime } | splay seek $calc($inmp3.pos - 10000 ) | textmp3suite2 }
  • elseif ($mouse.x >= 110) && ($mouse.x <= 120) && ($mouse.y >= 2) && ($mouse.y <= 18) { mp3playstop | playlistinc | playmp3 }
  • elseif ($mouse.x >= 9) && ($mouse.x <= 18) && ($mouse.y >= 2) && ($mouse.y <= 18) { mp3playstop | playlistmoins | playmp3 }
  • else { placemp3 $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }
  • }
  • view
  • .toujours visible
  • .. on :/window -o @mp3
  • .. off :/window -u @mp3
  • .minimize :/window -n @mp3
  • -
  • play
  • .play mp3 :/set %readmp3 $$sfile( sound\*.mp3, Choix du mp3, add) | unset %playlist | if ( $window(@playlist) != $null ) { window -c @playlist } | mp3playstop | playmp3
  • .playlist
  • ..play folder :/set %playlistfolder $$sdir( sound\*.mp3, Choix du repertoir, add) | set %playlist folder | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $findfile(%playlistfolder,*.mp3,1,return) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  • ..play playlist :/ set %persolist $$sfile( sound\*.m3u, Choix de la playlist, add) | set %playlistperso perso | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $read(%persolist,1) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  • ..-
  • ..ouvrir :/playlist
  • repeat ( $+ %repeatmp3 $+ )
  • . on :/set %repeatmp3 on
  • .off :/set %repeatmp3 off
  • anoncer
  • .sur tous les chan ( $+ %mp3chan $+ )
  • ..on :/set %mp3chan on
  • ..off :/set %mp3chan off
  • .sur ? ( $+ %mp3chanperso $+ )
  • .. add :/set %mp3chanperso $$?="entrer un chan"
  • .. clear :/unset %mp3chanperso
  • configuration :/dialog -m mp3 mp3
  • info :/infomp3
  • volume :/mp3volume
  • -
  • close :/window -c @mp3 | .timermp3 off | splay -wmp stop | unsetmp3
  • }
  • alias mp3playstop { .timermp3 off | splay -wmp stop | unsetmp3 1 | set %play off | mp3suite }
  • alias unsetmp3 {
  • unset %pausemp3
  • unset %pausetime
  • unset %ctimemp3
  • unset %seekmp3
  • unset %mp3plus
  • unset %seek
  • unset %mp3sel
  • unset %m
  • if ( $1 == $null ) { unset %play }
  • }
  • alias playmp3 {
  • if ( %play == off ) {
  • if ( %mp3read == $null ) { set %mp3read $$sfile( sound\*.mp3, Choix du fichier son, add) | settextmp3 }
  • if ( %pausemp3 == $null ) { splay -wmp %mp3read | set %ctimemp3 $ctime | set %m 1 }
  • else { unset %pausemp3 | splay -wmp resume | set %ctimemp3 $calc($ctime - %pausetime) | unset %pausetime }
  • .timermp3 0 1 textmp3
  • set %play on
  • mp3suite
  • if ( %mp3chan == on ) { /ame listen :12 $nopath(%mp3read) }
  • if ( %mp3chanperso != $null ) { notice %mp3chanperso listen :12 $nopath(%mp3read) }
  • }
  • else {
  • set %pausemp3 1
  • .timermp3 off
  • splay -wmp pause
  • set %play off
  • mp3suite2
  • set %pausetime $calc($ctime - %ctimemp3)
  • mp3suite
  • textmp3suite
  • mp3suite3
  • }
  • }
  • alias textmp3 { drawrect -f @mp3 1 1 150 2 225 16 | textmp3suite | if ( $len($nopath(%mp3text)) > 23 ) { if ( $calc($len($nopath(%mp3text)) -(20 + %m ))) { inc %m } | else set %m 1 } | mp3suite3 }
  • alias textmp3suite { drawtext @mp3 4 152 2 $asctime($calc($ctime - %ctimemp3),n:ss) - $mid($nopath(%mp3text),%m,$len(%mp3text)) }
  • alias settextmp3 { if ( $sound(%mp3read).title != null ) { set %mp3text $sound(%mp3read).title } | else { set %mp3text %mp3read } | if ( $window(@mp3info) != $null ) { infomp3 } }
  • on 1:mp3END:mp3playstop | if ( %repeatmp3 != on ) { playlistinc } | playmp3
  • ========
  • playlist
  • ========
  • menu @playlist {
  • dclick :/mp3playstop | if ( %playlist == folder ) { set %mp3read %playlistfolder $+ \ $+ $sline(@playlist,1) | settextmp3 } | set %nplaymp3th $sline(@playlist,1).ln | playmp3
  • .play folder :/set %playlistfolder $$sdir( sound\*.mp3, Choix du repertoir, add) | set %playlist folder | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $findfile(%playlistfolder,*.mp3,1,return) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  • .play playlist :/ set %persolist $$sfile( sound\*.m3u, Choix de la playlist, add) | set %playlistperso perso | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $read(%persolist,1) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  • -
  • persolist
  • . create :/createplaylist
  • .-
  • . add file :/write %persolist $$sfile( sound\*.mp3, Entrer un mp3, add) | .clear @playlist | playlist
  • . del file :/write -dl $+ $sline(@playlist,1).ln %persolist | playlist
  • }
  • alias createplaylist {
  • set %persolist $$?="entrer le nom de la persolist" $+ .maz
  • write sound\playlist\ $+ %persolist $$sfile( sound\*.mp3, Entrer un premier mp3, add)
  • .clear @playlist
  • set %playlist perso
  • mp3playstop
  • set %nplaymp3th 1 playmp3
  • playlist
  • }
  • alias playlist {
  • window -l @playlist
  • clear @playlist
  • if ( %playlist == folder ) { .echo -a $findfile(%playlistfolder,*.mp3,*,aline 4 @playlist $nopath($1-) ) }
  • if ( %playlist == perso ) {
  • var %l = 1
  • while ( %l <= $lines(%persolist)) {
  • aline 4 @playlist $nopath($read(%persolist, %l ))
  • inc %l
  • }
  • }
  • }
  • alias playlistinc {
  • if ( %playlist == folder ) {
  • if ( %nplaymp3th < $findfile(%playlistfolder,*.mp3,0,return) ) { inc %nplaymp3th }
  • else { set %nplaymp3th 1 }
  • set %mp3read $findfile(%playlistfolder,*.mp3,%nplaymp3th,return)
  • }
  • if ( %playlist == perso ) {
  • if ( %nplaymp3th < $lines(%persolist) ) { inc %nplaymp3th }
  • else { set %nplaymp3th 1 }
  • set %mp3read $read(%persolist,%nplaymp3th)
  • }
  • settextmp3
  • }
  • alias playlistmoins {
  • if ( %playlist == folder ) {
  • if ( %nplaymp3th > 1 ) { set %nplaymp3th $calc( %nplaymp3th - 1 ) }
  • else { set %nplaymp3th $findfile(%playlistfolder,*.mp3,0,return) }
  • set %mp3read $findfile(%playlistfolder,*.mp3,%nplaymp3th,return)
  • }
  • if ( %playlist == perso ) {
  • if ( %nplaymp3th > 1 ) { set %nplaymp3th $calc( %nplaymp3th - 1 ) }
  • else { set %nplaymp3th $lines(%persolist) }
  • set %mp3read $read(%persolist,%nplaymp3th)
  • }
  • settextmp3
  • }
  • ======
  • dialog
  • ======
  • dialog mp3 {
  • title "mp3 by abdoulax"
  • size -1 -1 200 100
  • option dbu
  • button "~~---o?0O@° .:(ok):. °@O0?o---~~",1,4 88 192 8,ok
  • text "en cours de réfléxion et de réalisation",2,4 4 192 80,center
  • }
  • ====
  • info
  • ====
  • alias infomp3 {
  • window -dapBkC +dL @mp3info -1 -1 400 245
  • drawrect -f @mp3info 1 1 0 0 400 245
  • drawrect @mp3info 4 1 0 0 400 245
  • drawtext @mp3info 4 380 3 X
  • drawtext @mp3info 4 4 3 Title :
  • drawtext @mp3info 11 70 3 $sound(%mp3read).title
  • drawtext @mp3info 4 4 18 Artist :
  • drawtext @mp3info 11 70 18 $sound(%mp3read).artist
  • drawtext @mp3info 4 4 33 Year :
  • drawtext @mp3info 11 70 33 $sound(%mp3read).year
  • drawtext @mp3info 4 4 48 Notes :
  • drawtext @mp3info 11 70 48 $sound(%mp3read).comment
  • drawtext @mp3info 4 4 63 Genre :
  • drawtext @mp3info 11 70 63 $sound(%mp3read).genre
  • drawtext @mp3info 4 4 78 Track :
  • drawtext @mp3info 11 70 78 $sound(%mp3read).track
  • drawtext @mp3info 4 4 93 Length :
  • drawtext @mp3info 11 70 93 $sound(%mp3read).length
  • drawtext @mp3info 4 4 108 Version :
  • drawtext @mp3info 11 70 108 $sound(%mp3read).version
  • drawtext @mp3info 4 4 123 Bitrate :
  • drawtext @mp3info 11 70 123 $sound(%mp3read).bitrate Kbps
  • drawtext @mp3info 4 4 138 Vbr :
  • drawtext @mp3info 11 70 138 $replace($replace($sound(%mp3read).vbr,$false,non),$true,oui)
  • drawtext @mp3info 4 4 153 Sample :
  • drawtext @mp3info 11 70 153 $sound(%mp3read).sample Kbps
  • drawtext @mp3info 4 4 168 Mode :
  • drawtext @mp3info 11 70 168 $sound(%mp3read).mode
  • drawtext @mp3info 4 4 183 Copyright :
  • drawtext @mp3info 11 75 183 $replace($replace($sound(%mp3read).copyright,$false,non),$true,oui)
  • drawtext @mp3info 4 4 198 Private :
  • drawtext @mp3info 11 70 198 $replace($replace($sound(%mp3read).private,$false,non),$true,oui)
  • drawtext @mp3info 4 4 213 Crc :
  • drawtext @mp3info 11 70 213 $replace($replace($sound(%mp3read).crc,$false,non),$true,oui)
  • drawtext @mp3info 4 4 228 Files :
  • drawtext @mp3info 11 70 228 $nopath(%mp3read)
  • }
  • alias placemp3info { window @mp3info $calc($mouse.dx - $1) $calc($mouse.dy - $2) | if ($mouse.key & 1) .timer $+ $ticks -m 1 0 placemp3info $1- }
  • menu @mp3info {
  • mouse {
  • if ($mouse.x >= 380) && ($mouse.x <= 395) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @mp3info 11 380 3 X }
  • elseif ( %mp3sel != $null ) { unsetset %mp3sel | drawtext @mp3info 4 380 3 X }
  • }
  • sclick {
  • if ($mouse.x >= 380) && ($mouse.x <= 395) && ($mouse.y >= 3) && ($mouse.y <= 18) { window -c @mp3info }
  • else { placemp3info $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }
  • }
  • close :/window -c @mp3info
  • }
  • ======
  • volume
  • ======
  • alias mp3volume {
  • window -dapBkC +dL @volmp3 -1 -1 220 230
  • drawrect -f @volmp3 1 1 0 0 220 230
  • drawrect @volmp3 4 1 0 0 220 230
  • drawtext @volmp3 4 200 3 X
  • drawtext @volmp3 4 12 3 mp3
  • drawtext @volmp3 4 60 3 wave
  • drawtext @volmp3 4 110 3 midi
  • drawtext @volmp3 4 167 3 all
  • drawrect -f @volmp3 12 1 18 22 14 172
  • drawrect -f @volmp3 12 1 68 22 14 172
  • drawrect -f @volmp3 12 1 118 22 14 172
  • drawrect -f @volmp3 12 1 168 22 14 172
  • drawtext @volmp3 4 38 100 50%
  • drawtext @volmp3 4 88 100 50%
  • drawtext @volmp3 4 138 100 50%
  • drawtext @volmp3 4 188 100 50%
  • drawline @volmp3 4 1 34 108 38 108
  • drawline @volmp3 4 1 84 108 88 108
  • drawline @volmp3 4 1 134 108 138 108
  • drawline @volmp3 4 1 184 108 188 108
  • drawtext @volmp3 4 38 181 0%
  • drawtext @volmp3 4 88 181 0%
  • drawtext @volmp3 4 138 181 0%
  • drawtext @volmp3 4 188 181 0%
  • drawline @volmp3 4 1 34 193 38 193
  • drawline @volmp3 4 1 84 193 88 193
  • drawline @volmp3 4 1 134 193 138 193
  • drawline @volmp3 4 1 184 193 188 193
  • drawrect -f @volmp3 11 1 18 $calc(23+(172-(172/(65000/$vol(mp3))))) 14 $calc(172/(65000/$vol(mp3)))
  • drawrect -f @volmp3 11 1 68 $calc(23+(172-(172/(65000/$vol(wave))))) 14 $calc(172/(65000/$vol(wave)))
  • drawrect -f @volmp3 11 1 118 $calc(23+(172-(172/(65000/$vol(midi))))) 14 $calc(172/(65000/$vol(midi)))
  • drawrect -f @volmp3 11 1 168 $calc(23+(172-(172/(65000/$vol(master))))) 14 $calc(172/(65000/$vol(master)))
  • drawtext @volmp3 4 10 202 $mid($calc((100/(65000/$vol(mp3)))),1,4) $+ %
  • drawtext @volmp3 4 60 202 $mid($calc((100/(65000/$vol(wave)))),1,4) $+ %
  • drawtext @volmp3 4 110 202 $mid($calc((100/(65000/$vol(midi)))),1,4) $+ %
  • drawtext @volmp3 4 160 202 $mid($calc((100/(65000/$vol(master)))),1,4) $+ %
  • if ( $vol(mp3).mute == $true ) drawrect -f @volmp3 14 1 18 23 14 172
  • if ( $vol(wave).mute == $true ) drawrect -f @volmp3 14 1 68 23 14 172
  • if ( $vol(midi).mute == $true ) drawrect -f @volmp3 14 1 118 23 14 172
  • if ( $vol(master).mute == $true ) drawrect -f @volmp3 14 1 168 23 14 172
  • }
  • alias placemp3vol { window @volmp3 $calc($mouse.dx - $1) $calc($mouse.dy - $2) | if ($mouse.key & 1) .timer $+ $ticks -m 1 0 placemp3vol $1- }
  • menu @volmp3 {
  • sclick {
  • if ($mouse.x >= 18) && ($mouse.x <= 32) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -p $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume }
  • elseif ($mouse.x >= 68) && ($mouse.x <= 82) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -w $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume }
  • elseif ($mouse.x >= 118) && ($mouse.x <= 132) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -m $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume }
  • elseif ($mouse.x >= 168) && ($mouse.x <= 182) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -v $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume }
  • elseif ($mouse.x >= 200) && ($mouse.x <= 215) && ($mouse.y >= 3) && ($mouse.y <= 18) { window -c @volmp3 }
  • elseif ($mouse.x >= 12) && ($mouse.x <= 40) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(mp3).mute == $true ) { vol -pu2 } | else { vol -pu1 } | mp3volume }
  • elseif ($mouse.x >= 60) && ($mouse.x <= 95) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(wave).mute == $true ) { vol -wu2 } | else { vol -wu1 } | mp3volume }
  • elseif ($mouse.x >= 110) && ($mouse.x <= 138) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(midi).mute == $true ) { vol -mu2 } | else { vol -mu1 } | mp3volume }
  • elseif ($mouse.x >= 167) && ($mouse.x <= 183) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(master).mute == $true ) { vol -vu2 } | else { vol -vu1 } | mp3volume }
  • else { placemp3vol $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }
  • }
  • mouse {
  • if ($mouse.x >= 200) && ($mouse.x <= 215) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 200 3 X }
  • elseif ($mouse.x >= 12) && ($mouse.x <= 40) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 12 3 mp3 }
  • elseif ($mouse.x >= 60) && ($mouse.x <= 95) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 60 3 wave }
  • elseif ($mouse.x >= 110) && ($mouse.x <= 138) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 110 3 midi }
  • elseif ($mouse.x >= 167) && ($mouse.x <= 183) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 167 3 all }
  • elseif ( %mp3sel != $null ) { unset %mp3sel | mp3volume }
  • }
  • close :/window -c @volmp3
  • }
##############
## ancien script ##
##############



--------------------------------------------------------------------------------------
********************************** by abdoulax *****************************en cours *
--------------------------------------------------------------------------------------


alias mp3 { .timer 1 .1 { mp3suite } | window -doapBkC +dL @mp3 1 1 400 20 | set %play off }

alias mp3suite {
  drawrect -f @mp3 12 1 0 0 400 20 
  drawrect @mp3 4 1 0 0 400 20
  mp3suite2
  drawrect -f @mp3 1 1 150 2 225 16
}
alias mp3suite2 {
  drawtext @MP3 4 10 2 <
  drawtext @MP3 4 30 2 <<
  if ( %play == off ) {
    drawtext @MP3 4 60 2 >
    drawline @mp3 4 1 60 5 60 16
  }
  else { drawtext @MP3 4 60 2  }
  drawtext @MP3 4 80 2 >>
  drawtext @MP3 4 110 2 > 
  drawtext @MP3 4 130 2   
  drawline @mp3 4 1 131 5 141 5
  drawline @mp3 4 1 131 15 141 15
  drawtext @MP3 4 385 2 X
}
alias mp3suite3 {
  drawrect -f @mp3 12 1 375 1 24 18
  if ($mouse.x >= 385) && ($mouse.x <= 395) && ($mouse.y >= 2) && ($mouse.y <= 18) { drawtext @MP3 11 385 2 X }
  else { drawtext @MP3 4 385 2 X }
}

alias placemp3 {  window @mp3 $calc($mouse.dx - $1) $calc($mouse.dy - $2) | if ($mouse.key & 1) .timer $+ $ticks -m 1 0 placemp3 $1- }


menu @mp3 {
  mouse { 
    if ($mouse.x >= 9) && ($mouse.x <= 18) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 10 2 < } 
    elseif ($mouse.x >= 30) && ($mouse.x <= 40) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 30 2 << } 
    elseif ($mouse.x >= 60) && ($mouse.x <= 70) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | if ( %play == off ) { drawtext @MP3 11 60 2 > | drawline @mp3 11 1 60 5 60 16 } | else { drawtext @MP3 11 60 2  } }
    elseif ($mouse.x >= 80) && ($mouse.x <= 90) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 80 2 >> }
    elseif ($mouse.x >= 110) && ($mouse.x <= 120) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 110 2 > }
    elseif ($mouse.x >= 130) && ($mouse.x <= 140) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 130 2   | drawline @mp3 11 1 131 5 141 5 | drawline @mp3 11 1 131 15 141 15 }
    elseif ($mouse.x >= 385) && ($mouse.x <= 395) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( %mp3sel != sel ) { set %mp3sel sel } | drawtext @MP3 11 385 2 X }
    elseif ( %mp3sel == sel ) { mp3suite2 | unset %mp3sel }
  }
  sclick {
    if ($mouse.x >= 385) && ($mouse.x <= 395) && ($mouse.y >= 2) && ($mouse.y <= 18) { window -c @mp3 | .timermp3 off | splay -wmp stop | unsetmp3 }
    elseif ($mouse.x >= 60) && ($mouse.x <= 70) && ($mouse.y >= 2) && ($mouse.y <= 18) { playmp3 }
    elseif ($mouse.x >= 130) && ($mouse.x <= 140) && ($mouse.y >= 2) && ($mouse.y <= 18) { mp3playstop }
    elseif ($mouse.x >= 80) && ($mouse.x <= 90) && ($mouse.y >= 2) && ($mouse.y <= 18) { splay seek $calc( $inmp3.pos + 10000 ) | set %ctimemp3 $calc(%ctimemp3 - 10 ) | textmp3suite2 }
    elseif ($mouse.x >= 30) && ($mouse.x <= 40) && ($mouse.y >= 2) && ($mouse.y <= 18) { if ( $calc( $calc($inmp3.pos - 10000 ) - 10000 ) > 0 ) { set %ctimemp3 $calc(%ctimemp3 + 10 ) } | else { set %ctimemp3 $ctime } | splay seek $calc($inmp3.pos - 10000 ) | textmp3suite2 }
    elseif ($mouse.x >= 110) && ($mouse.x <= 120) && ($mouse.y >= 2) && ($mouse.y <= 18) { mp3playstop | playlistinc | playmp3 }
    elseif ($mouse.x >= 9) && ($mouse.x <= 18) && ($mouse.y >= 2) && ($mouse.y <= 18) { mp3playstop | playlistmoins | playmp3 }
    else { placemp3 $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }
  }
  view
  .toujours visible
  .. on :/window -o @mp3
  .. off :/window -u @mp3
  .minimize :/window -n @mp3
  -
  play
  .play mp3 :/set %readmp3 $$sfile( sound\*.mp3, Choix du mp3, add) | unset %playlist | if ( $window(@playlist) != $null ) { window -c @playlist } | mp3playstop | playmp3
  .playlist 
  ..play folder :/set %playlistfolder $$sdir( sound\*.mp3, Choix du repertoir, add) | set %playlist folder | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $findfile(%playlistfolder,*.mp3,1,return) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  ..play playlist :/ set %persolist $$sfile( sound\*.m3u, Choix de la playlist, add) | set %playlistperso perso | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $read(%persolist,1) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  ..-
  ..ouvrir :/playlist
  repeat ( $+ %repeatmp3 $+ )
  . on :/set %repeatmp3 on
  .off :/set %repeatmp3 off
  anoncer 
  .sur tous les chan ( $+ %mp3chan $+ )
  ..on :/set %mp3chan on
  ..off :/set %mp3chan off
  .sur ? ( $+ %mp3chanperso $+ )
  .. add :/set %mp3chanperso $$?="entrer un chan"
  .. clear :/unset %mp3chanperso
  configuration :/dialog -m mp3 mp3
  info :/infomp3
  volume :/mp3volume
  -
  close :/window -c @mp3 | .timermp3 off | splay -wmp stop | unsetmp3
}
alias mp3playstop { .timermp3 off | splay -wmp stop | unsetmp3 1 | set %play off | mp3suite }
alias unsetmp3 {
  unset %pausemp3 
  unset %pausetime
  unset %ctimemp3
  unset %seekmp3
  unset %mp3plus 
  unset %seek 
  unset %mp3sel  
  unset %m
  if ( $1 == $null ) { unset %play }
}

alias playmp3 { 
  if ( %play == off ) { 
    if ( %mp3read == $null ) { set %mp3read $$sfile( sound\*.mp3, Choix du fichier son, add) | settextmp3 }  
    if ( %pausemp3 == $null ) { splay -wmp %mp3read | set %ctimemp3 $ctime | set %m 1 }
    else { unset %pausemp3 | splay -wmp resume | set %ctimemp3 $calc($ctime - %pausetime) | unset %pausetime } 
    .timermp3 0 1 textmp3
    set %play on 
    mp3suite
    if ( %mp3chan == on ) { /ame listen :12 $nopath(%mp3read) }
    if ( %mp3chanperso != $null ) { notice %mp3chanperso listen :12 $nopath(%mp3read) }
  }
  else { 
    set %pausemp3 1 
    .timermp3 off
    splay -wmp pause 
    set %play off
    mp3suite2
    set %pausetime $calc($ctime - %ctimemp3)
    mp3suite
    textmp3suite
    mp3suite3
  }
}
alias textmp3 { drawrect -f @mp3 1 1 150 2 225 16 | textmp3suite | if ( $len($nopath(%mp3text)) > 23 ) { if ( $calc($len($nopath(%mp3text)) -(20 + %m ))) { inc %m } | else set %m 1 } | mp3suite3 }
alias textmp3suite { drawtext @mp3 4 152 2 $asctime($calc($ctime - %ctimemp3),n:ss) - $mid($nopath(%mp3text),%m,$len(%mp3text)) }

alias settextmp3 { if ( $sound(%mp3read).title != null ) { set %mp3text $sound(%mp3read).title } | else { set %mp3text %mp3read } | if ( $window(@mp3info) != $null ) { infomp3 } }

on 1:mp3END:mp3playstop | if ( %repeatmp3 != on ) { playlistinc } | playmp3



========
playlist
========

menu @playlist {
  dclick :/mp3playstop | if ( %playlist == folder ) { set %mp3read %playlistfolder $+ \ $+ $sline(@playlist,1) | settextmp3 } | set %nplaymp3th $sline(@playlist,1).ln | playmp3
  .play folder :/set %playlistfolder $$sdir( sound\*.mp3, Choix du repertoir, add) | set %playlist folder | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $findfile(%playlistfolder,*.mp3,1,return) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  .play playlist :/ set %persolist $$sfile( sound\*.m3u, Choix de la playlist, add) | set %playlistperso perso | if ( $window(@playlist) != $null ) { .clear @playlist } | mp3playstop | set %nplaymp3th 1 | set %mp3read $read(%persolist,1) | settextmp3 | playmp3 | if ( $window(@playlist) != $null ) { playlist }
  -
  persolist 
  . create :/createplaylist
  .-
  . add file :/write %persolist $$sfile( sound\*.mp3, Entrer un  mp3, add) | .clear @playlist | playlist 
  . del file :/write -dl $+ $sline(@playlist,1).ln %persolist | playlist
}
alias createplaylist {
  set %persolist $$?="entrer le nom de la persolist" $+ .maz
  write sound\playlist\ $+ %persolist $$sfile( sound\*.mp3, Entrer un premier mp3, add)
  .clear @playlist
  set %playlist perso 
  mp3playstop 
  set %nplaymp3th 1  playmp3 
  playlist
}
alias playlist { 
  window -l @playlist
  clear @playlist 
  if ( %playlist == folder ) { .echo -a $findfile(%playlistfolder,*.mp3,*,aline 4 @playlist $nopath($1-) ) } 
  if ( %playlist == perso ) { 
    var %l = 1 
    while ( %l <= $lines(%persolist)) { 
      aline 4 @playlist $nopath($read(%persolist, %l ))  
      inc %l 
    } 
  }
} 

alias playlistinc {
  if ( %playlist == folder ) { 
    if ( %nplaymp3th < $findfile(%playlistfolder,*.mp3,0,return) ) { inc %nplaymp3th }
    else { set %nplaymp3th 1 }
    set %mp3read $findfile(%playlistfolder,*.mp3,%nplaymp3th,return)
  }
  if ( %playlist == perso ) { 
    if ( %nplaymp3th < $lines(%persolist) ) { inc %nplaymp3th }
    else { set %nplaymp3th 1 }
    set %mp3read $read(%persolist,%nplaymp3th)
  }
  settextmp3
}

alias playlistmoins {
  if ( %playlist == folder ) { 
    if ( %nplaymp3th > 1 ) { set %nplaymp3th $calc( %nplaymp3th - 1 ) }
    else { set %nplaymp3th $findfile(%playlistfolder,*.mp3,0,return) }
    set %mp3read $findfile(%playlistfolder,*.mp3,%nplaymp3th,return)
  }
  if ( %playlist == perso ) { 
    if ( %nplaymp3th > 1 ) { set %nplaymp3th $calc( %nplaymp3th - 1 ) }
    else { set %nplaymp3th $lines(%persolist) }
    set %mp3read $read(%persolist,%nplaymp3th)
  }
  settextmp3
}

======
dialog
======

dialog mp3 {
  title "mp3 by abdoulax"
  size -1 -1 200 100
  option dbu
  button "~~---o?0O@° .:(ok):. °@O0?o---~~",1,4 88 192 8,ok
  text "en cours de réfléxion et de  réalisation",2,4 4 192 80,center
}

====
info
====

alias infomp3 { 
  window -dapBkC +dL @mp3info -1 -1 400 245
  drawrect -f @mp3info 1 1 0 0 400 245 
  drawrect @mp3info 4 1 0 0 400 245
  drawtext @mp3info 4 380 3 X
  drawtext @mp3info 4 4 3 Title :
  drawtext @mp3info 11 70 3 $sound(%mp3read).title
  drawtext @mp3info 4 4 18 Artist : 
  drawtext @mp3info 11 70 18 $sound(%mp3read).artist
  drawtext @mp3info 4 4 33 Year : 
  drawtext @mp3info 11 70 33 $sound(%mp3read).year
  drawtext @mp3info 4 4 48 Notes : 
  drawtext @mp3info 11 70 48 $sound(%mp3read).comment
  drawtext @mp3info 4 4 63 Genre : 
  drawtext @mp3info 11 70 63 $sound(%mp3read).genre
  drawtext @mp3info 4 4 78 Track : 
  drawtext @mp3info 11 70 78 $sound(%mp3read).track 
  drawtext @mp3info 4 4 93 Length : 
  drawtext @mp3info 11 70 93 $sound(%mp3read).length
  drawtext @mp3info 4 4 108 Version :
  drawtext @mp3info 11 70 108 $sound(%mp3read).version 
  drawtext @mp3info 4 4 123 Bitrate : 
  drawtext @mp3info 11 70 123 $sound(%mp3read).bitrate Kbps
  drawtext @mp3info 4 4 138 Vbr : 
  drawtext @mp3info 11 70 138 $replace($replace($sound(%mp3read).vbr,$false,non),$true,oui)
  drawtext @mp3info 4 4 153 Sample : 
  drawtext @mp3info 11 70 153 $sound(%mp3read).sample Kbps
  drawtext @mp3info 4 4 168 Mode : 
  drawtext @mp3info 11 70 168 $sound(%mp3read).mode
  drawtext @mp3info 4 4 183 Copyright : 
  drawtext @mp3info 11 75 183 $replace($replace($sound(%mp3read).copyright,$false,non),$true,oui)
  drawtext @mp3info 4 4 198 Private : 
  drawtext @mp3info 11 70 198 $replace($replace($sound(%mp3read).private,$false,non),$true,oui)
  drawtext @mp3info 4 4 213 Crc : 
  drawtext @mp3info 11 70 213 $replace($replace($sound(%mp3read).crc,$false,non),$true,oui)
  drawtext @mp3info 4 4 228 Files :
  drawtext @mp3info 11 70 228 $nopath(%mp3read)
}
alias placemp3info {  window @mp3info $calc($mouse.dx - $1) $calc($mouse.dy - $2) | if ($mouse.key & 1) .timer $+ $ticks -m 1 0 placemp3info $1- }
menu @mp3info {
  mouse { 
    if ($mouse.x >= 380) && ($mouse.x <= 395) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @mp3info 11 380 3 X }
    elseif ( %mp3sel != $null ) { unsetset %mp3sel | drawtext @mp3info 4 380 3 X }
  }
  sclick {
    if ($mouse.x >= 380) && ($mouse.x <= 395) && ($mouse.y >= 3) && ($mouse.y <= 18) { window -c @mp3info }
    else { placemp3info $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }
  }
  close :/window -c @mp3info
}

======
volume
======

alias mp3volume { 
  window -dapBkC +dL @volmp3 -1 -1 220 230
  drawrect -f @volmp3 1 1 0 0 220 230 
  drawrect @volmp3 4 1 0 0 220 230
  drawtext @volmp3 4 200 3 X
  drawtext @volmp3 4 12 3 mp3
  drawtext @volmp3 4 60 3 wave
  drawtext @volmp3 4 110 3 midi
  drawtext @volmp3 4 167 3 all

  drawrect -f @volmp3 12 1 18 22 14 172
  drawrect -f @volmp3 12 1 68 22 14 172
  drawrect -f @volmp3 12 1 118 22 14 172
  drawrect -f @volmp3 12 1 168 22 14 172

  drawtext @volmp3 4 38 100 50%
  drawtext @volmp3 4 88 100 50%
  drawtext @volmp3 4 138 100 50%
  drawtext @volmp3 4 188 100 50%
  drawline @volmp3 4 1 34 108 38 108
  drawline @volmp3 4 1 84 108 88 108
  drawline @volmp3 4 1 134 108 138 108
  drawline @volmp3 4 1 184 108 188 108

  drawtext @volmp3 4 38 181 0%
  drawtext @volmp3 4 88 181 0%
  drawtext @volmp3 4 138 181 0%
  drawtext @volmp3 4 188 181 0%
  drawline @volmp3 4 1 34 193 38 193
  drawline @volmp3 4 1 84 193 88 193
  drawline @volmp3 4 1 134 193 138 193
  drawline @volmp3 4 1 184 193 188 193

  drawrect -f @volmp3 11 1 18 $calc(23+(172-(172/(65000/$vol(mp3))))) 14 $calc(172/(65000/$vol(mp3)))
  drawrect -f @volmp3 11 1 68 $calc(23+(172-(172/(65000/$vol(wave))))) 14 $calc(172/(65000/$vol(wave)))
  drawrect -f @volmp3 11 1 118 $calc(23+(172-(172/(65000/$vol(midi))))) 14 $calc(172/(65000/$vol(midi)))
  drawrect -f @volmp3 11 1 168 $calc(23+(172-(172/(65000/$vol(master))))) 14 $calc(172/(65000/$vol(master)))

  drawtext @volmp3 4 10 202 $mid($calc((100/(65000/$vol(mp3)))),1,4) $+ %
  drawtext @volmp3 4 60 202 $mid($calc((100/(65000/$vol(wave)))),1,4) $+ %
  drawtext @volmp3 4 110 202 $mid($calc((100/(65000/$vol(midi)))),1,4) $+ %
  drawtext @volmp3 4 160 202 $mid($calc((100/(65000/$vol(master)))),1,4) $+ %

  if ( $vol(mp3).mute == $true ) drawrect -f @volmp3 14 1 18 23 14 172
  if ( $vol(wave).mute == $true ) drawrect -f @volmp3 14 1 68 23 14 172
  if ( $vol(midi).mute == $true ) drawrect -f @volmp3 14 1 118 23 14 172
  if ( $vol(master).mute == $true ) drawrect -f @volmp3 14 1 168 23 14 172

}
alias placemp3vol {  window @volmp3 $calc($mouse.dx - $1) $calc($mouse.dy - $2) | if ($mouse.key & 1) .timer $+ $ticks -m 1 0 placemp3vol $1- }
menu @volmp3 {
  sclick {
    if ($mouse.x >= 18) && ($mouse.x <= 32) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -p $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume } 
    elseif ($mouse.x >= 68) && ($mouse.x <= 82) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -w $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume } 
    elseif ($mouse.x >= 118) && ($mouse.x <= 132) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -m $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume }
    elseif ($mouse.x >= 168) && ($mouse.x <= 182) && ($mouse.y >= 22) && ($mouse.y <= 194) { vol -v $calc((172-( $mouse.y -22))/(172)*65000) | mp3volume }
    elseif ($mouse.x >= 200) && ($mouse.x <= 215) && ($mouse.y >= 3) && ($mouse.y <= 18) { window -c @volmp3 }
    elseif ($mouse.x >= 12) && ($mouse.x <= 40) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(mp3).mute == $true ) { vol -pu2 } | else { vol -pu1 } | mp3volume }
    elseif ($mouse.x >= 60) && ($mouse.x <= 95) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(wave).mute == $true ) { vol -wu2 } | else { vol -wu1 } | mp3volume }
    elseif ($mouse.x >= 110) && ($mouse.x <= 138) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(midi).mute == $true ) { vol -mu2 } | else { vol -mu1 } | mp3volume }
    elseif ($mouse.x >= 167) && ($mouse.x <= 183) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( $vol(master).mute == $true ) { vol -vu2 } | else { vol -vu1 } | mp3volume }
    else { placemp3vol $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }

  }
  mouse { 
    if ($mouse.x >= 200) && ($mouse.x <= 215) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 200 3 X }
    elseif ($mouse.x >= 12) && ($mouse.x <= 40) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 12 3 mp3 }
    elseif ($mouse.x >= 60) && ($mouse.x <= 95) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 60 3 wave }
    elseif ($mouse.x >= 110) && ($mouse.x <= 138) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 110 3 midi }
    elseif ($mouse.x >= 167) && ($mouse.x <= 183) && ($mouse.y >= 3) && ($mouse.y <= 18) { if ( %mp3sel == $null ) { set %mp3sel sel } | drawtext @volmp3 11 167 3 all }
    elseif ( %mp3sel != $null ) { unset %mp3sel | mp3volume }
  }
  close :/window -c @volmp3
}

 Conclusion

Have fun

by abdoulax  

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip DLL DOS
Source avec Zip WIZZ
SCAN IP SNIPET
Source avec une capture SERVER FTP
Source avec Zip PORT SCANNER

 Sources de la même categorie

BLACKLIST PSEUDOS/MASKS par usurpateur
Source avec une capture [XCHAT] ANTI KICK / AWAY C++ par GeroXXXX
JEU DU CODE par alanpersonproject
SERVEUR FTP par hisoka2501
BANNIR LES AGES, LES HOMMES, LES FEMMES ET PSEUDO AVEC CHIFF... par cougar_du_havre

 Sources en rapport avec celle ci

MP3 SIMPLE EN MOINS DE 100 LIGNES MEME SI C'EST DU DEJA VUE par archeloga
Source avec une capture (MP3 PLAYER) par Mc_AbBeR
LECTEUR MP3, WAV ET WMA par IceTempest
LECTEUR MP3 BY MC_ABBER par Abber
LECTEUR MP3 EN PICKWIN (MODIFIER) par Tommlkj

Commentaires et avis

Commentaire de abdoulax le 08/09/2003 17:55:24

help : je cherche une variable ki me permettrai de trouver la position de la fenettre ( afin de coller @mp3 à @infomp3 ou mem d'utilisé qu'une seul window ....) , j'ai essayé $window(@mp3,dx) ms ça ne marche poa , ca me donne tjs 1 .

Commentaire de abdoulax le 08/09/2003 18:01:04

j'aimerai avoir aussi info sur : Length ( longueur )  , Crc , Vbr

Commentaire de abdoulax le 08/09/2003 18:30:47

à vrai dire je sais que Length  correspond au tps total du mp3 ms j'arrive pas à le traduire en seconde ou en min.

Sinon pr Crc je croi que ca permet de vérifier si cette longueur est verifier ms je suis pas sur .

aider moi

Commentaire de WarDoWn le 08/09/2003 22:51:38

C'est affreux :/

Commentaire de abdoulax le 08/09/2003 23:01:03

dsl ms en pikwin je pe pas te faire des dessin de fou .
g ésité à mettre un dégrader com ds ma source ac le @statcanal ms c tro le bordel dc g préférer ne pa le faire .

ms dès que g le tps je v dessineré des skin pr rendre le fond plus jolie ac plein de couleur ... et je les mettrai ds un zip afin que vs puissiez les télécharger . ms vs pouvé faire vos skin vs mem et aprè il suffi de changer qlq truc pr le charger , c pas compliqé .

Commentaire de thyb le 09/09/2003 21:00:26

heu moi je trouve sa bien enfin sa depend de quel point de vu lol
car au niveau scipting et animation c pas mal mais le truck qui est a ameliorer c le design ( tu prend un skin de winamp et tu decoupe tous les buttons et tous les types d'animation de button et apres tu fais comme pour t button sauf que c avec drawpic (tu met tou tes button sur fond rose et tu l'enleve apres avec le drawpic et c nikel, tu peux refaire winamp avec :p

Commentaire de abdoulax le 09/09/2003 22:32:59

merci thyb , c cool le conseil jy avé pas pensé de prendre un skin déjà fais . c vrai il fo que je fasse des skin ms la je suis parti ds un autre truc dc g pas le tps de d'en faire .

lol

ms bon promis j'en ferais . au moins un lol

+++

Commentaire de InFerNaLeX le 03/03/2006 16:26:43

Ca manque d'une playlist

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Un mp3 et dcc auto [ par romeomd ] VincentBonjour, je suis a la recher d'un addons, quand qqun va dans mon pv, il fait !Musiquealors la, une liste de musique s'affiche, et il fais son c probleme avec un remote pr mp3 !!!!!!!! [ par wizord ] alrs voila le pb .... g un remote pr lire les fichier mp3 par input ... je tape par exemple : !mp3 blable et mon remote est chargé de me trouve la mu Pour ceux qui aiment écouter la musique en tchattant [ par Bestdoud ] Cela fait quelque temps que je réalise un lecteur mp3 en picwin. venez le découvrir à l'adresse suivante: http://amigagaamp.free.fr voici ces caract PicWin Multi-Fonctions : Un p'tit coup de pub [ par RCA ArKanis ] J'osais pas cr&#233;er une nouvelle source pour &#231;a, &#233;tant donn&#233; que le remote pour lequel je pubbe a d&#233;j&#224; &#233;t&#233; envoy Passer une playlist d'une radio sur iRC [ par koskos ] Bonjour, Voil&#224;, j'aimerai savoir comment je pourrai faire pour pouvoir passer les playlist de differentes radios sur IRC &#224; l'aide des comma Remote mp3 et commande play fichier.txt [ par PALOMETTE ] BonjourJ'ai install&#233; un lecteur mp3 en remote qui fonctionne correctement.Le probl&#232;me, c 'est que je ne peux plus utiliser la commande /play Passer une playlist d'une radio sur iRC [ par koskos ] Bonjour à tous!Voilà, j'ai essayé des remotes étant déjà sur ce site pour diffuser le titre d'une musique sur irc, par exemple:lorsque l'on tape: !tit WindowS Media Player on irc [ par Princedelavil ] Bonjour à tous,Je voudrais savoir s'il existe un code permettant de dire la chanson écouté dans Windows Media Player en tapant une commande (!wmp)Si o Picwin dans une window [ par Panthouffle ] Bonjour à tous, je cherches un moyen pour coller une picture window sur la toolbar de mIRC, j'aimerais qu'il n'y ai aucune trace de cette window sauf Picwin [ par atlantisfr ] Comment peut-on créer une liste avec une vsbar en picwin ?


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,030 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales