MODE CONTINUE POUR LECTEUR MP3

; Mode continue pour lecteur mp3 mais peut fonctionner comme ceci.
; Utilisation:
; /mp3.c <on/off> -> pour activer/désactiver
; /mp3.c playlist <nom de la playlist> -> choix de votre playlist
; /mp3.c add <file/dir> -> pour ajouter un fichier ou un répertoire
; /mp3.c rem -> Ouverture du fichier pour effacer une chanson


alias Mp3.C {
  if ($1 == on) {
    if (!%mp3.cpl) { echo -s *** Sélectionnez votre playlist (/mp3.c playlist <nom de votre playlist>). }
    else {
      set %mp3.c 1
      if (!%mp3.c#) { set %mp3.c# 1 }
      else {
        if ($read(%mp3.cpl,%mp3.c#)) { splay $read(%mp3.cpl,%mp3.c#) }
        else {
          echo -s Retour au début de la playlist.
          unset %mp3.c#
          mp3.c on
        }
      }
    }
  }
  if ($1 == off) {
    if (%mp3.c) {
      splay stop
      unset %mp3.c
    }
  }
  if ($1 == playlist) && ($2) { set %mp3.cpl $2 }
  if ($1 == add) {
    if (!%mp3.cpl) { echo -s *** Sélectionnez votre playlist (/mp3.c playlist <nom de votre playlist>). }
    else {
      if ($2 == file) {
        var %a = $sfile(c:\,Choisissez un fichier!)
        if (%a) { write %mp3.cpl %a }
      }
      if ($2 == dir) {
        var %a = $sdir(c:\,Choisissez un répertoire!)
        if (%a) {
          var %b = 1
          while ($findfile(%a,*.mp3,%b)) {
            write %mp3.pcl $findfile(%a,*.mp3,%b)
            inc %b
          }
        }
      }
    }
  }
  if ($1 == rem) { if (%mp3.cpl) { run %mp3.cpl } }
}
on 1:mp3end:{
  if (%mp3.c) {
    if (%mp3.c# < $lines(%mp3.cpl)) {
      inc %mp3.c#
      splay $read(%mp3.cpl,%mp3.c#)
    }
    else {
      echo -s Retour au début de la playlist.
      unset %mp3.c#
      mp3.c on
    }
  }
}