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

3Beğeni(ler)
  • 2 Post By YouMyCure
  • 1 Post By IRC-Dancer

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 20 Mart 2016, 20:37   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



bir irc serverindeki chanserv departmanında görmüştüm özellikle #sales işlemi yapan sunucular için işe yarayacak bir kod kiralanan kanalları kimin kiraladığını founder ve cofounder vs gibi özellikleri kayıt altına almak için kullanılacak bir kod.

Sock uyarlıdır isteyen olursa mirc haline çevirebilirim.
#####################################
#Kullanımı;
#.fekle #Kanal Founder CoFounder(Successor)
#.fsil KanalNumarası
#.founders
#####################################

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias _nick return $remove($gettok($1,1,33),:) if $right($4,-1) == !fekle || $right($4,-1) == .fekle { if !$5 || !$6 || !$7 { swbot privmsg $3 2Hatalı Kullanım Lütfen 4.fekle #Kanal Founder Cofunder 2Şeklinde Kullanın. | return } write foundersc.txt 14[ 4Kanal:2 $5 14|4 Founder:2 $6 14|4 CoFounder:2 $7 14|4 Ekleyen:2 $_nick($1) 14] set %yenisifre $r(10000000,99999999) swbot cs set $5 founder $6 | swbot cs set $5 successor $7 | swbot cs set $5 password %yenisifre swbot privmsg $6  $5 Kanalı Üzerinize Devredilmiştir. Yeni Şifreniz %yenisifre swbot ms send $5 Kanalı Size Devredilmiştir. Hayırlı Olsun. Yeni Şifresi; %yenisifre unset %yenisifre swbot privmsg $3 : $5 Kanalı Founders Listesine Eklenmiştir... } if $right($4,-1) == !founders || $right($4,-1) == .founders { swbot privswbot privmsg #opersglobal-yönetim 2-= Founders Kanal Listesi =- swbot privswbot privmsg #opersglobal-yönetim  var %i 1 while (%i <= $lines(foundersc.txt)) { swbot privmsg $3 : %i $+ .4) $read(foundersc.txt,%i) inc %i } } if $right($4,-1) == !fsil || $right($4,-1) == .fsil { write -dl $+ $5 foundersc.txt swbot privmsg #global-yönetim $5 Numaralı Kanal Founders Listesinden Silindi. }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { if $regex($1,/([.!]fekle)/Si) { if !$2 || !$3 || !$4 { .msg $chan 2Hatalı Kullanım Lütfen 4.fekle #Kanal Founder Cofunder 2Şeklinde Kullanın. | return } write foundersc.txt 14[ 4Kanal:2 $2 14|4 Founder:2 $3 14|4 CoFounder:2 $4 14|4 Ekleyen:2 $nick 14] set %yenisifre $r(10000000,99999999) cs set $2 founder $3 | cs set $2 successor $4 | cs set $2 password %yenisifre msg $3  $2 Kanalı Üzerinize Devredilmiştir. Yeni Şifreniz %yenisifre ms send $3 Kanalı Size Devredilmiştir. Hayırlı Olsun. Yeni Şifresi; %yenisifre unset %yenisifre msg $chan $2 Kanalı Founders Listesine Eklenmiştir... } if $regex($1,/([.!]founders)/Si) { msg $chan 2-= Founders Kanal Listesi =- msg $chan  var %i 1 while (%i <= $lines(foundersc.txt)) { msg $chan %i $+ .4) $read(foundersc.txt,%i) inc %i } } if $regex($1,/([.!]fsil)/Si) { write -dl $+ $2 foundersc.txt msg $chan $2 Numaralı Kanal Founders Listesinden Silindi. } }

mirc bot çevirisi.


Konu Feragat tarafından (22 Mart 2016 Saat 21:05 ) değiştirilmiştir. Sebep: Birleştirildi
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 27 Haziran 2016, 03:49   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Founders Kanal Eklentisi - Nomercy




Yeni versiyonlarda bu zaten mevcud.

__________________
kS.-.cMGz
 
Alıntı ile Cevapla

Cevapla

Etiketler
founders kanal eklentisi youmycure


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
op kanalı eklentisi gibi Founder kanalı eklentisi C3RVANT3S Services Hazır Kodlar 15 20 Aralık 2011 18:49
NoMercy !op !deop !voice kanal komutlarında operlerden @ istemesin EHost-Gökhan Eggdrop, NeoStats, BNC 3 03 Kasım 2009 15:34
kanal a /cs access #kanal list çekinde services gidiyor neden ola bilir :( EEkreMM Servisler 3 07 Ocak 2008 17:39