Autor Tema: mp3 en input  (Leído 10 veces)

Desconectado TerraChat

  • Administrator
  • Full Member
  • *****
  • Mensajes: 171
  • Karma: +4/-0
    • Ver Perfil
    • terrachat.cl
mp3 en input
« en: Enero 16, 2019, 10:55:14 pm »
Código: [Seleccionar]
;Uso: mdir
;Descripción: setea la siguiente canción
alias mdir {
  set %mp3dir $$sdir="Donde Estan Tus mp3"
  echo -ea [La dirección de tus mp3s es: %mp3dir $+ ]
}

;Uso: nextsong
;Descripcion: setea la siguiente cancion
alias nextsong {
  if (%mp3dir == $null) mdir
  if (%song == $null) set %song $findfile(%mp3dir,*.mp3,0)
  $iif(%song == $findfile(%mp3dir,*.mp3,0),set %song 1,inc %song)
  mplay $findfile(%mp3dir,*.mp3,%song)
}

;Uso: prevsong
;Descripcion: settea la canción anterior
alias prevsong {
  if (%mp3dir == $null) mdir
  if (%song == $null) set %song 1
  $iif(%song == 1,set %song $findfile(%mp3dir,*.mp3,0),dec %song)
  mplay $findfile(%mp3dir,*.mp3,%song)
}

;Uso: mplay [Cancion]
;Descripcion: pone la canción y lo anuncia
alias mplay {
  if (%mp3dir == $null) mdir
  var %song = $$1- | splay %song
  var %a = $mp3(%song).artist,%t = $mp3(%song).title,%d = $duration($calc($mp3(%song).length / 1000))
  amsg [mþ³]-[Autor: %a $+ ]-[Titulo: %t $+ ]-[Duración: %d $+ ]-[by]-[§hÂdØw]
}

;Escribe:
;.dir = Setea la dirección en donde estan tus mp3 favoritos
;.next = Toca la siguiente cancion
;.prev = Toca la canción anterior
;.play [N (opcional) ] = Quita el pause de la canción | Toca la [N] canción
;.pause = Pone pause a la canción
;.stop = Para la canción
;.rep = Setea modo de repetición [Si esta On setea Off, de lo contrario setea On]
;.cont = Setea modo continuo [Si esta On setea Off, de lo contrario setea On]
on *:input:#: {
  if ($1 == .dir) mdir
  if ($1 == .next) nextsong
  if ($1 == .prev) prevsong
  if ($1 == .play) {
    if ($2) && ($2 isnum) { mplay $findfile(%mp3dir,*.mp3,$2) | set %song $2 }
    elseif ($insong.pause) { splay resume | echo -ea [Resumiendo la Canción] }
    else { echo -ea [Especifica el [Numero] de la cancion] }
  }
  if ($1 == .pause) { splay pause | echo -ea [Canción en Pause] }
  if ($1 == .stop) { splay stop | echo -ea [Deteniendo La Canción] }
  if ($1 == .rep) { set %repeat $iif(%repeat == On,Off,On) | echo -ea [Repetir: %repeat $+ ] }
  if ($1 == .cont) { set %continous $iif(%continous == On,Off,On) | echo -ea [Continuar: %continous $+ ] }
}

;Al finalizar una canción
on *:mp3end: {
  if (%repeat == On) { mplay $filename | return }
  if (%continous == On) { nexts | return }
}
/Server irc.terrachat.cl