alias oku { var %t = 9 | while % <= $lines(who.txt) { sw $sockname privmsg #kanal : $read(who.txt,%t) | inc %t } }