!acc nick seviye - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

MerakLıuSer · 11 Aralık 2010, 18:05

selamunaleyküm arkdaslar. sizden bir kode rica etcem ugrasarak yapamadıgım bisey.

!acc nick seviye
seviye kısmına 1 ile 50 arası bir seviyeden nick ekledigimde: kolay.txt
seviye kısmına 50 ile 200 arası bir seviyeden nick ekledigimde: orta.txt
.
.
.
700 ile 1000 arası bir seviyeden nick ekledigimde: zor.txt içine kayıt etsin nick'i:
örn: !acc deneme 45
kolay.txt içine eklendi. içinde su sekilde ekli;
deneme 45
ali 40
veli 35
gibi.

!acc deneme 55 dediğimdede kolay.txt'den silip orta.txt içine kayıt edebilecek bir codeye ihtiyacım var.
hayırlı forumlar...

Difuzyon · 11 Aralık 2010, 20:49

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

on $*:text:/[!]acc\s(\S+)\s(\d+)/ASi:#kanal:{
  if $regml(2) isnum 01-50 { 
    if $read(kolay.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(kolay.txt,$readn),2,32) | write $+(-dl,$readn) kolay.txt }
    elseif $read(orta.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(orta.txt,$readn),2,32) | write $+(-dl,$readn) orta.txt }
    elseif $read(zor.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(zor.txt,$readn),2,32) | write $+(-dl,$readn) zor.txt }
    write kolay.txt $regml(1) $regml(2)
    msg $chan $iif(%difynumber,$regml(1) nicki %difynumber seviyesinden $regml(2) seviyesine $iif((%difynumber > $regml(2)),azaltıldı,yükseltildi),$regml(1) nicki $regml(2) seviyesinden eklendi)
  }
  elseif $regml(2) isnum 51-200 { 
    if $read(kolay.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(kolay.txt,$readn),2,32) | write $+(-dl,$readn) kolay.txt }
    elseif $read(orta.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(orta.txt,$readn),2,32) | write $+(-dl,$readn) orta.txt }
    elseif $read(zor.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(zor.txt,$readn),2,32) | write $+(-dl,$readn) zor.txt }
    write orta.txt $regml(1) $regml(2)
    msg $chan $iif(%difynumber,$regml(1) nicki %difynumber seviyesinden $regml(2) seviyesine $iif((%difynumber > $regml(2)),azaltıldı,yükseltildi),$regml(1) nicki $regml(2) seviyesinden eklendi)
  }
  elseif $regml(2) isnum 700-1000 { 
    if $read(kolay.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(kolay.txt,$readn),2,32) | write $+(-dl,$readn) kolay.txt }
    elseif $read(orta.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(orta.txt,$readn),2,32) | write $+(-dl,$readn) orta.txt }
    elseif $read(zor.txt,w,$+(*,$regml(1),*)) { set %difynumber $token($read(zor.txt,$readn),2,32) | write $+(-dl,$readn) zor.txt }
    write zor.txt $regml(1) $regml(2)
    msg $chan $iif(%difynumber,$regml(1) nicki %difynumber seviyesinden $regml(2) seviyesine $iif((%difynumber > $regml(2)),azaltıldı,yükseltildi),$regml(1) nicki $regml(2) seviyesinden eklendi)
  }
  unset %difynumber
}

MerakLıuSer · 11 Aralık 2010, 21:46

tesekkürler. peki: !acc deneme 35 diye kolay.txt ekledigim bir nicki tekrar: !acc deneme 45 diye aynı klasör'e eklemeye kalktıgımda söyle bisey yapabilirmiyiz:
!acc deneme 35 ekledi.
tekrar: !acc deneme 45 kolay.txt içindeki 35 seviyeye ait deneme seviye 45 olarak değiştirildi. gibi.
yada 35 den 45 olunca yükseltildi. 45 den 35'e düserse alcaltıldı gibi.

----------

MerakLıuSer Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

tesekkürler. peki: !acc deneme 35 diye kolay.txt ekledigim bir nicki tekrar: !acc deneme 45 diye aynı klasör'e eklemeye kalktıgımda söyle bisey yapabilirmiyiz:
!acc deneme 35 ekledi.
tekrar: !acc deneme 45 kolay.txt içindeki 35 seviyeye ait deneme seviye 45 olarak değiştirildi. gibi.
yada 35 den 45 olunca deneme 45'e yükseltildi. 45 den 35'e düserse deneme nicki 35'e alcaltıldı gibi.

bi oturtamadım bunları usta.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
/ops #kanal nick seviye	Silence	Unreal IRCd	21	15 Ekim 2009 04:49
Kanalda Seviye	Editor	mIRC Scripting Sorunları	10	07 Mayıs 2008 22:04

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.