böyle bir tcl var mı yada olabilirmi. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

maharajah · 28 Kasım 2007, 04:52

tcl şöyle olucak
!yarat vb. komut ile eggbot istenilen nick te bir svsbot oluşturucak
veya olabiliyorsa
!yarat nick #kanal şeklinde bot oluşturulucak ve istenilen kanala sokulucak mümkün olmayan birşey yokturda bunuda yapması biraz zor sanırım ugrastım ama kafam almadı
şimdiden teşekkurler..
(servis olarak ircservices)

Oluşturmayı yaptımda kanala nasıl sokturucam

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


bind pub - !yarat bnick
#PROC
proc bnick  {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "os Raw : NICK $text 1 1 Services services.m-net  services.xxx.net :Kanal Botu."
putquick "privmsg $chan : $text Basariyla Oluşturuldu $nick"
 
}

CLubber · 25 Ağustos 2010, 21:21

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


set ops_chan "#Opers"
 
bind pub - !yarat yarat
 
proc yarat {nick uhost handle chan text} {
global ops_chan
set gnick [lindex $text 0]
set kanal [lindex $text 1]
if {![validchan $kanal]} {
putquick "OperServ Raw :$gnick join $kanal"
putquick "PRIVMSG $ops_chan $nick Tarafından $gnick Nicki $kanal Kanalına Alınmıştır."
}

İşini Görücektir..

Raw · 27 Ağustos 2010, 00:07

Aslında SaW basit tcl yazmamıza kızıyor ama işini görürse mutlu olacağımdan yazmak istedim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Buyur kodlar gerekli ayarlamaları yapıp kullanırsın, iyi forumlar ..

!botyap nick #kanal

komutu yada belirlediğin başka bir komut ile kullanabilirsin.

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


########################################
#                                      #
#       Services Bot TCL by Raw        #
#                                      #
#                                      #
# !botyap nick #kanal  komutu ile      #
# belirlediğimiz nickte ve +B flagıyla #
# services bot oluşturup belirlenen    #
# kanala alıcaktır.                    #
#                                      #
#         senali [ @ ] live.com        #
#                                      #
########################################
 
 
# Çalıştırcak komutu girelim
set svs(komut) "!botyap"
 
# Komutun çalışacağı kanalı girelim
set svs(chan) "#opers"
 
# Bot için fullname girelim
set svs(realname) "Service Bot"
 
# Bot hostumuzu girelim
set svs(host) "domain.com"
 
# Bot identimizi girelim
set svs(ident) "services"
 
# Services Hostumuzu Girelim
set svs(name) "services.domain.com"
 
 
###############################
#   Ayar bitti ,TCL yazalım   #
#  Bilmiyosak kurcalamayalım  #
###############################
 
bind pub - $svs(komut) svsbot
proc svsbot {nick uhost hand chan text} {
 global svs
    set snick [lindex $text 0]
    set schan [lindex $text 1]
   if {![string match -nocase $svs(chan) $chan]} {return 0}
   if { $schan == "" } {
    putquick "privmsg $chan Nick yada kanal belirtmediniz. Kullanım : < $svs(komut) nick #kanal > şeklindedir."
    return 0
      }
   if {![string match -nocase "#*" $schan]} {
    putquick "privmsg $chan Kanal adı girerken başında # belirtiniz. Kullanım : < $svs(komut) $snick #$schan > şeklindedir."
    return 0
      }
    putquick "privmsg OperServ raw nick $snick 1 1 $svs(ident) $svs(host) $svs(name) :$svs(realname)"
    putquick "privmsg OperServ raw svsmode $snick +B"
    putquick "privmsg OperServ raw :$snick join $schan"
    putquick "privmsg $chan *** $snick , başarı ile oluşturulup $schan odasına alındı."
}
 
###
putlog "Service Bot TCL yuklendi - coded by Raw"
###

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Böyle Bir ŞEy Olabilirmi	Tejxele	IRCServices	1	07 Ekim 2012 21:50
böyle bir kod olabilirmi	Set	mIRC Scripting Sorunları	2	08 Mayıs 2009 19:03
Evet Böyle Bişi Olabilirmi Sevgili üstatlar	Linqu	Unreal IRCd	10	20 Mayıs 2008 17:15

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.