Mp3 en switchbar ( left )

Soyez le premier à donner votre avis sur cette source.

Snippet vu 7 153 fois - Téléchargée 26 fois

Contenu du snippet

bah voila c'est un MP3 avec quelque Options, encastrer dans MIRC qui évite de toujour ouvrir son MP3... moi personélement j'adore lool :D

Source / Exemple :


;----------------( Les Alias )---------------- 

alias ktools { return dll dll\ktools.dll }
alias lag { if ($status != disconnected) { .ctcpreply $me lag $ticks } } 
alias mdx { return dll $scriptdir\mdx.dll }
alias ctl_gen { return dll\ctl_gen.mdx }
alias lagbar { reso | dialog -m mp3 mp3 }
alias reso {
  if ( ( $window(-1).w >= 1024 ) && ( $window(-1).h >= 768 ) ) { 
    set %resolution 810
  }
  else {
    set %resolution 580
  }
}

;----------------( Les Echos )----------------

on *:ping: { .lag }
on *:connect:{ .lag }
on *:disconnect:{ .lag }
on *:active:*:{ .lag }
on *:ctcpreply:lag &:{ 
  if ($nick == $me) && ($2 isnum) { 
    haltdef 
    did -ra mp3 8 $int($calc($calc($ticks - $2) / 200)) | did -ra mp3 19 $calc(($ticks - $2) / 1000) sec  
  } 
}

alias m dialog -md mp3 mp3
alias m+ dialog -x mp3 mp3
dialog mp3 {
  title "->( Mp3 )<-"
  size -1 -1 113 682
  option pixels
  icon icones/mp3.ico, 0
  list 5, 4 69 104 218, size extsel
  check "Mode discret", 999, 19 369 82 16, flat
  button "Play", 1, 2 326 54 18, flat
  button "Stop", 2, 57 326 54 18, flat
  button "Pause", 3, 57 346 54 18, flat
  button "Resumer", 4, 2 346 54 18, flat
  button "Choisir le repertoire", 7, 2 306 108 18, flat
  button "Femer", 18, 270 283 65 15, ok
  edit "", 12, 0 404 109 21
  list 13, 0 424 111 187, size vsbar
  button "Ajouter", 14, 20 386 75 17, flat
  button "Supprimer", 15, 0 611 51 17, flat
  button "Utiliser", 16, 53 611 60 17, flat
  text " Lag :", 6, 4 8 33 16
  text "", 8, 2 30 97 19
  text " 0 sec", 19, 71 54 36 14
  button "+", 9, 2 290 37 15
  button "-", 10, 74 290 37 15
}

on *:dialog:mp3:init:*:{
  dll mdx.dll SetMircVersion $version 
  dll mdx.dll MarkDialog $dname
  dll mdx.dll SetControlMDX $dname 1,2 treeview haslines hasbuttons linesatroot insertdroptarget > $scriptdir\\dll\\views.mdx
  dll mdx.dll SetDialog $dname style tool
  dll mdx.dll SetBorderStyle $dname 1,2 border 
  dll mdx.dll SetControlMDX $dname 8 ProgressBar smooth > $ctl_gen
  dll mdx.dll SetFont $dname 1,2 +a 15 300 comic sans ms

  dll mdx.dll SetDialog $dname bgcolor $rgb(0,0,0)
  dll mdx.dll SetColor $dname 6 text $rgb(64,255,255)
  dll mdx.dll SetColor 6 background $rgb(000,000,000)
  dll mdx.dll SetColor 6 Textbg $rgb(000,000,000)
  dll mdx.dll SetColor $dname 19 text $rgb(64,255,255)
  dll mdx.dll SetColor 19 background $rgb(000,000,000)
  dll mdx.dll SetColor 19 Textbg $rgb(000,000,000)
  dll mdx.dll SetColor $dname 999 text $rgb(64,255,255)
  dll mdx.dll SetColor 999 background $rgb(000,000,000)
  dll mdx.dll SetColor 999 Textbg $rgb(000,000,000)
  dll mdx.dll SetColor $dname 12 text $rgb(64,255,255)
  dll mdx.dll SetColor 12 background $rgb(000,000,000)
  dll mdx.dll SetColor 12 Textbg $rgb(000,000,000)
  dll mdx.dll SetColor $dname 5 text $rgb(64,255,255)
  dll mdx.dll SetColor 5 background $rgb(000,000,000)
  dll mdx.dll SetColor 5 Textbg $rgb(000,000,000)
  dll mdx.dll SetColor $dname 13 text $rgb(64,255,255)
  dll mdx.dll SetColor 13 background $rgb(000,000,000)
  dll mdx.dll SetColor 13 Textbg $rgb(000,000,000)

  dll mdx.dll SetFont mp3 5 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 13 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 999 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 1 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 2 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 3 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 4 +abg 16 400 comic sans ms
  dll mdx.dll SetFont mp3 5 +abg 16 400 comic sans ms

  dll dll\\ktools.dll DockWindow $dialog(mp3).hwnd > left
  %x = $findfile(%mp3,*.mp3,0,did -a mp3 5 $nopath($1-))
  if ( %discretmp3 == oui ) { did -c $dname 999 }
  var %cpt = 1, %total = $ini(mp3.ini,0)
  while %cpt <= %total {
    did -a mp3 13 $ini(mp3.ini,%cpt)
    inc %cpt
  }
}

