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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 29 Haziran 2006, 23:05   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Global.tcl




Arkadaşlar Elinde Bu Belirlediğim 4-5 Tane msj belirli aralıklar gönderebilcek bir TCL bot bilen paylaşabilecek olan varmı olursa Çok iyi olur SaygıLar..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 30 Haziran 2006, 00:05   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Global.tcl




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#Konusma icin zaman sureci (Dk cinsinden)  
set zaman_araligi "10"  
 
  
#Uygulamanin calismasi icin  
#botun oper login ve nick login paslari  
 
#oper login  
set o_login "aCoustiC"  
 
#Oper Login sifresi  
set o_pass "opersifresi"  
 
#Nick identify sifresi  
set b_ipass "123456789"  
 
 
#bind 
bind evnt init-server baglanti:ayari  
 
#mesajlar  
set global_msg {  
  
"Kaybedecek birşeyi olmayan insandan korkulur..!"  
  "Sen Sen olmayı Bilki Sana Seni Sormasınlar ...!"  
}  
 
if {![
string match "*konusma_zamani*" [timers]]} {  
 
timer $zaman_araligi konusma_zamani  
}  
 
 
proc konusma_zamani {} {  
   global 
global_msg zaman_araligi  
   set global_rmsg 
[lindex $global_msg [rand [llength $global_msg]]]  
   
putserv "OS GLOBAL $global_rmsg"  
   
timer $zaman_araligi konusma_zamani  
   
return 1  
 
}  
proc baglanti:ayari {type} {  
  
putserv "NICKSERV IDENTIFY $b_ipass  
  putserv "
OPER $o_login $o_pass"  
  putserv "
WALLOPS :Global mesaj sistemi aktif!"  
}  
 
 
putlog "
Global mesaj atma sistemi yuklendi"  
putlog "
Bot OPER ve Global kullanma izni olmadigi surece"  
putlog "
Calismayacaktir!"  
putlog "
mailacoustic@realcoder.com


 
Alıntı ile Cevapla

Alt 30 Haziran 2006, 00:48   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Global.tcl




peki bunu botun sourcesiden eklesek mesela oyun botunun yada herhangi bir botun altinda çaliştirsak olurmu ?

 
Alıntı ile Cevapla

Alt 30 Haziran 2006, 21:49   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Global.tcl




tcl yi attıktan sonra ..source scripts kısmına eklersen çalışır ... Sonuçta eggdroplar tcl lerin işlevlerini yaparlar .. Onun dışında işlevleri yoktur ..

(bu arada ben de ekleyeyim .. Gerçekten gerekli bir tcl ..Teşekkürler)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 06 Temmuz 2006, 11:37   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Global.tcl




Alıntı:
proc konusma_zamani {} {
global global_msg zaman_araligi
set global_rmsg [lindex $global_msg [rand [llength $global_msg]]]
putserv "OS GLOBAL $global_rmsg"
timer $zaman_araligi konusma_zamani
return 1

buradaki
putserv "OS GLOBAL $global_rmsg"
yerine
putserv "notice $*.net $global_rmsg"
yazdım notice atması için ama notice atmıyor bi yardım edecek olan varmı arkadaşlar

 
Alıntı ile Cevapla

Alt 06 Temmuz 2006, 12:39   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Global.tcl




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
putserv "notice $*.Sohbetlere.Com $global_rmsg"

Benim sunucumda bu şekilde düzenli ve çalışıyor kendi sitene göre uygun şekilde düzenle.. Eminim Çalışacaktır.

 
Alıntı ile Cevapla

Alt 07 Temmuz 2006, 15:42   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Global.tcl




ozentisiz:


putserv
"OS GLOBAL $global_rmsg"


kismini

putserv "NOTICE $*.net :$global_rmsg"

seklinde duzenlersen calisacaktir.

__________________
Our brain is Our Weapon
 
Alıntı ile Cevapla

Alt 03 Ağustos 2008, 02:24   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Global.tcl




#mesajlar
set global_msg {
"7m3IRC 7S3cripT12 İndirmek İçin 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
TIKLA"
"7Z3iyaretçi 7D3efterine12 Yazmak İçin 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
TIKLA"
"7R3adyo 7D3inlemek12 İçin 4http://iRc.Domain.Net:8080/listen.pls 1<<12 TIKLA 7(Winamp)"
"7R3adyo 7D3inlemek12 İçin 4http://domain.net/radyo.php 1<<12 TIKLA 7(Media Player)"
}

Böle yaptım sadece en sonuncuyu atiyo

Buna nasıl 4-5 ayrı global mesajı yapıcaz.

 
Alıntı ile Cevapla

Cevapla

Etiketler
globaltcl


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Global ? Nurullahoruc Servisler 7 01 Temmuz 2010 09:03
Global at tcl'si... CanCeL Eggdrop, NeoStats, BNC 2 24 Ekim 2007 16:32
GlobaL Bak :)) LaneTh Komik Loglar 4 28 Mart 2006 07:09