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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)
-   -   Ufacik bir Tcl isteği (https://www.ircforumlari.net/eggdrop-neostats-bnc/375607-ufacik-bir-tcl-istegi.html)

kup{a}pazl 06 Ocak 2011 00:21

Ufacik bir Tcl isteği
 
Merhaba arkadaşalr bir isteğim olucak,

Kod:


#oto+m on
on *:quit:{
  mkontrol
}
on *:rawmode:%global: {
  if $2 == %botnick { halt }
  if ($regex($1,\+(o|a|q))) {
    kkontrol $chan
  }
  if ($regex($1,\-(o|a|q))) {
    kontrol $chan
  }
}
alias mkontrol {
  var %; 1
  while %; <= $numtok(%global,44) {
    .timer 1 1 /kontrol $gettok(%global,%;,44)
    inc %;
  }
}
alias kkontrol { if $nick($1,0,o) == 2 { .msg $1 Kanala Yetkili Girmiştir Kanal Konusmaya Acilmiştir! | mode $1 -m  } }
alias kontrol { if $nick($1,0,o) == 1 { mode $1 +m } }
on *:part:%global: {
  .timer 1 1 kontrol #
}
on *:kick:%global: {
  .timer 1 1 kontrol #
}
 
#oto+m end


Bu remotenin özelliği malum kanalda yönetici olmayınca kanalı +m moduna alıyor bunu botun baglandıgı andan itibaren calısacak sekilde ve tek bir kanal için tcl olarak düzenleyebilirmiyiz ?


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk