$sendqfilenow:if ($server) { set %temp2 $sline(@SendQueueManager,1).ln | dec %temp2 | set %temp $read -l $+ %temp2 MP3Queue.txt | write -dl $+ %temp2 MP3Queue.txt | dcc send $replace($replace($gettok(%temp,2,32),<,$chr(91)),>,$chr(93)) " $+ $replace($replace($gettok(%temp,3-,32),<,$chr(91)),>,$chr(93)) $+ " | sqm } | else echo $chan(1) You're not connected to a server! }
-
$moveqfileup:set %temp2 $sline(@SendQueueManager,1).ln | dec %temp2 | set %temp $read -l $+ %temp2 MP3Queue.txt | write -dl $+ %temp2 MP3Queue.txt | dec %temp2 | write -il $+ %temp2 MP3Queue.txt %temp | sqm
$moveqfiledown:set %temp2 $sline(@SendQueueManager,1).ln | dec %temp2 | set %temp $read -l $+ %temp2 MP3Queue.txt | write -dl $+ %temp2 MP3Queue.txt | inc %temp2 | write -il $+ %temp2 MP3Queue.txt %temp | sqm
-
$addqfile:{
window -sl @Double-clickperson 200 50 300 400 Ms Sans Serif 10 | clear @Double-clickperson | set %temp.addfile.chan 0 | set %temp.addfile.nick 0
:loop1
inc %temp.addfile.chan
:loop2
inc %temp.addfile.nick
if ($nick($chan(%temp.addfile.chan),%temp.addfile.nick)) { aline @Double-clickperson $nick($chan(%temp.addfile.chan),%temp.addfile.nick) }
if (%temp.addfile.nick < $nick($chan(%temp.addfile.chan),0)) { goto loop2 }
set %temp.addfile.nick 0
if (%temp.addfile.chan < $chan(0)) { goto loop1 }
inc %temp.addfile.nick
:loop3
if (($line(@Double-clickperson,%temp.addfile.nick) == $line(@Double-clickperson,$calc(%temp.addfile.nick + 1))) || ($line(@Double-clickperson,%temp.addfile.nick) == $me)) { dline @Double-clickperson %temp.addfile.nick | goto loop3 }
elseif (%temp.addfile.nick < $line(@Double-clickperson,0)) { inc %temp.addfile.nick | goto loop3 }
unset %temp.addfile.*
}
-
$deleteqfile:set %temp $sline(@SendQueueManager,1).ln | dec %temp | write -dl $+ %temp MP3Queue.txt | sqm
-
$deletequeue:write -c MP3Queue.txt | sqm
