IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum (https://www.ircforumu.net/)
-   ConferenceRoom (https://www.ircforumu.net/conferenceroom/)
-   -   ConferenceRoom Channel İnfo Komutu ve Kodu (https://www.ircforumu.net/conferenceroom/2844-conferenceroom-channel-info-komutu-ve-kodu.html)

immortaL 01 Temmuz 2016 17:22

ConferenceRoom Channel İnfo Komutu ve Kodu
 
Arkadaşlar CR Sunucularda Kanallara İnfo Çekip Kanal Hakkında Bilgi Almaya Yarar iSter Kendi Botunuza ekleyin iSter Kendi Scriptinize Ekleyin Size Kalmış.


KIRMIZI Renkte Belirtdiğim #Opers Kanallarını Kendinize Göre Ayarlıya Bilirsiniz.



Bu code Text Eventi İle Yazıldı Botunuza Ekliyerek Kullanabilirsiniz.

Kullanma Komutu: !csinfo #kanaladı



Kod:

on *:text:*:#opers:{
  if $strip($1) == !csinfo && $2 {
    .enable #csinfo | cs info $2 | set %kanalım $2 | .timerlist 1 2 .disable #csinfo
  }
}

#csinfo off
on *:notice:*:*:{
  if ($nick == Chanserv) {
    if (*Kanal Sahibi* iswm $1-) { msg #opers 4Kanal Sahibi:10 $3 }
    if (*kayıt Tarihi* iswm $1-) { msg #opers 4Kanal K.Tarihi:2 $3- }
    if (*Enson Girişi* iswm $1-) { msg #opers 10FoundeR4'in Enson Girişi:2 $3- }
    if (*Kanal Modları* iswm $1-) { msg #opers 4Kanal Modları:2 $3- }
    if (*Son Topic*  iswm $1-) { msg #opers 4Kanal Başlığı: $3- | .timer 1 1  /msg #opers 4 %kanalım 2Kanalının 4info 2Bilgisi 3#opers 2kanalına listelendi.. }
    elseif $regex(sf,$1-,/The\schannel\s(.+)\sis\snot\sregistered/S) { msg #opers 4 $regml(sf,1) 2Kanalı Şifresizdir... }
  }
}
#csinfo end

Bu Code İnput Eventi İle Yazıldı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !csinfo #kanaladı

Kod:

on *:input:#opers:{
  if $strip($1) == !csinfo && $2 {
    .enable #csinfo | cs info $2 | set %kanalım $2 | .timerlist 1 2 .disable #csinfo
  }
}

#csinfo off
on *:notice:*:*:{
  if ($nick == Chanserv) {
    if (*Kanal Sahibi* iswm $1-) { msg #opers 4Kanal Sahibi:10 $3 }
    if (*kayıt Tarihi* iswm $1-) { msg #opers 4Kanal K.Tarihi:2 $3- }
    if (*Enson Girişi* iswm $1-) { msg #opers 10FoundeR4'in Enson Girişi:2 $3- }
    if (*Kanal Modları* iswm $1-) { msg #opers 4Kanal Modları:2 $3- }
    if (*Son Topic*  iswm $1-) { msg #opers 4Kanal Başlığı: $3- | .timer 1 1  /msg #opers 4 %kanalım 2Kanalının 4info 2Bilgisi 3#opers 2kanalına listelendi.. }
    elseif $regex(sf,$1-,/The\schannel\s(.+)\sis\snot\sregistered/S) { msg #opers 4 $regml(sf,1) 2Kanalı Şifresizdir... }
  }
}
#csinfo end



Bu Code İnput Eventi İle Yazıldı Sadece Siz Kullana Bilirsiniz ECHO Komutu İlede sonucları Sadece Siz Görebilirsiniz.

Kullanma Komutu: !csinfo #kanaladı


Kod:

on *:input:#opers:{
  if $strip($1) == !csinfo && $2 {
    .enable #csinfo | cs info $2 | set %kanalım $2 | .timerlist 1 2 .disable #csinfo
  }
}

#csinfo off
on *:notice:*:*:{
  if ($nick == Chanserv) {
    if (*Kanal Sahibi* iswm $1-) { echo -a 4Kanal Sahibi:10 $3 }
    if (*kayıt Tarihi* iswm $1-) { echo -a 4Kanal K.Tarihi:2 $3- }
    if (*Enson Girişi* iswm $1-) { echo -a 10FoundeR4'in Enson Girişi:2 $3- }
    if (*Kanal Modları* iswm $1-) { echo -a 4Kanal Modları:2 $3- }
    if (*Son Topic*  iswm $1-) { echo -a 4Kanal Başlığı: $3- | .timer 1 1  echo -a 4 %kanalım 2Kanalının 4info 2Bilgisi 3Tarafınıza 2listelendi.. }
    elseif $regex(sf,$1-,/The\schannel\s(.+)\sis\snot\sregistered/S) { echo -a 4 $regml(sf,1) 2Kanalı Şifresizdir... }
  }
}
#csinfo end


Bu Code Alias İle Yazıldı Sadece Kendiniz Yazıp Kullanıp sonuçları Görebilirsiniz.

Kullanma Komutu: /csinfo #kanaladı


Kod:

alias csinfo {
  if !$1 { echo -a 4HATA 2Eksik Komut Kullandınız! 4Doğru Kullanımı: 1/csinfo #kanaladı | halt }
  elseif $regex($1,/[[:digit:]]/i) { echo -a 4HATA 2Kanal Adını Renkli Yazı veya Rakam Yazarak Kullanamazsınız. | echo -a 4Doğru Kullanımı: 1/csinfo #kanaladı | halt }
  elseif $2 { echo -a 4HATA 2Fazla Komut Kullandınız! 4Doğru Kullanımı: 1/csinfo #kanaladı | halt }
  set %kanalım $1
  .enable #csinfo
  cs info $1
  .timerlist 1 2 .disable #csinfo
}

#csinfo off
on *:notice:*:*:{
  if ($nick == Chanserv) {
    if (*Kanal Sahibi* iswm $1-) { echo -a 4Kanal Sahibi:10 $3 }
    if (*kayıt Tarihi* iswm $1-) { echo -a 4Kanal K.Tarihi:2 $3- }
    if (*Enson Girişi* iswm $1-) { echo -a 10FoundeR4'in Enson Girişi:2 $3- }
    if (*Kanal Modları* iswm $1-) { echo -a 4Kanal Modları:2 $3- }
    if (*Son Topic*  iswm $1-) { echo -a 4Kanal Başlığı: $3- | .timer 1 1  echo -a 4 %kanalım 2Kanalının 4info 2Bilgisi 3Tarafınıza 2listelendi.. }
    elseif $regex(sf,$1-,/The\schannel\s(.+)\sis\snot\sregistered/S) { echo -a 4 $regml(sf,1) 2Kanalı Şifresizdir... }
  }
}
#csinfo end


Bu Kodu Remotenize ekleyip Komutu Yazarak Bilgileri Görebilirsiniz.

Kullanma Komutu: /cs info #kanaladı

Kod:

on *:notice:*:*:{
  if ($nick == Chanserv) {
    if (*Kanal Sahibi* iswm $1-) { echo -a 4Kanal Sahibi:10 $3 }
    if (*kayıt Tarihi* iswm $1-) { echo -a 4Kanal K.Tarihi:2 $3- }
    if (*Enson Girişi* iswm $1-) { echo -a 10FoundeR4'in Enson Girişi:2 $3- }
    if (*Kanal Modları* iswm $1-) { echo -a 4Kanal Modları:2 $3- }
    if (*Son Topic*  iswm $1-) { echo -a 4Kanal Başlığı: $3- | .timer 1 1  echo -a 4 $me 2Kanalının 4info 2Bilgisi 3Tarafınıza 2listelendi.. }
    elseif $regex(sf,$1-,/The\schannel\s(.+)\sis\snot\sregistered/S) { echo -a 4 $regml(sf,1) 2Kanalı Şifresizdir... }
  }
}


Arkadaşlar Biraz Daha Pratik Olsun Diye Kendi Scriptinize Ekliyerekde Yapa Bilirsiniz.



Kod:

menu status,channel,query {
  Kanal Hakkında Bilgi Al:enable #csinfo | set %kanalım $$?="Kanal Adını Yazın.Örn: #Sohbet Gibi.." | cs info %kanalım | timer 1 3 disable #csinfo
}

#csinfo off
on *:notice:*:*:{
  if ($nick == Chanserv) {
    if (*Kanal Sahibi* iswm $1-) { echo -a 4Kanal Sahibi:10 $3 }
    if (*kayıt Tarihi* iswm $1-) { echo -a 4Kanal K.Tarihi:2 $3- }
    if (*Enson Girişi* iswm $1-) { echo -a 10FoundeR4'in Enson Girişi:2 $3- }
    if (*Kanal Modları* iswm $1-) { echo -a 4Kanal Modları:2 $3- }
    if (*Son Topic*  iswm $1-) { echo -a 4Kanal Başlığı:2 $3- | .timer 1 1  echo -a 4 %kanalım 2Kanalının 4info 2Bilgisi 3Tarafınıza 2listelendi.. }
    elseif $regex(sf,$1-,/The\schannel\s(.+)\sis\snot\sregistered/S) { echo -a 4 $regml(sf,1) 2Kanalı Şifresizdir... }
  }
}
#csinfo end



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 15:50.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.6.0
Copyright ©2005 - 2023 IRCForumu.Net - Tüm Hakları Saklıdır.