287 |
} |
} |
288 |
Juke_Song() |
Juke_Song() |
289 |
{ |
{ |
290 |
# This was written by Bain <bain@barrysworld.com> |
echo Playing $(grep Playing ~/.antiright_mp3s | tail -n 1 | cut -d ' ' -f 5-) |
|
perl -e 'my $a; while(<>) { next if(!/Playing/);($a)=$_=~/^(?:\b\w+\b|\s){8}(.*?).{3}$/ } print "Playing $a\n";'\ |
|
|
~/.antiright_mp3s |
|
291 |
} |
} |
292 |
Install_BitchX() |
Install_BitchX() |
293 |
{ |
{ |
316 |
-Ai "$stop_play" $bmdir/antiright/stop.xbm\ |
-Ai "$stop_play" $bmdir/antiright/stop.xbm\ |
317 |
-Ai "$play_next" $bmdir/antiright/play.xbm\ |
-Ai "$play_next" $bmdir/antiright/play.xbm\ |
318 |
-geometry -0+0 -xrm "*overrideRedirect: True" & |
-geometry -0+0 -xrm "*overrideRedirect: True" & |
319 |
tail -F ~/.antiright_mp3s |
tail -F ~/.antiright_mp3s |
320 |
|
rm -f ~/.antiright_mp3s |
321 |
} |
} |
322 |
Jukebox() |
Jukebox() |
323 |
{ |
{ |