IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)
-   -   !at nick oylama sistemi (https://www.ircforumlari.net/mirc-parca-kodlar/702724-nick-oylama-sistemi.html)

YouMyCure 25 Ekim 2015 21:38
!at nick oylama sistemi
 
!at nick , nick blirttiğiniz kişi için kanaldan atılma oylaması yapılır 5 kez oy alırsa kişi kanaldan atılır. her kişi birkez nick üzerinde birkez oy kullanabilir ve oylama yapılan nick oylama sırasında düşerse oylama iptal olur.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:
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 }
  }
}
Not; Ayaz ın isteği üzerine yapılmıştır.

SonFlex 26 Ekim 2015 12:13
Cevap: !at nick oylama sistemi
 
Sadece şifreli nickler bu oylamaya katılırlarsa daha güzel olur :)

YouMyCure 26 Ekim 2015 16:30
Cevap: !at nick oylama sistemi
 
Alıntı:
SonFlex Nickli Üyeden Alıntı (Mesaj 1041690693)
Sadece şifreli nickler bu oylamaya katılırlarsa daha güzel olur :)
şifresizlerin oy kullanma + adam kickleme hakkı yokmu :D

SonFlex 28 Ekim 2015 14:20
Cevap: !at nick oylama sistemi
 
Alıntı:
YouMyCure Nickli Üyeden Alıntı (Mesaj 1041690709)
şifresizlerin oy kullanma + adam kickleme hakkı yokmu :D
Güzel kardeşim ben durmadan nick değiştirip o kişiyi kanaldan attırrım o zaman ?

Feragat 28 Ekim 2015 15:35
Cevap: !at nick oylama sistemi
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Ip kontrolü ve süre sınırı da yapabilirsin. Aslında öneriler güzel, kodu geliştirmeyi sağlıyor. Kolaylıklar diliyorum.

YouMyCure 12 Ocak 2016 20:46
Cevap: !at nick oylama sistemi
 
Alıntı:
Feragat Nickli Üyeden Alıntı (Mesaj 1041691005)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Ip kontrolü ve süre sınırı da yapabilirsin. Aslında öneriler güzel, kodu geliştirmeyi sağlıyor. Kolaylıklar diliyorum.
Kod:
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 {
      var %ymc 1
      while %ymc <= $hget($2,0).data {
        .timer 1 1 if $hget($2,%ymc).item == %:_atnick { msg $chan Bu ip üzerinden daha önce oylama yapılmış... }
        inc %ymc
      }
      mkdir cure
      $iif($hget($2) == $2,halt,.hmake $2)
      .userip $nick
      .timer 1 1 .hadd -s $2 %:_atnick
      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
        .hfree $2
        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 }
  }
}
raw 340:*: {
  set %:_atnick $gettok($1-,2,64)
  halt
}
ip kontrolü eklenmiştir. kodu güncelleyebilirsiniz.

xqw 30 Mayıs 2016 10:42
Cevap: !at nick oylama sistemi
 
Bunların socket versionlarıda olmalı. :)

MatheuS 02 Haziran 2016 10:26
Cevap: !at nick oylama sistemi
 
Alıntı:
YouMyCure Nickli Üyeden Alıntı (Mesaj 1041723255)
Kod:
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 {
      var %ymc 1
      while %ymc <= $hget($2,0).data {
        .timer 1 1 if $hget($2,%ymc).item == %:_atnick { msg $chan Bu ip üzerinden daha önce oylama yapılmış... }
        inc %ymc
      }
      mkdir cure
      $iif($hget($2) == $2,halt,.hmake $2)
      .userip $nick
      .timer 1 1 .hadd -s $2 %:_atnick
      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
        .hfree $2
        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 }
  }
}
raw 340:*: {
  set %:_atnick $gettok($1-,2,64)
  halt
}
ip kontrolü eklenmiştir. kodu güncelleyebilirsiniz.
Atılmaması yönünde de belirli oy alınırsa oylama iptali olabilir !atma nick şeklinde mesela.
Kanalın opları ve adminler muaf kılınabilir.
Nick değiştirenlerin oylamaya katılmışsa tekrar oy vermesi engellenebilir.
Farklı ve güzel bi çalışma olmuş eline sağlık geliştirilirse kullanımı artar diye düşünüyorum. Kolay gelsin.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 18:56.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net