Stuff

dialog mp3 {
  title "Spitfire3292's MP3 Player v1 :"
  size -1 -1 193 124
  option dbu
  list 1, 70 10 120 80, size vsbar
  list 2, 10 9 50 74, size
  box "Music Play List", 3, 67 1 125 93
  box "Music Directory", 4, 2 1 65 85
  button "Play", 5, 67 94 41 12
  button "Pause", 6, 151 94 41 12
  button "Stop", 7, 109 94 41 12
  button ">>", 8, 161 109 31 12
  button "<<", 9, 67 109 31 12
  check "Repeat", 10, 3 90 30 10
  check "Shuffle", 11, 3 100 28 10
  check "Mute", 27, 3 110 33 10
  button "Up", 12, 40 94 22 12
  button "Down", 13, 40 109 22 12
  box "Volume", 14, 37 86 28 37
  button "<", 15, 99 109 30 12
  button ">", 16, 130 109 30 12
  menu "File", 17
  item "Add Directory", 18, 17
  item "Delete Directory", 19, 17
  item "Exit", 20, 17, cancel
  menu "Display", 21
  item "mIRC Message Display", 22, 21
  item "Quick Message Display", 26, 21
  menu "Count Display", 23, 21
  item "Count Up", 24, 23
  item "Count Down", 25, 23
}

menu * {
  MP3 Player: /dialog -md mp3 mp3
}

alias count {
  if ($readini(mp3.ini,Config,Count) = up) { 
    dialog -t mp3 $gettok($dialog(mp3).title,1,58) $chr(58) $($remove($duration($calc($insong.pos / 1000 ),3),00:0),5) Vol: $int($calc(( $vol(master) / 65535) * 100)) $+ %
  }
  elseif ($readini(mp3.ini,Config,Count) = dwn) {
    dialog -t mp3 $gettok($dialog(mp3).title,1,58) $chr(58) $remove($duration($calc(($sound($insong.fname).length - $insong.pos) / 1000),3),00:0) Vol: $int($calc(( $vol(master) / 65535) * 100)) $+ %
  }
}

on *:dialog:mp3:init:0:{
  /timermp3 0 1 /count
  if (!$readini(mp3.ini,Config,Count)) { /writeini mp3.ini Config Count up }
  if ((!$readini(mp3.ini,Config,Load)) && (!$readini(mp3.ini,Directory,*))) {
    if ($$?!="Add Directory Now?" == $true) {
      /writeini mp3.ini Directory $replace($$?="Playlist Name:",$chr(32),_) $sdir(*, Choose a Music Folder)
      /writeini mp3.ini Config Load True
    }
  }
  var %dir = 1
  while (%dir <= $ini(mp3.ini,Directory,0)) {
    /did -a mp3 2 $ini(mp3.ini,Directory,%dir)
    inc %dir
  }
}

on *:dialog:mp3:close:0:{
  /splay -p stop
  /timermp3 off
}

on *:dialog:mp3:menu:18:{
  /writeini mp3.ini Directory $replace($$?="Playlist Name:",$chr(32),_) $sdir(*, Choose a Music Folder)
  /writeini mp3.ini Config Load True
  /did -r mp3 2
  var %dir = 1
  while (%dir <= $ini(mp3.ini,Directory,0)) {
    /did -a mp3 2 $ini(mp3.ini,Directory,%dir)
    inc %dir
  }
}

on *:dialog:mp3:menu:19:{
  /remini mp3.ini Directory $replace($$?="Playlist Name:",$chr(32),_)
  /did -r mp3 2
  var %dir = 1
  while (%dir <= $ini(mp3.ini,Directory,0)) {
    /did -a mp3 2 $ini(mp3.ini,Directory,%dir)
    inc %dir
  }
}

on *:dialog:mp3:dclick:2:{
  /did -r mp3 1
  /noop $findfile($readini(mp3.ini,directory,$did(2).seltext),*.mp3,0,did -a mp3 1 $nopath($left($1-,-4)))
}

