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/)
-   Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)
-   -   Yine Yardıma İhtiyacım var... (https://www.ircforumlari.net/eggdrop-neostats-bnc/47609-yine-yardima-ihtiyacim-var.html)

Kablosuz NET 18 Ocak 2008 01:03
Yine Yardıma İhtiyacım var...
 
Kod:
set opkanal #Yönetim
bind pub - !terbiyesiz terbiyesiz
bind pub - !tat tat
proc terbiyesiz {nick host hand text} {
global opkanal
if {[onchan $nick [strlwr $opkanal]]} {
set kanal [lindex $text 0]
    putserv "sapart $kanal :#Kelime"
    putserv "sapart $kanal :#English"
    putserv "sapart $kanal :#BuLBaKaLim"
    putserv "sapart $kanal :#OyunTR"
    putserv "sapart $kanal :#Oyun"
    putserv "sapart $kanal :#Universite"
    putserv "sapart $kanal :#ArkadaS"
    putserv "sapart $kanal :#Sevgi"
    putserv "sapart $kanal :#Muhabbet"
    putserv "sajoin $kanal #Terbiye"
    putserv "mode #Terbiye +v $kanal"
    putserv "privmsg #Terbiye 4 $kanal 2Terbiye kurallarına uymayan davranışta bulunduğunuz için bu odaya getirildiniz.. YÖNETİCİ Arkadaşımızın söylediklerini dinleyiniz.."
} else { putserv "Notice $nick :Muhabbet.Com.TR*Sunucusunda*Görevli*Degilsiniz!" }
}
proc tat {nick host hand text} {
global opkanal
if {[onchan $nick [strlwr $opkanal]]} {
set kanal [lindex $text 0]
    putserv "gline $kanal 900 2Sunucumuz Üzerinde 4Sapıkça2 Hareketlerde Bulunduğunuz İçin Uzaklaştırıldınız... 4Amacımız Türkiye'nin En Büyük Seviyeli Ortamını Kurmak.."
} else { putserv "Notice $nick :Muhabbet.Com.TR*Sunucusunda*Görevli*Degilsiniz!" }
}
Mevcut tclnin birisinden editlediğim bir bot normal proclar çalışıyordu ancak sadece Yönetimde çalışması için ifleri ekleyince çalışmaz oldu :(

GhostLy 18 Ocak 2008 09:07
Cevap: Yine Yardıma İhtiyacım var...
 
benim anladığım kadarıyla kanalda kufur v.s gibi kural ihlali yapanlari !terbiyesiz nick yaptiğinda kanallardan sapart edip. #terbiye kanalına sokacak ? ve terbiye kanalında !tat nick yazdiğinizda gline sebebi olmus olacak dimi ?

eğer anladiğim gibiyse sadece oplar #sohbet #muhabbet kanalında !terbiyesiz nick komutunu kullana bilir.

sajoin edilecek kanalda. yani örnek #terbiye kanalı oplari sadece !tat nick komutunu kullanabilir. buyrun umarım işinizi gorur.


[KBSC] 09::29 <GhostLy> !terbiyesiz KelebekTurkce59
[KBSC] 09::29 *** Ayrıldı: KelebekTurkce59 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) («|» Kanaldan Ayrıldı «|»)
[KBSC] 09::29 -IRC.AskOdam.Net- *** Notice -- Ask-Net used SAPART to make KelebekTurkce59 part #Kelime
-ø-
[KBSC] 09::29 -IRC.AskOdam.Net- *** Notice -- Ask-Net used SAPART to make KelebekTurkce59 part #Oyun
-ø-
[KBSC] 09::29 -IRC.AskOdam.Net- *** Notice -- Ask-Net used SAPART to make KelebekTurkce59 part #sohbet
-ø-
[KBSC] 09::29 -IRC.AskOdam.Net- *** Notice -- Ask-Net used SAJOIN to make KelebekTurkce59 join #Terbiye
## terbiye kanalı..###

[KBSC] 09::29 *** Şu an #terbiye kanalında bulunuyorsunuz
[KBSC] 09::29 <12KelebekTurkce59> Ask-Net Büyüdüm mü bende @ olacam ;) 2Kelebek 4v.Türkçe
[KBSC] 09::29 *** Ask-Net mode değiştirdi:+v KelebekTurkce59
[KBSC] 09::29 <10Ask-Net> 4 KelebekTurkce59 2Terbiye kurallarına uymayan davranışta bulunduğunuz için bu odaya getirildiniz.. YÖNETİCİ Arkadaşımızın söylediklerini dinleyiniz..
14© 7Ask-Net5 Muhabbet.Com.TR*Sunucusunda*Görevli*Degilsiniz!



[KBSC] 09::32 <GhostLy> !tat KelebekTurkce59

[KBSC] 09::32 -IRC.AskOdam.Net- *** You are banned from AskOdam (Sunucumuz Üzerinde Sapıkça Hareketlerde Bulunduğunuz İçin Uzaklaştırıldınız... Amacımız Türkiye'nin En Büyük Seviyeli Ortamını Kurmak..)
-ø-
[KBSC] 09::32 * Bağlantınız Kesildi

Kod:

#### admin kanalı..###
set ops_chan "#terbiye"
 
bind pub - !terbiyesiz terbiyeci
bind pub - !tat tatmali
 
proc terbiyeci {nick uhost handle chan hings } {
global terbiye
if {![isop $nick $chan]} {return 0}
putserv "sapart $hings #Kelime"
putserv "sapart $hings #English"
putserv "sapart $hings #BuLBaKaLim"
putserv "sapart $hings #OyunTR"
putserv "sapart $hings #Oyun"
putserv "sapart $hings #Universite"
putserv "sapart $hings #ArkadaS"
putserv "sapart $hings #sohbet"
putserv "sapart $hings #Muhabbet"
putserv "sajoin $hings #Terbiye"
putserv "mode #Terbiye +v $hings"
putserv "privmsg #Terbiye 4 $hings 2Terbiye kurallarına uymayan davranışta bulunduğunuz için bu odaya getirildiniz.. YÖNETİCİ Arkadaşımızın söylediklerini dinleyiniz.."
putserv "Notice $nick :Muhabbet.Com.TR*Sunucusunda*Görevli*Degilsiniz!"
}
proc tatmali {nick uhost handle chan hings } {
global ops_chan
if {$chan==$ops_chan && [isop $nick $ops_chan]==1} {
putserv "gline $hings 900 2Sunucumuz Üzerinde 4Sapıkça2 Hareketlerde Bulunduğunuz İçin Uzaklaştırıldınız... 4Amacımız Türkiye'nin En Büyük Seviyeli Ortamını Kurmak.."
putserv "Notice $nick :Muhabbet.Com.TR*Sunucusunda*Görevli*Degilsiniz!"
return 1
}
return 1
}

Kablosuz NET 18 Ocak 2008 11:51
Cevap: Yine Yardıma İhtiyacım var...
 
ben bunu global oplarda kullanabilsin diye düşünmemiştim onuda benim yerime sen düşünmüşsün teşekkür ediyorum..Eline koluna yüreğine sağlık..

GhostLy 03 Şubat 2008 23:55
Cevap: Yine Yardıma İhtiyacım var...
 
senin sayende benimde işime yaradi açıkcasi ne yalan söylim:)


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk