mİRC'de Whois'e Bilgi Ekleme Kodu


mİRC’de Whois’e Bilgi Ekleme Kodu

on *:Text:*:#KANAL: {
if $1 == !iptal && %rcsil { msg $chan İşlem iptal edildi. | unset %rcsil | return }
if $1 == !devam && %rcsil { msg $chan [RCDepo/ $+ %rcsil $+ / $+ $nick $+ ] $2 nickine ait RC girdileri silinmiştir. | .remove RC/ $+ %rcsil $+ .txt | unset %rcsil }
if $1 == !bilgi {
if !$2 {
.msg $chan Kullanım şekli:
.msg $chan !bilgi list (RC bilgilerini Listeler)
.msg $chan !bilgi ekle Nick mesajınız (Nick’e RC bilgisi ekler)
.msg $chan !bilgi oku Nick (Nick’in RC bilgisini okur)
.msg $chan !bilgi sil Nick (Nick’e ait RC dosyasını siler)
return
}
if $2 == list {
if $findfile($mircdirrc,*.txt,0) == 0 {
.msg $chan Hata! RC Deposu boş.
}
else {
.msg $chan [RCDepo/ $+ $nick $+ ] – RC Deposu kontrol ediliyor..
var %a = 1
while $findfile($mircdirrc,*.txt,%a) {
msg $chan  $+ $gettok($nopath($v1),1,46) $+  kayıtlı RC dosyası
inc %a
}
}
}
if $2 == ekle {
if !$exists(RC) { mkdir RC }
.write RC/ $+ $3 $+ .txt [ $+ $date $+ – $+ $time $+ – $+ $3 $+ ] : $4- [Ekleyen: $nick ]
.write RC/ $+ $3 $+ .txt –
.msg $chan [RCDepo/ $+ $3 $+ / $+ $nick $+ ] $3 nickine RC geçilmiştir.
}
if $2 == oku {
if !$file(RC/ $+ $3- $+ .txt) {
.msg $chan  $+ $3 $+  kayıtlı bilgi girdisi bulunamadı.
}
else {
.msg $chan [RCDepo/ $+ $nick $+ ] – $3- kayıtlı RC dosyası kontrol ediliyor..
saydır $2-
}
}
if $2 == sil {
if !$isfile(RC/ $+ $3- $+ .txt) {
.msg $chan Hata! $2 kayıtlı RC dosyası bulunamadı.
}
else {
.msg $chan UYARI! Bu komut ile $2 kaydına ait bütün girdileri silersiniz.
.msg $chan Uygulamaya devam etmek istiyorsanız ; !Devam ,
.msg $chan Uygulamayı iptal etmek istiyorsanız ; !iptal yazınız.
.set -e %rcsil $3
}
}
}
}

alias saydır {
.timersaydır.* off
var %s 1
var %a 1
while %s <= $lines(RC/ $+ $2- $+ .txt) {
.timersaydır. $+ %s 1 %a msg $chan $read(RC/ $+ $2- $+ .txt,%s)
inc %s
inc %a 2
}
}

Aralık 22, 2012 tarihinde Hazır Kodlar içinde yayınlandı ve , , , , , , , , olarak etiketlendi. Kalıcı bağlantıyı yer imlerinize ekleyin. Yorum yapın.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: