alias xmms { set output [exec cat /tmp/xmms-info] set track_title [string range [lindex [split $output \n] 12] 7 end] set track_length [string range [lindex [split $output \n] 8] 6 end] set track_complete [string range [lindex [split $output \n] 6] 10 end] set file_name [lindex [split $output \n] 13] set album_name [lindex [split $file_name /] end-1] /say ":: Now Playing : $track_title ($track_complete/$track_length) (Album : $album_name) ::" complete } on !queue enqueue_track { splitsrc set xmms_status [string range [lindex [split [exec cat /tmp/xmms-info] \n] 2] 8 end] set check_exists [exec slocate -d musicdb "$_rest"] if { [string compare $check_exists $_rest] == 0 } { print "$_nick just enqueued $_rest" print "$xmms_status" if { $xmms_status == "Stopped" } { exec xmms -p "$_rest" } else { exec xmms -e "$_rest" } } else { /raw notice $_nick :$_rest does not exist in musicdb. Type !search to search musicdb. } complete } on !search search_music { splitsrc if { [channel] == "#sob" } { if { ![regexp {[?*]} $_rest] } { if { [string length $_rest] >= 5 } { set search_results [split [exec slocate -i -d musicdb "$_rest*.mp3"] \n] if { [string length $search_results] > 1 } { foreach result $search_results { /raw notice $_nick :$result } /raw notice $_nick :To queue a track copy the entire line for the track from the search result then type '!queue' (without the quotes) and paste the line you copied from the search result. } else { /raw notice $_nick :Song not found in database. } unset search_results } else { /raw notice $_nick :You must provide a search term at least 5 characters in length. } } else { /raw notice $_nick :Wildcards not permitted in search strings. } } complete } alias jukebox { /say ":: Welcome to Paladine's Jukebox ::" /say ":: Use !search to search the database. ::" /say ":: Use !queue to add a song to the playlist. ::" /say ":: Tune in on http://radio.paladine.org.uk:10000/ ::" }