alias joinrandom {
var %min = $$2, %max = $3
inc %jr
scon -at1 if ($network == $1) { .list -min % $+ min $iif(%max != $null,-max % $+ max) }
}
raw 321:*:{
if (%jr) {
window -h "channels list"
if ($fopen(jr_channels)) { .fclose jr_channels }
.fopen -n jr_channels jr_channels.txt
}
}
raw 322:*:{
if (%jr) && ($fopen(jr_channels)) { .fwrite -n jr_channels $2 }
}
raw 323:*:{
if (%jr) {
window -c "channels list"
if ($fopen(jr_channels)) { .fclose jr_channels }
if ($lines(jr_channels.txt)) {
join $read(jr_channels.txt,n)
.remove jr_channels.txt
}
unset %jr
}
}