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/)
-   TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)
-   -   !sop !op !halfop !voice !sil opekle.tcl (https://www.ircforumlari.net/tcl-scriptler/46581-sop-op-halfop-voice-sil-opekletcl.html)

GhostLy 11 Şubat 2009 22:13

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
Kod:

bind pub - !opekle opsekle
set ops_c "#ops"
 
proc opsekle {n uh h c t } {
  global ops_c
if {$n != "Hayat"} {return 0}
if {[isop $n $] || [onchan $n $ops_c]==0} {
    putquick "cs aop #sohbet add $t"
    putquick "cs op #sohbet $t"
  }
}

Bu şekilde deneyiniz.

rX 19 Şubat 2009 19:36

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
Güzel Bir Tcl. Başarılarının Devamını Dilerim ...

Adanalee 02 Mayıs 2009 19:13

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
kanaldaki tüm banları nasıl sildiri örnek !silban yazınca kanaldaki banları açık

GhostLy 04 Mayıs 2009 00:38

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
Elimde BucaLı in yapmış olduğu guzel bir tcl kod'u banları temizlemek için işini görür :)

Kod:


bind pub - !bantemizle bantemizle
proc bantemizle { n u h c a } {
foreach ban [chanbans $c] {
append bans "[lindex $ban 0] "
}
putquick "MODE $c -bbbbbbbbbbbb [lrange $bans 0 11]"
putquick "MODE $c -bbbbbbbbbbbb [lrange $bans 12 23]"
putquick "MODE $c -bbbbbbbbbbbb [lrange $bans 24 end]"
putquick "privmsg $c $c Kanalındaki Tüm Banlar Temizlendi."
}


erd200 13 Mayıs 2009 04:09

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
Arkadaşlar bu tcl ile ilgili bir sorum olacak.

!at #kanalismi nick

#op kanalında oparatör olan bir görevlimiz bu komutu vererek Botumuza ilgili nicki attırabilirmiyiz.

!at #kanalismi nick bu komutu verince botumuz ilgili kişiyi kanaldan atacak. Ama komut sadece op kanalında çalışması lazım. Botumuz hem op kanalında hemde atılacak kişinin kanalında bulunuyor zaten.

erd200 13 Mayıs 2009 04:23

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
Teşekkürler arkadaşlar ilgili sorumu aşağıdaki linkten buldum.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Nurullahoruc 17 Mayıs 2009 19:00

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
ßu ircservices de oluyor mu !op dicen aop yetkisi olan qisi op yetikisi olmayan qisiye op veriyormu onerk !op Nick aop yazmak deqil yani ..

GemLik 17 Mayıs 2009 19:05

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
bu tcl op vermeye değil access eklemeye yarayan bir tcldir yani sadece Nurallah Nicki belirtilen kanalda !sop nick yazınca sop ekliyor !op nick yazınca op ekliyor gibi kanalları ve komudu kullanıcak nicki tcl de belirtiyorsunuz.

Nurullahoruc 18 Mayıs 2009 14:34

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
anlasıldıda usta bana !op diyince @ verecek bir tcl lazım !sop diyince !sop verecek yani accessi baska komutla uygulamak istiyorum ona benzer br tcl var dimi

toXic 18 Mayıs 2009 15:22

Cevap: !sop !op !halfop !voice !sil opekle.tcl
 
Kod:

################################################################################
# opal.tcl 1.0 -
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bu tcl nin amaci helperlarin ihticayi olduklari kanalda op almalarini sagla #
# maktir. Mynet myops botu ornek alinarak yapilmistir. Bot bulundugu kanaldan #
# verilen "opver #kanal" komutuna karsilik komutu veren kullaniciyi kanalda op #
# yapar. Dikkat edilmesi gereken kotu, botu normal kullanicilarin erisemiyecek #
# leri bir kanalda bulundurmaktir.! #
######################################################################Stonkeep##
 
# Botun giriste ircop olmasi icin gerekli ircop nicki
set inick
"X"
# Buda gerekli olan sifre
set ipass
"11111"
 
 
 
 
 
 
# Ayarlar Bu kadar.! DOKUNMAYIN!!!
#gerekli bindler
bind pub -
opver opver
bind evnt
- init-
server baglan_yap
proc baglan_yap
{type
} {
global
inick ipass
putserv
"OPER $inick $ipass"
putserv
"WALLOPS :Basari ile Login Oldum :)"
putserv
"sajoin #OpS"
putserv
"samode #Ops +o botnick"
putserv
"umode +c"
}
proc opver {n u h c a
} {
global
gnick
set gnick $n
set kanal
[lindex $a 0
]
putserv
"FJOIN $kanal $n"
putserv
"samode $kanal +o $n"




Böyle birşey vardı Bunu kullanın


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

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