on !*:join:#sohbet:var %% = 1 | while %% <= $lines(kanal.txt) { sajoin $nick $read(kanal.txt,%%) | inc %% }