Konu: voice info
Tekil Mesaj gösterimi
Alt 25 Mart 2009, 05:53   #4
Çevrimiçi
CesuryureK
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: voice info




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 $== !vlist && $!= $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 $
== !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 $== !vlist && $!= $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 $
== !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,$readnVoiceNick.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 $
== !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,32nickli Kişi $token($read(VoiceNick.txt,%voice),2,32))
          
inc %voice
        
}
        
msg $chan Voice Vermişler.
      }
    }
    if $
== !sifirla {
      
msg $chan %kanal voice verme istatistikleri sifirlanmistir.
      var %
t 1
      
while %<= $lines(VoiceNick.txt) {
      
write $+(-,l,%tVoiceNick.txt $token($read(VoiceNick.txt,%t),1,320
        inc 
%t
      
}
    }
  }


Kullanım : !VoiceList

__________________
Şimdi Saat Sensizliğin Ertesi..
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet bizimmekan sohbet odaları