on *:text:*:#: {
if $1 == !at {
if !$2 { msg $chan Lutfen Nick Belirtiniz "!at Nick" | return }
if $2 == $me { msg $chan Benim için oylama başlatamazsiniz $nick | return }
if $2 == $nick { msg $chan Kendiniz için oy kullanamazsınız $nick | return }
if $nick == $read(cure/ $+ $2 $+ .txt,1) { msg $chan Oylamayı Zaten Siz Başlattınız $nick | return }
if $read(cure/ $+ $2 $+ .txt,w,$nick) { msg $chan Bu Oylamaya Daha Önce Katılmışsınız $nick | return }
if $2 ison $chan {
mkdir cure
write cure/ $+ $2 $+ .txt $nick
if $lines(cure/ $+ $2 $+ .txt) == 5 {
msg $chan $2 Nicki Atmak İçin Oylama ( $lines(cure/ $+ $2 $+ .txt) / 5 ) ve Atılmıştır.
mode $chan +b $2
kick $chan $2 Oylama Sonucu Atıldı.
write -c cure/ $+ $2 $+ .txt
return
}
if $lines(cure/ $+ $2 $+ .txt) == 1 {
msg $chan $nick $chan Kanalından $2 Nickinin Atılması İçin Oylama Başlatmıştır. Katılmak İstiyorsanız !at $2 Yapınız.
}
else msg $chan $2 Nicki Atmak İçin Oylama ( $lines(cure/ $+ $2 $+ .txt) / 5 )
}
else { msg $chan $2 Nickli Kisi Kanalda Yok $nick Oylama Durduruldu | write -c cure/ $+ $2 $+ .txt }
}
}
