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

sniper · 09 Ocak 2009, 13:38

help kanalında verilen + ları kayıt eder
on *:voice:#Help:$read(nikler.txt,w,$nick),write nikler.txt $nick)

aşağıdaki nickler !sıfırla ve !rapor komtunu uygulaya bilsin demek

if !$istok(ahmet mehmet hüseyin,$nick,32) { return }

benim yapmak istediğim help kanalında verilen + ları kay detmek ve helpers kanalında da !info nick yazan o nick in ne kadar + verdiğini rakam olarak göre bilsin istiyorum ahmet mehmet hüseyin !rapor yazdığında tüm voice sayılarını versin helpers kanalında ve !sıfırla dediğinde ahmet mehmet hüseyin se !sıfırla yazan sıfırlasın istiyorum
!info nick yazdıklarında + vermemiş ise vermemiştir desin silip listelerkende şimdiden tşk
biraz uğraştım hiç yoktan iyidir gerisini tammalarsanız iyi olur

Difuzyon · 09 Ocak 2009, 15:51

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

on *:voice:#help: {
  if $read(nikler.txt,w,$+(*,$nick,*)) { write $+(-,l,$readn) nikler.txt $nick $calc($token($read(nikler.txt,$readn),2,32) + 1) }
  else { write nikler.txt $nick 1 }
}
on *:text:*:#helper: {
  if $1 == !info && $2 {
    if $read(nikler.txt,w,$+(*,$2,*)) { msg $chan 12 $2 2nickinin voice sayısı =>4 $gettok($read(nikler.txt,w,$+(*,$2,*)),2,32) }
    else { msg $chan 4 $2 2nicki listede yok. }
  }
  if !$istok(Halil Hasan Cenk,$nick,32) { return }
  if $1 == !rapor {
    msg $chan 5-12 #Help 5kanalı voice istatikleri -
    var %voices 1
    while %voices <= $lines(nikler.txt) {
      msg $chan 4 $gettok($read(nikler.txt,%voices),1,32) 2voice sayısı =>6 $token($read(nikler.txt,%voices),2,32))
      inc %voices
    }
    msg $chan 5- Liste Sonu -
  }
  if $1 == !sil && $2 {
    if $read(nikler.txt,w,$+(*,$2,*)) { write $+(-,d,l,$readn) nikler.txt | msg $chan 4 $2 2nicki listeden silindi. }
    else { msg $chan 4 $2 2nicki listede yok. }
  }
  if $1 == !sıfırla {
    msg $chan 2-4 #Help 2kanalı voice sayıları sıfırlanmıştır -
    var %zero 1
    while %zero <= $lines(nikler.txt) {
      write $+(-,l,%zero) nikler.txt $token($read(nikler.txt,%zero),1,32) 0
      inc %zero
    }
  }
}

#helper kanalında !info nick komutunu herkes kullanabilir.Diğer komutları kullanabilecek kişiler Halil Hasan Cenk nickleri olarak belirttim.Şayet tüm komutları bu nickler kullansın demek istediysen,o satırı text event'ının hemen altına başlangıç olarak yazmalısın.

İyi forumlar...

sniper · 09 Ocak 2009, 16:16

denedim çok güzel çalışıyor son bir isteğim olucak mümkünse help kanalında % & @ bir birine + verdiklerinde onları kayt tutmasın istiyorum bunuda yaparsak iiy olur tşk

Difuzyon · 09 Ocak 2009, 16:37

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

on *:voice:#help: {
  if !$count($nick(#help,$vnick).pnick,%,@,&) {
    if $read(nikler.txt,w,$+(*,$nick,*)) { write $+(-,l,$readn) nikler.txt $nick $calc($token($read(nikler.txt,$readn),2,32) + 1) }
    else { write nikler.txt $nick 1 }
  }
}
on *:text:*:#helper: {
  if $1 == !info && $2 {
    if $read(nikler.txt,w,$+(*,$2,*)) { msg $chan 12 $2 2nickinin voice sayısı =>4 $gettok($read(nikler.txt,w,$+(*,$2,*)),2,32) }
    else { msg $chan 4 $2 2nicki listede yok. }
  }
  if !$istok(Halil Hasan Cenk,$nick,32) { return }
  if $1 == !rapor {
    msg $chan 5-12 #Help 5kanalı voice istatikleri -
    var %voices 1
    while %voices <= $lines(nikler.txt) {
      msg $chan 4 $gettok($read(nikler.txt,%voices),1,32) 2voice sayısı =>6 $token($read(nikler.txt,%voices),2,32))
      inc %voices
    }
    msg $chan 5- Liste Sonu -
  }
  if $1 == !sil && $2 {
    if $read(nikler.txt,w,$+(*,$2,*)) { write $+(-,d,l,$readn) nikler.txt | msg $chan 4 $2 2nicki listeden silindi. }
    else { msg $chan 4 $2 2nicki listede yok. }
  }
  if $1 == !sıfırla {
    msg $chan 2-4 #Help 2kanalı voice sayıları sıfırlanmıştır -
    var %zero 1
    while %zero <= $lines(nikler.txt) {
      write $+(-,l,%zero) nikler.txt $token($read(nikler.txt,%zero),1,32) 0
      inc %zero
    }
  }
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
AÖL kayıt yenileme tarihleri Açık Lise kayıt şartları	Seth	AÖL	0	15 Ekim 2014 00:45
voice host kayıt	snipercem	mIRC Scripting Sorunları	3	07 Haziran 2009 15:39
Voice Kayıt Sistemi hakkında bilgi almak istiyorum?	BuReNeuS	mIRC Scripting Sorunları	17	01 Mart 2009 20:45
Voice	MoRtaL_	mIRC Scripting Sorunları	4	09 Ekim 2007 17:50

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.