IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

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/)

- - isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim.. (https://www.ircforumlari.net/eggdrop-neostats-bnc/216220-isinlatcl-lazim-arkadaslar-yardim-ederseniz-sevinirim.html)

Askyagmuru

01 Haziran 2009 18:41

isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

Slm arkadaşlar hepinize iyi günler. Eskiden Kullandığım bir sistem vardı .isinla nick sistemi şöyle ki servera bağlandığı zaman sadece help odasına giriyo ve odada .isinla nick yazdığında global odalara giriyo yani ...

.isinla abc

abc isinlama islemi Basladı.Lütfen Bekleyin

abc Odalara Aktarılıyorsunuz . Hos Sohbetler Dilerim

abc isinlama islemi tamamlanmıştır.

şeklinde bir tcl lazım eskiden kullanıyordum ama şuan yok.. bir arkadaşın yapmış olduğuna baktım o değil direk sajoin liyo bu sajoinlemeden üstteki yazıları yazıyor aralarında 5 er saniye arayla... Bucalı , GemLik ve diyer arkadaşlar yardımlarınızı bekliyorum..

toXic

01 Haziran 2009 18:45

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

O Değişmesini istediğin tclyi gösterirsen iyi olur ;)

Sunucuya girişleride sadece #HELP Kanalına Vermelisin o halde

Askyagmuru

01 Haziran 2009 19:02

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

isinlama yapan TCL Bot.!! #
#
# kullanimi .isinla nick seklinde. ( botun özeline değil. kanal geneline.. #
# Kodlaması Bana Ait Değil. Düzenledim Sadece.. #
bind pub - .isinla birbirx
bind msgm - .isinla birbirx
proc birbirx {nick uhost handle chan poseidon } {
global birbir
if {[llength $poseidon] == 1} {
putserv "SAJOIN $poseidon #Sohbet,#Sorucevap,#Bendisim,#Askim,#Radyo,#Yarism a,#Kelime,#Test"
putserv "SAPART $poseidon #Help"
putserv "notice $nick :1,7 isinlama islemi Basladı.Lütfen Bekleyin"
putserv "notice $nick :1,7 Odalara Aktayılıyorsunuz .8,1 Hos Sohbetler Dilerim . 7,1 Uyuzcuk Set By SevimLi{B-S}"
putserv "notice $nick :1,7 isinlama islemi tamamlanmıştır.8,1 Lutfen Kurallara Uyunuz.8,1Kendinize Nasil Davranilmasini İstiyorsaniz Baskalarina Oyle Davraniniz.iyi Sohbetler Dileriz"
return 0
}
return 0
}

Buyur toXic kardeşim... [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] u ekleyebilirmisin birde..

toXic

01 Haziran 2009 19:15

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

Kod:

isinlama yapan TCL Bot.!! #

#

# kullanimi .isinla nick seklinde. ( botun özeline değil. kanal geneline.. #

# Kodlaması Bana Ait Değil. Düzenledim Sadece.. #

bind pub - .isinla birbirx 

bind msgm - .isinla birbirx 

proc birbirx {nick uhost handle chan poseidon } {

global birbir

if {[llength $poseidon] == 1} {

 

putserv "privmsg $nick :1,7 isinlama islemi Basladı.Lütfen Bekleyin"

putserv "SAPART $poseidon #Help"

putserv "privmsg $nick :1,7 Odalara Aktayılıyorsunuz .8,1 Hos Sohbetler Dilerim . 7,1 Uyuzcuk Set By SevimLi{B-S}"

putserv "SAJOIN $poseidon #Sohbet,#Sorucevap,#Bendisim,#Askim,#Radyo,#Yarisma,#Kelime,#Test"

 

putserv "privmsg $nick :1,7 isinlama islemi tamamlanmıştır.8,1 Lutfen Kurallara Uyunuz.8,1Kendinize Nasil Davranilmasini İstiyorsaniz Baskalarina Oyle Davraniniz.iyi Sohbetler Dileriz"

return 0

}

return 0

}

Su Sekilde sanırım. Unrealircd.conf'Tan Auto kanallarınızı silip sadece #HELP Yazın Bot sadece #HELP Kanalında Dursun.

putserv "SAJOIN $poseidon #Sohbet,#Sorucevap,#Bendisim,#Askim,#Radyo,#Yarism a,#Kelime,#Test"

Burdan Global kanallarınızı Belirtin.

Askyagmuru

01 Haziran 2009 19:25

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

peki webten girildiği zaman odalara direk giriş olucak mı ..

toXic

01 Haziran 2009 19:28

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

Girmez fakat web portlarını kanallara sajoinleyebilirsiniz.

Kod:

 on *:snotice:*client*connect*:if $regex($remove($8,$chr(58)),/(6669|7000)/) && $regex($remove($token($10,1,64),$chr(40)),/^(jawa)$/i) { sajoin $9   #kanal1,#kanal2 }

Gibi

Askyagmuru

01 Haziran 2009 19:31

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

bu konuyu tedaylı konuşmak istiyorum msn adresimi eklermisin Lütfen..

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

Askyagmuru

01 Haziran 2009 19:37

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

Bu seferde girmiyo sorun veriyo ..

while executing
"isinlama yapan TCL Bot.!! #"
(file "scripts/isinla.tcl" line 1)
invoked from within
"source scripts/isinla.tcl"
(file "isinla.conf" line 270)

toXic

01 Haziran 2009 19:45

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

return 0
}

2 tane olmus bundan senin verdiğini kopyaladıgım için sil bunu

isinlama yapan TCL Bot.!! #

bunun basınada # koy

Askyagmuru

01 Haziran 2009 19:52

Cevap: isinla.tcl lazım arkadaşlar yardım ederseniz sevinirim..

yok abicim hala sorun veriyo yaa :(

while executing
"proc birbirx {nick uhost handle chan poseidon } {
global birbir
if {[llength $poseidon] == 1} {
putserv "privmsg $nick :1,7 isinlama islemi Baslad..."
(file "scripts/isinla.tcl" line 7)
invoked from within
"source scripts/isinla.tcl"
(file "isinla.conf" line 270)

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