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/)

- - Opme TCL Yardim (https://www.ircforumlari.net/tcl-scriptler/39132-opme-tcl-yardim.html)

JackaL

07 Ekim 2007 00:08

Opme TCL Yardim

PHP- Kodu:

   ################################################################################
# opal.tcl 1.0 - 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">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"

}

Arkadaşlar Her Odada Op Veriyor Ben Sadece #U_* Uzantılı Kanallarda Versin Istiyorum Ne Yapmam Lazım

zafer84

12 Kasım 2008 22:58

Cevap: Opme TCL Yardim

Ya arkadaşlar bilen biri lütfen yardım etsin bu tcl yi ekledim fakat hangi kanalda olursa olsun opver #kanal yazdıgımda op veriyor..
Ben sadece #ops kanalında opver #kanal yazıldıgında op vermesini istiyorum ..
Lütfen yardım.

zafer84

14 Kasım 2008 11:11

Cevap: Opme TCL Yardim

Yokmu Üstad Arkadaşlar Yardımcı Olabilecek.. opver #kanal komutunun sadece #ops kanalında işlemesini istiyorum.. Bu kodlar bütün kanallarda op veriyor .?

Lucifer

14 Kasım 2008 12:17

Cevap: Opme TCL Yardim

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

- Buradan istediğin bilgiyi alabilirsin..

- Koruma , Küfür , Reklam Vb. Bütün Botlarin TCL'leri burada mevcuttur..

GhostLy

14 Kasım 2008 12:22

Cevap: Opme TCL Yardim

birde bu şekilde deneyin..

Kod:

# Botun giriste ircop olmasi icin gerekli ircop nicki

set inick "X"

# Buda gerekli olan sifre

set ipass "11111"

 

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} {

set kanal [lindex $a 0]

if {![string match -nocase "#ops" "$c"]} {return 0}

putquick "FJOIN $kanal $n"

putquick "samode $kanal +o $n"

}

zafer84

14 Kasım 2008 15:16

Cevap: Opme TCL Yardim

Hocam bu şekildede hiç bir tepki vermiyor

zafer84

14 Kasım 2008 15:18

Cevap: Opme TCL Yardim

Arkadaşlar #Ops Kanalında

opme #kanal yada opver #kanal yazildiginda o kanala sajoinleyip ve o kanal da op vercek bir tcl ariyorum..
yardımcı olabilirmisiniz..

BuCaLI

14 Kasım 2008 20:44

Cevap: Opme TCL Yardim

GhostLy nin verdiği kodu bir daha dene bu şekilde istediğin gibi çalışması gerekiyor..

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