Mine

dialog mp3 { 
  title "Kyle'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)) }