On 1:text:Bartender *:#:{
if (cola isin $1-) {
var %nicknum = $nick($chan,0)
var %nick1 = 1
}
while (%nicknum >= %nick1) {
if ($nick($chan,%nick1) isin $1-) {
var %nicklijst = $+(%nicklijst,$chr(32),$nick($chan,%nick1))
}
inc %nick1
}
$read(bar\cola.txt,t) $+ %nicklijst
}