Unnamed

menu channel {
  My mp3
  .Pick Song:{
    if (%mp3.dir == $null) { set %mp3.dir $sdir="Where Is Your Music Located?" }
    .set %mp3.song " $+ $file="What Would You Like To Listen To?" %mp3.dir $+ "

    if (%mp3.song == $null) { halt }

    ;########################################
    ;# set color of mp3 Song And The Symbol #
    ;########################################

    var %mp3color $rand(2,15)
    var %mp3symbol $rand(2,15)
    splay -p $shortfn(%mp3.song)
    msg $active $replace($remove($+($chr(3),%mp3symbol,»,$chr(3),%mp3color,Music,$chr(3),%mp3symbol,«) $+($chr(3),%mp3symbol,¤,$chr(3),%mp3color,$nopath(%mp3.song),$chr(3),%mp3symbol,¤),.mp3,.wma),-,$chr(3) $+ %mp3symbol $+ ¬ $+ $chr(3) $+ %mp3color,$chr(44),$chr(32) $+ $chr(3) $+ %mp3symbol $+ & $+ $chr(3) $+ %mp3color,$chr(40),$chr(3) $+ %mp3symbol $+ $chr(91) $+ $chr(3) $+ %mp3color,$chr(41),$chr(3) $+ %mp3symbol $+ $chr(93) $chr(3) $+ %mp3color)

  }
}