| 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...
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
u ekleyebilirmisin birde..
|