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

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
Sayfa 1 Toplam 3 Sayfadan 1 23
 
LinkBack Seçenekler Stil
Alt 19 Şubat 2007, 10:57   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
!temizle Tcl



Merhaba,
Bu benim ilk tcl kodlamam :)
Kanalda operatör iseniz kanal ekranını temizlemeye yarayan bir tcl.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
##############
# Temizleme tclsi #
# By intBilisim #
##############
set tmzl "0,0______________________________________________________________________1,0"

bind pub - !temizle intbilisimtemiz
proc intbilisimtemiz {nick user hand chan arg} {
 global intbilisimtemiz
 if {![isop $nick $chan]} {return 0}
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint"
 putquick "PRIVMSG $chan : Ekran temizlendi... Komutu kullanan: $nick"
}


Konu intBilisim tarafından (19 Şubat 2007 Saat 11:07 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 04 Mart 2007, 22:17   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



$temizint bölümünü sildiğin zaman çalışıyor.
Tek kötü yanı botun yavaş yazması
ve birde şunu düşün
3 op aynı anda
!temizle
!temizle
!temizle
!temizle

Yazdığında
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.




Bunun script versiyonuda var sanırım.

Paylaşımın için teşekkürler iyi çalışmalar. ;oki

 
Alıntı ile Cevapla

Alt 05 Mart 2007, 18:42   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



$temizint sorunluydu..
Çözüldü:
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
##############
# Temizleme tclsi #
# By intBilisim #
##############
set temizint "0,0______________________________________________________________________1,0"

bind pub - !temizle intbilisimtemiz
proc intbilisimtemiz {nick user hand chan arg} {
 global intbilisimtemiz
 if {![isop $nick $chan]} {return 0}
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint Cam"
 putquick "PRIVMSG $chan : $temizint Çöp"
 putquick "PRIVMSG $chan : $temizint Bardak"
 putquick "PRIVMSG $chan : $temizint Toz"
 putquick "PRIVMSG $chan : $temizint Reklamcılar"
 putquick "PRIVMSG $chan : $temizint Spamcılar"
 putquick "PRIVMSG $chan : $temizint Floodcular"
 putquick "PRIVMSG $chan : $temizint"
 putquick "PRIVMSG $chan : Ekran temizlendi... Komutu kullanan: $nick"
}


 
Alıntı ile Cevapla

Alt 06 Mart 2007, 01:13   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



yine çalışmaz;
global intbilisimtemiz yerine
global temizint yazarsan doğru çalışır

 
Alıntı ile Cevapla

Alt 09 Mart 2007, 10:55   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



Hayır, en son yazdığım kod denendi çalışıyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 10 Mart 2007, 22:38   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



CcehennemM Nickli Üyeden Alıntı
yine çalışmaz;
global intbilisimtemiz yerine
global temizint yazarsan doğru çalışır



evet senin dediğin Gibi YaptıM Çalışdı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ama CoK yavaS ve Ekranın 4 te birini temizliyo
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 10 Mart 2007, 23:21   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



aRdeTH_ Nickli Üyeden Alıntı
evet senin dediğin Gibi YaptıM Çalışdı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ama CoK yavaS ve Ekranın 4 te birini temizliyo
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Eggdrop bu doğal Socket botlar kadar hızlı olamaz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 11 Mart 2007, 18:41   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: !temizle Tcl



calısmıyo bu kardes denedım calısmadı calısanı varsa bende bugun hatta ırcforumlarını acmadan once bunla urasıodum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 11 Mart 2007, 19:16   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



CcehennemM Nickli Üyeden Alıntı
yine çalışmaz;
global intbilisimtemiz yerine
global temizint yazarsan doğru çalışır

Açıklamayı dikkate alıp tekrar deneyin çalışacaktır arkadaş her ne kadar denedim çalışıyo desede o şekilde çalışmaz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 12 Mart 2007, 01:35   #10
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: !temizle Tcl



aRdeTH_ Nickli Üyeden Alıntı
evet senin dediğin Gibi YaptıM Çalışdı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ama CoK yavaS ve Ekranın 4 te birini temizliyo
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

denemedim ama inceledigim kadariyla:

src/mod/server.mod/server.c

dosyasini bulun

#define msgrate 2

karsiligini 1 veyaz 0 olarak degistirin anladigim kadariyla bu mesajlarinizin gonderilnmesi icin beklenilmesi istenilen sure. Bu islem sonrasinda botu yeniden compile etmek gerekecek, olumlu sonuc alirsaniz yazin haberim olsun taktim bu konuya
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

Cevapla
Sayfa 1 Toplam 3 Sayfadan 1 23

Etiketler
tcl, temizle

« önceki Konu | sonraki Konu »

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

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
Gelismis kanal temizle TCL. (temizle.tcl) ¿ TCL Scriptler 14 28 Ocak 2017 23:52
.temizle Prens mIRC Scripting Sorunları 11 12 Mayıs 2012 15:20
temizle MoRtaL_ mIRC Scripting Sorunları 4 09 Şubat 2008 21:21
!temizle bekircan Eggdrop, NeoStats, BNC 9 02 Haziran 2007 02:51




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
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.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org