LMSG !temizle - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Shiniori · 06 Ekim 2013, 23:37

S.a cümleten aşağıdaki komut mircden !temizle yazdığında kanalı temizliyor ama webden girenler !temizle yazdığında panelden bakınca LMSG !temizle olarak gözüküyor esokey modülü olan okey sitem var ama bir türlü bunu yapamadım bi yardımcı olabilirmisiniz webden giren @ lar nasıl !temizle yazdıklarında kanalı temizlemelerini istiyorum...

kısacası LMSG nereye eklicem onu bilmiyorum eklediğimde hata veriyor simdiden tskler...

set tmzl "0,0_____________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ __________________________________________________ _____________"

bind pub - !temizle temizlik
proc temizlik {nick user hand chan arg} {
global tmzl admin_chan
if {[isop $nick $chan] || [onchan $nick $admin_chan]} {
putquick "PRIVMSG $chan LMSG Rahatsizlik Nedeni İle Sunucudan Uzaklatirildiniz."
putquick "PRIVMSG $chan LMSG . ."
putquick "PRIVMSG $chan LMSG ... :``..':"
putquick "PRIVMSG $chan LMSG : ````.' :''::'"
putquick "PRIVMSG $chan LMSG ..:.. : .'' :"
putquick "PRIVMSG $chan LMSG ``. `: .' :"
putquick "PRIVMSG $chan LMSG : : : :"
putquick "PRIVMSG $chan LMSG : : : :"
putquick "PRIVMSG $chan LMSG : : : :"
putquick "PRIVMSG $chan LMSG : : :..''''``:"
putquick "PRIVMSG $chan LMSG : ...:..' .''Salon Geneli"
putquick "PRIVMSG $chan LMSG :..'''``:::::::"
putquick "PRIVMSG $chan LMSG ' `::::$nick"
putquick "PRIVMSG $chan LMSG `::."
putquick "PRIVMSG $chan :LMSG Tarafından Temizlendi, Gidişin Güle Güle Gelişin Muhteşem Olsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
" }
}

saywhat · 07 Ekim 2013, 02:49

Lmsg olsa olsa web üzerinden girenlerin kullandığı web-applet ile alakalı,onun üzerinde ayarlanması icap eden bir "komutu" olsa gerek...

LMSG gibi bir kanala postalama methodunu ne eggdrop için nede unreal için duymadım/görmedim/bilmiyorum....

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

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

set admin_chan "#admin-ağalar"

set satr "12"

bind pub - "!temizle" temizlik

proc temizlik {nick uhost hand chan text} {
 if {![isop $nick $chan] || ![onchan $nick $::admin_chan]} {
    puthelp "notice $nick :$::lastbind komutunu kullanmaya yetkiniz yok..."
     return 0
     }
     set chan [lindex [split $text] 0]
 if {$chan == ""} { puthelp "notice $nick :kullanımı: $::lastbind #kanal-adı"
    return 0
    }
 if {![validchan $chan] || ![botonchan $chan]} { 
    puthelp "notice $nick :[lindex [split $text] 0] ya doğru yazılmamış yada benim bulunduğum kanallardan biri değil..." 
    return 0
  } else {
    puthelp "privmsg $chan :Rahatsizlik Nedeni İle Sunucudan Uzaklatirildiniz."
    set i 0
    set j "."
     while {$i < $::satr} {
    puthelp "privmsg $chan :$j"
        incr i
        }
     puthelp "privmsg $chan :$nick Tarafından Temizlendi, Gidişin Güle Güle Gelişin Muhteşem Olsun"
   }
}

saywhat · 07 Ekim 2013, 05:43

sanırım ,komut/trigger kullandıklarında web üzerinden girenler bu söz konusu "LMSG" kendini gösteriyor...(anladığım kadarıyla...)

öyleyse: şöyle yapabiliriz., komut / trigger'ı ortadan kaldırabiliriz.

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

set admin_chan "#kanal-adı"

set satr "12"

bind pubm - "*" temizlik

proc temizlik {nick user hand chan text} {
  if {![string match -nocase $::botnick [lindex $text 0]] && ![string match -nocase "temizle" [lindex $text 1]]} { 
  return 0
  }
  if {![isop $nick $chan] || ![onchan $nick $::admin_chan]} {
      puthelp "notice $nick :[lindex $text 1] komutunu kullanmaya yetkiniz yok..."
      return 0
   }
   set chan [lindex [split $text] 2]
if {$chan == ""} { puthelp "notice $nick :kullanımı: $::botnick temizle #kanal-adı"; return 0;}
if {![validchan $chan] || ![botonchan $chan]} { 
  puthelp "notice $nick :[lindex [split $text] 2] ya doğru yazılmamış yada benim bulunduğum kanallardan biri değil..." 
  return 0
  } else {
  puthelp "privmsg $chan :Rahatsizlik Nedeni İle Sunucudan Uzaklatirildiniz."
  set i 0
  set j "."
  while {$i < $::satr} {
    puthelp "privmsg $chan :$j"
      incr i
      }
      puthelp "privmsg $chan :$nick Tarafından Temizlendi, Gidişin Güle Güle Gelişin Muhteşem Olsun"
   }
}

kullanımı :

Botun-nicki temizle #temizlenecek-kanal

örnek:

bot temizle #sohbet
.... gibi...

ortada herhangi bir : !trigger / !komut olmayınca da şu "LMSG" çıkmıyordur herhalde....

Shiniori · 08 Ekim 2013, 19:59

teşekkür ediyorum saywhat deniyorum simdi.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 19:59 -->-> Daha önceki mesaj 19:43 --

sayswat ben mircden değil webden girenler icin istiyorum komutu

mircden olsa zaten !temizle yazdığımda scanx temizliyor önemli olan webden giren op olan userler temizlesin istiyorum...

saywhat · 09 Ekim 2013, 00:06

peki...

şöyle sorayım ... bu web üzerinden giriş yapan arkadaşlar, komut değilde normal yazı yazdıklarında bu LMSG görünüyor mu? yoksa sadece !komut verdiklerinde mi !komut başına LMSG eklenip "LMSG !komut" gibi mi gidiyor kanala? (bu nedenle mi *bot* komutu anlamıyor da işlem yapmıyor?

Bu "LMSG" web applet'i olarak kullandığınız yazılımda neye denk geliyor? notice'e mi, ctcp mi ? /ame, /amsg /me vs mi ?

bu !komut ile başa LMSG eklenmesi durumu tamamiyle o kullanılan applete özel bi durum ,yukarda eggdrop kodu göstererek sorduğunuz için bende size eggdrop tcl koduyla cevap yazıyorum...

bunun dışında : bknz UnrealIRCD resmi dökümanı : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

bknz eggdrop tcl komutları dökümanı : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

ve bknz tcl komutları dökümanı (en son çıkan tcl8.6.1 tcl komutları): [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

bunlar içinde bir "LMSG" gibi bir komut bulabilirseniz,bende onun dökümanına bakıp inceleyip ona göre bir eggdrop tcl kodu yazabilirim...

aksi halde "böyle bir komut yok" yani size yukarda eggdrop tcl kodu örneği gösterdiğiniz için ,size dönüşü de eggdrop tcl kodu olarak olacaktır...

kodun son hali -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] (botnicki temizle #kanal-adı)

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] (botumda denerken set satr "6" olarak ayarladım ..flood etmemek için..ne kadar satır yapmak istiyorsanız o kadar olacaktır...)

not : önemli olan web'ten girenin attığı yazıyı nasıl gördüğü değil. yazdığı yazı/komutun kanala nasıl düştüğü !temizle komutunu işlemi uygulaması gereken botun bu yazıyı nasıl gördüğü....(ki işlem yapabilsin)

bot web'ten girenlerin verdiği komutu "LMSG !temizle" gibi mi görüyor ? ..bu önemli .. !temizle işlemini nasıl tetikliyecek ? asıl soru bu. yoksa web'ten girenlerin neyi nasıl gördüğü tamamiyle kullanılan appletin kodlarından yada "varsa" ayarlarında halletmeniz gereken bi olay ki,buda eggdrop botunuzu ilgilendirmez...

eğerki yazdıkları kanala "LMSG !temizle" gibi düşüyorsa :

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

set admin_chan "#kanal"

set satr "12"

bind pubm mn|oa "*" temizlik

proc temizlik {nick uhost hand chan text} {
   if {![string first -nocase "LMSG"]} { return 0;} 
   if {![string match -nocase "temizle" [lindex [string trim $text] 1]]} { return 0;}
   if {![isop $nick $chan] || ![onchan $nick $::admin_chan]} {
     puthelp "notice $nick :[lindex [string trim $text] 1] komutunu kullanmaya yetkiniz yok..."
     return 0
   }
   set chan [lindex [split $text] 2]
   if {[llength $chan] == 0} { puthelp "notice $nick :kullanımı: LMSG temizle #kanal-adı"; return 0;} 
   if {![validchan $chan] || ![botonchan $chan]} { 
   puthelp "notice $nick :[lindex [split $text] 2] ya doğru yazılmamış yada benim bulunduğum kanallardan biri değil..." 
   return 0
   } else {
   puthelp "privmsg $chan :Rahatsizlik Nedeni İle Sunucudan Uzaklatirildiniz."
   set i 0; set j "."; while {$i < $::satr} { puthelp "privmsg $chan :$j"; incr i }
   puthelp "privmsg $chan :$nick Tarafından Temizlendi, Gidişin Güle Güle Gelişin Muhteşem Olsun"
   }
}

yada direk :

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

bind pubm mn|oa "*" temizlik

yerine

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

bind pubm mn|oa "% LMSG*" temizlik

yazıp,

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

   if {![string first -nocase "LMSG"]} { return 0;}

satırını çıkartırsın..ancak o zaman temizle ve #kanal-adı bir öne çekilmiş olacaktır.
yani:

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

 if {![string match -nocase "temizle" [lindex [string trim $text] 1]]} { return 0;}

olur size :

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

 if {![string match -nocase "temizle" [lindex [string trim $text] 0]]} { return 0;}

kanal'da :

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

   set chan [lindex [split $text] 2]

iken ,

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

   set chan [lindex [split $text] 1]

'e çekilmiş olur... sonuç yine aynı.. LMSG temizle #kanal-adı kodu tetikler...

bu kod'la bot kanala "LMSG temizle #kanal-adı" yazıldığında/gördüğünde komutu işler.. yazi web'ten giren'in : temizle #kanal-adı yazması yeterli gelir..(eğer LMSG oto ekleniyorsa/eklenmiyorsa kendi yazması gerekir..kodun tetiklenmesi için....)

Shiniori · 12 Ekim 2013, 15:27

sayın saywhat webden girenler herhangi bir yazı yazdıklarında mircden baktığımızda LMSG !komut olarak görünüyor..

örnek olarak webden girenler : !kick Sahin yazdığında eggdrop botu

LMSG !kick Sahin olarak görüyor.. siz webden ne komutu yazarsanız yazın yada ne mesaj yazarsanız yazın mircden otomatik olarak herşeyin başına LMSG die cıkıyor..

mesela !temizle yazıcaklar mircden otomatik LMSG !temizle olarak gözükmesi gerekiyor..

kısacası LMSG temizle #kanal-adı olmucak sadece LMSG !temizle olucak bilmem anlatabildimmi.

saywhat · 12 Ekim 2013, 18:51

keşke en başta böyle anlatsaydınız...

onlar !temizle yazar, bot LMSG !temizle görür,kod tetiklenir,

sizin bota bağlanıp .chanset #kanal +temiz

komutuyla aktif edeceğiniz kanal üstünde işler...

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

setudef flag temiz

set admin_chan "#kanal"

set satr "12"

bind pubm mn|oa "*" temizlik

proc temizlik {nick uhost hand chan text} {
   if {![channel get $chan temiz]} { return 0;}
   if {![string first -nocase "LMSG"]} { return 0;} 
   if {![string match -nocase "!temizle" [lindex $text 1]]} { return 0;}
   if {![isop $nick $chan] || ![onchan $nick $::admin_chan]} {
     puthelp "notice $nick :[lindex $text 1] komutunu kullanmaya yetkiniz yok..."
     return 0
     } else {
     puthelp "privmsg $chan :Rahatsizlik Nedeni İle Sunucudan Uzaklatirildiniz."
     set i 0; set j "."; while {$i < $::satr} { puthelp "privmsg $chan :$j"; incr i }
     puthelp "privmsg $chan :$nick Tarafından Temizlendi, Gidişin Güle Güle Gelişin Muhteşem Olsun"
     }
}

Shiniori · 12 Ekim 2013, 23:08

çalıştı teşekkürler. ama cok yawas yawas yapıyor herhalde düzelir.

saywhat · 13 Ekim 2013, 00:45

görece "yavaş" çalışma sebebi,satır "temizlerken" postalama methodunun ,tarafımdan "puthelp" 'in tercih edilmiş olması....

bunu eggdrop queue/sıra/lama(sıralandırma) mantığına göre (bknz : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ) daha hızlı/daha öncelikli postalama yöntem/leriyle değişerek "hızlanması" sağlanabilir...

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

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

Sıralandırma-ismi -   Tcl-komutu -   Öncelik  - Açığa-çıkma/patlama vs.. -- Önerilen kullanımı:

yardım              -         puthelp       -     3    -          hayır               -        genel text'ler/uzun text'ler için...

sunucu             -            putserv         -    2     -         az-biraz                -     tek satırlık text'ler  ,genel ircd komutları için...

çabuk yada mod         -   putquick      -      1           -  evet    -                   acil mod değişimleri,kickler, banlar   

sıra yok           -             putnow        -            -           -         -         -          hiçbiri.

buna göre :

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

  puthelp "privmsg $chan :Rahatsizlik Nedeni İle Sunucudan Uzaklatirildiniz."
     set i 0; set j "."; while {$i < $::satr} { puthelp "privmsg $chan :$j"; incr i }
     puthelp "privmsg $chan :$nick Tarafından Temizlendi, Gidişin Güle Güle Gelişin Muhteşem Olsun"

satırlarındaki puthelp'ler putquick ile değiştirilebilir...

oda yetmiyorsa (sunucu'dan flood'dan düşmesinden endişe etmiyorsanız.) putnow'da seçebilirsiniz....

Shiniori · 27 Aralık 2013, 23:38

çok teşekkür ederim gecde olsa cevap verdim yanlıs anlamayın gerçekten cok iyisiniz başarılar dilerim..

yalnız birşey söylemek istiyorum bilginiz olsun diye söylüyorum bende normal irc yok ben esokey tabanlı irc web sistemi kiraladım okey ve tavla üzerine tüm tcl leri buna göre ayarlıyorum sayenizde
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ben sizden tcl hakkında yardım istedigim zaman bilinki okey üzerine istiyorum okey ve tavlada milllet webden giris yapıyor mesaj yazıyorlar mircden LMSG die gözüküyor özelde konusunca PMSG die cıkıyor masada konusunca TMSG die cıkıyor ... bir sonraki yardımlarınızı esirgemezseniz sevinirim iyi calısmalar...

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 Tcl	intBilisim	Eggdrop, NeoStats, BNC	25	08 Eylül 2010 16:58
temizle	MoRtaL_	mIRC Scripting Sorunları	4	09 Şubat 2008 21:21
!temizle	bekircan	Eggdrop, NeoStats, BNC	9	02 Haziran 2007 02:51

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.