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

Selim01 · 25 Mart 2009, 00:01

arkadaşlar kolay gelsin ben günlük voice kaydı tutan bir kod istiyorum mümkünse yani pazartesi salı çarşamba vs her gün kim nekadar + vermiş kayıt tutulmasını istiyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Editor · 25 Mart 2009, 00:06

Lütfen forum içersinde arama yapınız.Arama Şekli ''Voice'' , ''Vop'' vb.

Selim01 · 25 Mart 2009, 03:07

iyide dostum benim istediğim gibi yok sanırım

CesuryureK · 25 Mart 2009, 05:53

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


on *:voice:#KANAL:{
  if $nick == $vnick || $nick == $me { halt }
  if !$readini(hvc.ini,$replace($day,Monday,Pazartesi,TuesDay,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar),$nick) { writeini -n hvc.ini $replace($day,Monday,Pazartesi,TuesDay,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) $nick 1 }
  else { writeini -n hvc.ini $replace($day,Monday,Pazartesi,TuesDay,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) $nick $calc($readini(hvc.ini,$replace($day,Monday,Pazartesi,TuesDay,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar),$nick) + 1) }
}
on *:text:*:#KANAL:{
  if $1 == !vlist && $2 != $null {
    var %dtot = $ini(hvc.ini,$2,0)
    if %dtot { msg #  $2 tarihi için voice'ler listeleniyor.. }
    while %dtot { msg # 2Nick1: $ini(hvc.ini,$2,%dtot) --- 4Voice Sayısı1: $readini(hvc.ini,$2,$ini(hvc.ini,$2,%dtot)) | dec %dtot }
  }
  if $1 == !vdlist { var %dtt = $ini(hvc.ini,0) | msg # 4 $+ Kayda alınan tarih listeleri. | while %dtt { msg # $ini(hvc.ini,%dtt) | dec %dtt } }
}
alias vclear { $iif(!$1,msg # Tarih belirtmediniz.,remini hvc.ini $$1) }

!Vdlist : Voice tutulan günleri listeleyecektir.
!vlist Günadı : o gün verilmiş voice istatistiklerini verecektir.
kod mevcuttu Kimin yazdığını hatırlamıyorum.bende istediğine göre düzenledim..
____

aşağıdaki kod ise, Gun/Ay/Yıl Cinsinden Listeler.

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


on *:voice:#KANAL:{
  if $nick == $vnick || $nick == $me { halt }
  if !$readini(hvc.ini,$date,$nick) { writeini -n hvc.ini $date $nick 1 }
  else { writeini -n hvc.ini $date $nick $calc($readini(hvc.ini,$date,$nick) + 1) }
}
on *:text:*:#kanal:{
  if $1 == !vlist && $2 != $null {
    var %dtot = $ini(hvc.ini,$2,0)
    if %dtot { msg #KANAL $2 tarihi için voice'ler listeleniyor.. }
    while %dtot { msg #KANAL 2Nick1: $ini(hvc.ini,$2,%dtot) --- 4Voice Sayısı1: $readini(hvc.ini,$2,$ini(hvc.ini,$2,%dtot)) | dec %dtot }
  }
  if $1 == !vdlist { var %dtt = $ini(hvc.ini,0) | msg #KANAL 4 $+ Kayda alınan tarih listeleri. | while %dtt { msg #KANAL $ini(hvc.ini,%dtt) | dec %dtt } }
}
alias vclear { $iif(!$1,msg #KANAL Tarih belirtmediniz.,remini hvc.ini $$1) }

Kullanım : !vdlist
Kullanım : !vlist Tarih
___

Aşağıdaki Kod İse, Gün ve Tarih Sınırlaması Koymadan Kim Kaç voice vermişse detaylı bilgi verir.

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


on *:voice:#KANAL: {
set %Kanal $chan
  if !$count($nick(#help,$vnick).pnick,%,@,&) {
    if $read(VoiceNick.txt,w,$+(*,$nick,*)) { write $+(-,l,$readn) VoiceNick.txt $nick $calc($token($read(VoiceNick.txt,$readn),2,32) + 1) }
    else { write VoiceNick.txt $nick 1 }
  }
}
on *:text:*:#KANAL: {
  if ($nick ison $chan) {
    if $1 == !voiceList {
      if $lines(VoiceNick.txt) == 0) { msg #  %Kanal Kanalında Voice Verilmemiştir. | halt }
      else {
        msg $chan - %Kanal Kanalı Voice Bilgileri
        var %voice 1
        while %voice <= $lines(VoiceNick.txt) {
msg $chan  $gettok($read(VoiceNick.txt,%voice),1,32) nickli Kişi $token($read(VoiceNick.txt,%voice),2,32))
          inc %voice
        }
        msg $chan Voice Vermişler.
      }
    }
    if $1 == !sifirla {
      msg $chan %kanal voice verme istatistikleri sifirlanmistir.
      var %t 1
      while %t <= $lines(VoiceNick.txt) {
      write $+(-,l,%t) VoiceNick.txt $token($read(VoiceNick.txt,%t),1,32) 0
        inc %t
      }
    }
  }
}

Kullanım : !VoiceList

Skills · 25 Mart 2009, 21:10

Dalgamı Geçiyorsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Lucifer · 25 Mart 2009, 21:34

Telif hakkı istiyorum:P

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Nick INFO ve Chan INFO [(Son görülen zaman, kayit zamani, son kullanim) IRCServices	NeTDeLiSi	Services Hazır Kodlar	13	09 Ekim 2010 00:43

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.