on *:dialog:mp3:sclick:16:{ 
  nick $did(13).seltext
}  

on 1:dialog:mp3:sclick:15:{
  if  $did(13).sel != $null {
    remini mp3.ini  $did(13).seltext
    did -d mp3 13 $did(13).sel
  }
}

on *:dialog:mp3:sclick:999:{
  if ( $did(999).state == 1 ) { set %discretmp3 oui }
  else { set %discretmp3 non }
}
on 1:dialog:mp3:sclick:*:{ 
  if ($did == 1) { 
    if ( %discretmp3 == oui ) { //splay stop | //splay " $+ $findfile(%mp3,$did(mp3,5).seltext,1) $+ " | echo -a 12( 14J'ecoute 12) ( 14Titre : $mp3($insong.fname).title 12) ( 14Durée : $duration($calc($sound($insong.fname).length / 1000)) 12) ( 14Taille :  $Round($Calc($Lof($insong.fname) / 1048576),2) $+ Mo 12) ( 14Kbps $sound($insong.fname).bitrate 12) }
    else { //splay stop | //splay " $+ $findfile(%mp3,$did(mp3,5).seltext,1) $+ " | msg $active  2[ 4• 2J'ecoute => Titre : %Mp3.Dir $did(5).seltext <=  Durée : $duration($calc($sound($insong.fname).length / 1000)) 4• 2]   }
  }
  if ($did == 2) { //splay stop }
  if ($did == 3) { //splay pause }
  if ($did == 4) { //splay resume }
  if ($did == 7) { //set %mp3 $sdir="->( Choisie le dossier Mp3 )<-" | var %x = $findfile(%mp3,*.mp3,0,did -a mp3 5 $nopath($1-)) }
  if ($did == 9) { vol -p $calc($vol(mp3) + 5000) }
  if ($did == 10) { vol -p $calc($vol(mp3) - 5000) }
  if ($did == 14) { 
    if $did(12) != $null {
      did -a mp3 13 $did(12)
      writeini mp3.ini $did(12) ligne -
    }
  }
}

on *:dialog:mp3:*:*:{
  if ($devent == sclick) && ($did(3).state == 1) { set %mp3close ON }
  if ($devent == sclick) && ($did(3).state == 0) { set %mp3close OFF }
  if ($devent == sclick) && ($did(7).state == 1) { .enable #mp3 } { .disable #mp3 }
  if ($devent == sclick) && ($did(8).state == 1) { .disable #mp3 } { .enable #mp3 }
  if ($devent == sclick) && ($did(4).state == 1) { .set %mp3mess ON }
  if ($devent == sclick) && ($did(4).state == 0) { .set %mp3mess OFF }
  if ($devent == init) && ($group(#mp3) == on) { did -c mp3 7 }
}

On 1:start:{
  /m | Echo -s 12Le MP3 se LOad patiente...
}

ON *:LOAD:{
  echo -a 4Voila le MP3 switch Loader By NaNo 
  echo -a BmBmx@wanadoo.fr pour tout les bugs ;)
}

Conclusion :


wala :)

A voir également

Ajouter un commentaire Commentaires
Mc_AbBeR
Messages postés
301
Date d'inscription
mercredi 15 juin 2005
Statut
Membre
Dernière intervention
19 février 2007

30 août 2005 à 22:11
mouais...
on *:dialog:mp3:*:*:{ if $devent == close { splay stop } }
Jsais pas si sa marche (moi les dialog, chu pas trop fort) mais le splay stop.. met sa:P
cs_DeViL66
Messages postés
152
Date d'inscription
lundi 28 février 2005
Statut
Membre
Dernière intervention
3 novembre 2006

30 août 2005 à 22:09
euh... quand on ferme l'addon sans faire stop, la chanson continue de jouer... Ca serai pas mal de corriger :p
Mc_AbBeR
Messages postés
301
Date d'inscription
mercredi 15 juin 2005
Statut
Membre
Dernière intervention
19 février 2007

16 juin 2005 à 12:41
ton script y suce... toolbar n'est plus la...
cs_clem54
Messages postés
253
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
16 octobre 2005

11 mai 2005 à 17:02
pk ds tt les mp3, ds les repertoir on voi pa les .mp3 donc ca ser a rien !!

4/10
Dimmu Borgir
Messages postés
8
Date d'inscription
jeudi 2 décembre 2004
Statut
Membre
Dernière intervention
5 décembre 2004

5 déc. 2004 à 09:36
moi je trouve pas super, il fo que tu rajoute des options...
5/10
Afficher les 27 commentaires

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.