%Xmms_play="" run /bin/bash -c "perl /home/crissi/kvirc-3.0.0-beta1/scripts/xmms_title_de.pl > /home/crissi/mp3.tmp" for (%i=0;%i<10000;%i++){ if (%Xmms_play =="") %Xmms_play = $file.read("/home/crissi/mp3.tmp") else break } file.remove -q /home/crissi/mp3.tmp %Prefix = $str.left(%Xmms_play,4) %Postfix = $str.right(%Xmms_play,4) %Http_prefix = "http" %Cda_postfix = ".cda" if(%Prefix == %Http_prefix) { %Stime = $($mp3player.gettime/1000) %Mtime = 0 %Ctime =" "; while(%Stime > 59) { %Mtime++ %Stime-=60 } %Htime=0 while(%Mtime > 59) { %Htime++ %Mtime-=60 } if (%Stime < 10){ %tmp = %Stime %Stime = $str.append("0",%tmp) } if (%Mtime < 10 && %Htime > 1){ %tmp = %Mtime %Mtime = $str.append("0",%tmp) } if (%Htime > 0) %Ctime = $str.append %Htime:%Mtime:%Stime if (%Mtime > 0 && %Htime < 1) %Ctime = $str.append %Mtime:%Stime if (%Mtime < 1 && %Htime < 1) %Ctime = %Stime me muckelt grad [$mp3player.gettitle @ %Xmms_play - $($mp3player.getrate/1000) kbps - $($mp3player.getfreq/1000) kHz - seit: %Ctime (h:m:s)] } else if(%Postfix == %Cda_postfix) { me muckelt grad [$mp3player.gettitle - Audio CD] } else { me muckelt grad %Xmms_play }