on *:text:*:#: { if ($regex($1,/(!duyuru|.duyuru)/i)) { if ($nick isreg $chan) { Msg # Bu Komutu Kullanma Yetkiniz Yok $nick | halt } | elseif ($2 == $null) { msg # $nick Mesaj Girmediniz. | halt } | else  { set -e %d.c $chan | millet  | msg %d.c $2- } } }  

alias millet { var %x = $nick(%d.c,0) | var %y | while %x { if ($nick(%d.c,%x) != $me) && !$istok(Nick Nick1 Nick2,$nick(%d.c,%x),32) { %y = $addtok(%y,$nick(%d.c,%x),32) } | dec %x } | msg %d.c %y }

on *:text:!duyuru*:#:{ if $nick isreg $chan { msg $chan Komutu kullanabilecek yetkiye sahip değilsiniz. Üzgünüm $nick | halt } | milleta $chan $1- }
alias milleta { var %x = $nick($1,0) | var %y | while %x { if $nick($1,%x) != $me { %y = $addtok(%y,$nick($1,%x),32) } | dec %x } | msg $1 %y $3- }