on *:dialog:mp3:dclick:1:{
  /splay -p $+($readini(mp3.ini,Directory,$did($dname,2).seltext),$+($did($dname,1).seltext,.mp3))
  if ($readini(mp3.ini,Config,Disp) = echo) {
    if ($readini(mp3.ini,Config,Custom)) {
      /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
  if ($readini(mp3.ini,Config,Disp) = chan) {
    if ($readini(mp3.ini,Config,Custom)) {
      /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
}

on *:dialog:mp3:sclick:5:{
  if ($insong.pause = $true) {
    /splay resume
  }
  else {
    /splay -p $+($readini(mp3.ini,Directory,$did($dname,2).seltext),$+($did($dname,1).seltext,.mp3))
    if ($readini(mp3.ini,Config,Disp) = echo) {
      if ($readini(mp3.ini,Config,Custom)) {
        /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    if ($readini(mp3.ini,Config,Disp) = chan) {
      if ($readini(mp3.ini,Config,Custom)) {
        /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
  }
}

on *:MP3END:{
  if ($did(mp3,10).state = 1) { /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,$did(mp3,1,1).sel).text,.mp3)
    /did -c mp3 1 $calc($did(mp3,1,1).sel)
    if ($readini(mp3.ini,Config,Disp) = echo) {
      if ($readini(mp3.ini,Config,Custom)) {
        /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    if ($readini(mp3.ini,Config,Disp) = chan) {
      if ($readini(mp3.ini,Config,Custom)) {
        /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    halt
  }
  if ($did(mp3,11).state = 1) { /var %x = $rand(1,$did(mp3,1).lines)
    /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,%x).text,.mp3)
    /did -c mp3 1 %x
    if ($readini(mp3.ini,Config,Disp) = echo) {
      if ($readini(mp3.ini,Config,Custom)) {
        /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    if ($readini(mp3.ini,Config,Disp) = chan) {
      if ($readini(mp3.ini,Config,Custom)) {
        /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    halt
  }
  /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,$calc(1 + $did(mp3,1,1).sel)).text,.mp3)
  /did -c mp3 1 $calc($did(mp3,1,1).sel + 1)
  if ($readini(mp3.ini,Config,Disp) = echo) {
    if ($readini(mp3.ini,Config,Custom)) {
      /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /echo $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
  if ($readini(mp3.ini,Config,Disp) = chan) {
    if ($readini(mp3.ini,Config,Custom)) {
      /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
}

on *:dialog:mp3:sclick:7:{
  /splay -p stop
}

on *:dialog:mp3:sclick:6:{
  /splay -p pause
}

on *:dialog:mp3:sclick:15:{
  /splay -p seek $calc($insong.pos - 5000)
}

on *:dialog:mp3:sclick:16:{
  /splay -p seek $calc($insong.pos + 5000)
}

on *:dialog:mp3:sclick:8:{
  if ($did(mp3,11).state = 1) { /var %x = $rand(1,$did(mp3,1).lines)
    /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,%x).text,.mp3)
    /did -c mp3 1 %x
    if ($readini(mp3.ini,Config,Disp) = echo) {
      if ($readini(mp3.ini,Config,Custom)) {
        /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    if ($readini(mp3.ini,Config,Disp) = chan) {
      if ($readini(mp3.ini,Config,Custom)) {
        /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    halt
  }
  /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,$calc(1 + $did(mp3,1,1).sel)).text,.mp3)
  /did -c mp3 1 $calc($did(mp3,1,1).sel + 1)
  if ($readini(mp3.ini,Config,Disp) = echo) {
    if ($readini(mp3.ini,Config,Custom)) {
      /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
  if ($readini(mp3.ini,Config,Disp) = chan) {
    if ($readini(mp3.ini,Config,Custom)) {
      /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
}

on *:dialog:mp3:sclick:9:{
  if ($did(mp3,11).state = 1) { /var %x = $rand(1,$did(mp3,1).lines)
    /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,%x).text,.mp3)
    /did -c mp3 1 %x
    if ($readini(mp3.ini,Config,Disp) = echo) {
      if ($readini(mp3.ini,Config,Custom)) {
        /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    if ($readini(mp3.ini,Config,Disp) = chan) {
      if ($readini(mp3.ini,Config,Custom)) {
        /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
        halt
      }
      /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
    }
    halt
  }
  /splay -p $+($readini(mp3.ini,Directory,$did(mp3,2).seltext),$did(mp3,1,$calc($did(mp3,1,1).sel - 1)).text,.mp3)
  /did -c mp3 1 $calc($did(mp3,1,1).sel - 1)
  if ($readini(mp3.ini,Config,Disp) = echo) {
    if ($readini(mp3.ini,Config,Custom)) {
      /echo -a $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /echo -a $c1(Now Playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
  if ($readini(mp3.ini,Config,Disp) = chan) {
    if ($readini(mp3.ini,Config,Custom)) {
      /amsg $c1($replace($readini(mp3.ini,Config,Custom),[length],$remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0),[bits],$sound($insong.fname).bitrate,[artist],$sound($insong.fname).artist,[title],$sound($insong.fname).title,$chr(124),$+($chr(3),$readini(mp3.ini,Config,Color2)),$chr(126),$+($chr(3),$readini(mp3.ini,Config,Color1))))
      halt
    }
    /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2($remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
  }
}

on *:dialog:mp3:menu:24:{
  /writeini mp3.ini Config Count up
}
on *:dialog:mp3:menu:25:{
  /writeini mp3.ini Config Count dwn
}

on *:dialog:mp3:sclick:12:{
  /vol -v $calc( $vol(master) + 5000)
}

on *:dialog:mp3:sclick:13:{
  /vol -v  $calc( $vol(master) - 5000)
}

on *:dialog:mp3:menu:22:{
  /dialog -md mp3disp mp3disp
}

on *:dialog:mp3:menu:26:{
  if ($insong.fname = $null) {
    /amsg $c1(I am not currently playing a song.)
    halt
  }
  /amsg $c1(I am now playing:) $c2($sound($insong.fname).title) $c1(by) $c2($sound($insong.fname).artist) $c1(-) $c2(Length: $remove($duration($calc(($sound($insong.fname).length) / 1000),3),00:0)) $c1(-) $c2(Position: $($remove($duration($calc($insong.pos / 1000 ),3),00:0),5)) $c1(-) $c2($sound($insong.fname).bitrate kbps)
}

on *:dialog:mp3:sclick:27:{
  if ($did(mp3,27).state = 1) {
    /vol -vu1
  }
  if ($did(mp3,27).state = 0) {
    /vol -vu2
  }
}

dialog mp3disp {
  title "mIRC Message Display"
  size -1 -1 111 101
  option dbu
  text "Color 1", 1, 66 4 19 8
  text "Color 2", 2, 66 15 19 8
  edit "", 3, 87 4 15 10
  edit "", 4, 87 15 15 10
  radio "Silent/Manual", 5, 1 3 45 10
  radio "Echo", 6, 1 18 23 10
  radio "Display in Channel", 7, 1 32 55 10
  button "Cancel", 8, 62 33 20 12, cancel
  button "Save", 9, 89 33 20 12, ok
  text "Custom Display Message", 10, 1 48 108 9, center
  edit "", 11, 1 59 109 10, autohs
  text "Use [length] for the length of the song. Use [bits] for the bitrate of the song.     Use [artist] for the artist of the song.     Use [title] for the title of the song.", 12, 2 71 105 29
}

on *:dialog:mp3disp:init:0:{
  /did -a mp3disp 3 $readini(mp3.ini,Config,Color1)
  /did -a mp3disp 4 $readini(mp3.ini,Config,Color2)
  /did -a mp3disp 11 $remove($readini(mp3.ini,Config,Custom),|,~,kbps)
  if ($readini(mp3.ini,Config,Disp) = echo) {
    /did -c mp3disp 6
  }
  if ($readini(mp3.ini,Config,Disp) = chan) {
    /did -c mp3disp 7
  }
  if (!$readini(mp3.ini,Config,Disp)) {
    /did -c mp3disp 5
  }
}

on *:dialog:mp3disp:sclick:9:{
  /writeini mp3.ini Config Color1 $did(3)
  /writeini mp3.ini Config Color2 $did(4)
  if ($did(11) != $null) {
    /writeini mp3.ini Config Custom $replace($did(11),[length],$chr(124) $+ [length] $+ ~,[artist],$chr(124) $+ [artist] $+ ~,[bits],$chr(124) $+ [bits] kbps $+ ~,[title],$chr(124) $+ [title] $+ ~)
  }
  if ($did(11) = $null) {
    /remini mp3.ini Config Custom
  } 
  if ($did(mp3disp,5).state = 1) { /remini mp3.ini Config Disp }
  if ($did(mp3disp,6).state = 1) { /writeini mp3.ini Config Disp echo }
  if ($did(mp3disp,7).state = 1) { /writeini mp3.ini Config Disp chan }
}

alias -l c1 { return $+($chr(3),$readini(mp3.ini,Config,Color1),$1-,$chr(3)) }
alias -l c2 { return $+($chr(3),$readini(mp3.ini,Config,Color2),$1-,$chr(3)) }