IRCForum.Net - Turkiye'nin En Iyi IRC Platformu!




Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 09 Haziran 2022, 11:13   #1
Çevrimiçi

YouMyCure - ait Kullanıcı Resmi (Avatar)
Üyelik Tarihi: 02 Haziran 2014
Üye No: 170
Mesajlar: 20
Nerden:
Takım:
Meslek:
Alanım: mIRC Scripting
Aldığı Beğeni: 13
Beğendikleri: 6
@YouMyCure
#Help Kanalı İçin Voice Sayacı



Amaç: #Help Kanalında ~&@% yetkisi olan yöneticilerin, kullanıcılara verdiği voice sayısını kaydedip istatistiğe döker.
Komutlar: (#Helpers Kanalında) !voicelist , !sıfırla [nick]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start: { hload -m voicelist voicelist.ymc } on *:rawmode:#help:{ if $1 = +v && $regex($left($nick($chan,$nick).pnick,1),~|&|@|%) { hinc -m voicelist $nick | hsave voicelist voicelist.ymc } } on *:text:*:#helpers: { if $regex($1,/^([.!]s[iİı]f[iİı]rla)/Si) { if !$istok(YouMyCure Hasan,$nick,32) { msg # $nick bu komutu kullanmaya yetkili değilsiniz. | return } if $2 { hdel voicelist $2 | hsave voicelist voicelist.ymc | msg # $2 Performans Listesinden Silindi. } else { hfree voicelist | remove -rf $mircdirvoicelist.ymc | msg # Performans Listesi Sıfırlandı. } } if $regex($1,/^([.!]vo[iİı]cel[iİı]st)/Si) { msg # --- Performans Listesi --- var %i = 1 ,%q = 0 ,%z = 1 | while %z <= $hget(voicelist,0).data { inc %q $hget(voicelist,%z).data | inc %z } while %i <= $hget(voicelist,0).item { msg # $hget(voicelist,%i).item - Verdiği Voice: $hget(voicelist,%i).data ( Performans $+(%,$token($calc($hget(voicelist,%i).data *100/ %q),1,46)) ) | inc %i } } }

Amaç: #Help Kanalında ~&@% yetkisi olan yöneticilerin, kullanıcılara verdiği voice sayısını kaydedip istatistiğe döker.
Komutlar: (#Helpers Kanalında) !voicelist , !sıfırla [nick]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start: { hload -m voicelist voicelist.ymc } on *:rawmode:#help:{ if $1 = +v && $regex($left($nick($chan,$nick).pnick,1),~|&|@|%) { hinc -m voicelist $nick | hsave voicelist voicelist.ymc } } on *:text:*:#helpers: { if $regex($1,/^([.!]s[iİı]f[iİı]rla)/Si) { if !$istok(YouMyCure Hasan,$nick,32) { msg # $nick bu komutu kullanmaya yetkili değilsiniz. | return } if $2 { hdel voicelist $2 | hsave voicelist voicelist.ymc | msg # $2 Performans Listesinden Silindi. } else { hfree voicelist | remove -rf $mircdirvoicelist.ymc | msg # Performans Listesi Sıfırlandı. } } if $regex($1,/^([.!]vo[iİı]cel[iİı]st)/Si) { msg # --- Performans Listesi --- var %i = 1 ,%q = 0 ,%z = 1 | while %z <= $hget(voicelist,0).data { inc %q $hget(voicelist,%z).data | inc %z } while %i <= $hget(voicelist,0).item { msg # $hget(voicelist,%i).item - Verdiği Voice: $hget(voicelist,%i).data ( Performans $+(%,$token($calc($hget(voicelist,%i).data *100/ %q),1,46)) ) | inc %i } } }

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
  Alıntı ile Cevapla

IRCForum.Net - Reklam Alanı

Cevapla
IRCForum.Net - Sponsor Bağlantılar


Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB kodu Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık