Amélioration du script de contrôle de winamp depuis irc de bombstrike !!

Soyez le premier à donner votre avis sur cette source.

Vue 5 719 fois - Téléchargée 424 fois

Description

Mon code inclut 2 bind permettant d'afficher plus facilement les musiques écoutées !
Il inclut aussi une fonction permettant aux autres users de télécharger directement la musique en DCC en tapant !download et de savoir la musique que vous écoutez en tapant !zik !

ATTENTION : Il est nécessaire que toutes les musiques de Winamp soit dans le même dossier (pas de sous-dossier) !

N'oubliez pas de modifier le chemin dans le code (j'ai mis : C:/Le_chemin_du_dossier/ pour l'alias saysong, sayzik et pour les 2 on TEXT à la fin !)

Si quelques choses ne marche pas, veuillez me le dire en rejoignant le channel #FLNJ @ Quakenet.org !!!

Source / Exemple :


; Bon bah voici un ptit code pour ceux qui ont la flemme de lire l'help
; changer l'alias ctlamp pour que celle-ci pointe vers la DLL
;
; /ampsay - Permet de dire automatiquement quelle chanson vous jouez
; /saysong - Permet de le dire manuellement sur le chan en cours
; /sayzik - Permet de le dire manuellement sur tous les chans ouverts
;
; J'ai rajouté 2 bind (F12 et Shift+F12) pour utiliser les fonctions saysong et sayzik
;
; Si vous la mettez dans votre script, merci de m'ajouter dans les credits :)

alias ctlamp return $shortfn($mircdirctlamp.dll)

alias camp { if ($isid) { return $dll($ctlamp,$1,$iif($2-,$2-,$null)) } | else { dll $ctlamp $1 $iif($2-,$2-,$null) } }

alias ampsay {
    if (!$timer(ampbar)) { .timerampbar 0 1 ampbar }
    if ( %sayamp != $camp(GetSongTitle) ) {
    set %sayamp $camp(GetSongTitle)
    saysong
    }
}

alias saysong {
  if ( $camp(GetSongTitle) != WINAMP NOT RUNNING! ) { 
    msg # Winamp .::. Musique : $camp(GetSongTitle) .::. Durée : $+($int($calc($camp(TGetLength) / 60)),:,$iif($calc($camp(TGetLength) % 60) < 10,$+(0,$calc($camp(TGetLength) % 60)),$calc($camp(TGetLength) % 60))) .::. Taille : $round($calc(($file(C:/Le_chemin_du_dossier/ $+ $camp(GetSongTitle) $+ .mp3).size)/1048576),1) Mo .::. Tape !download pour télécharger cette zik !
  }
} 

alias sayzik {
  if ( $camp(GetSongTitle) != WINAMP NOT RUNNING! ) { 
    amsg Winamp .::. Musique : $camp(GetSongTitle) .::. Durée : $+($int($calc($camp(TGetLength) / 60)),:,$iif($calc($camp(TGetLength) % 60) < 10,$+(0,$calc($camp(TGetLength) % 60)),$calc($camp(TGetLength) % 60))) .::. Taille : $round( $calc( $calc( $eval( $file( C:/Le_chemin_du_dossier/ $+ $camp(GetSongTitle) $+ .mp3 ).size) /1000 ) /1000 ) ,2) Mo .::. Tape !download pour télécharger cette zik !
  }
} 

alias sF12 /sayzik

alias F12 /saysong

On *:text:!zik:#:{
  msg # Winamp .::. Musique : $camp(GetSongTitle) .::. Durée : $+($int($calc($camp(TGetLength) / 60)),:,$iif($calc($camp(TGetLength) % 60) < 10,$+(0,$calc($camp(TGetLength) % 60)),$calc($camp(TGetLength) % 60))) .::. Taille : $round( $calc( $calc( $eval( $file( C:/Le_chemin_du_dossier/ $+ $camp(GetSongTitle) $+ .mp3 ).size) /1000 ) /1000 ) ,2) Mo .::. Tape !download pour télécharger cette zik !
}

On *:text:!download:#:{
  dcc send $nick "C:/Le_chemin_du_dossier/ $+ $camp(GetSongTitle) $+ .mp3"
  notice $nick -[« MP3 Download .::. $camp(GetSongTitle) »]-
}

Conclusion :


Si vous tombez sur un chan de boulzor, n'oubliez pas de mettre un antiflood !

ENJOY !

Codes Sources

A voir également

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.