Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind pubm - "*" Eglence_Pubm
proc Eglence_Pubm {nick uhost hand chan text} {
if {![matchattr [nick2hand $nick] f|f $chan]} { return 0 }
set Komut [lindex [split $text] 0]
set Hedef [lindex [split $text] 1]
# Kullanım : !Komut Hedefteki Kişinin Rumuzu...
if {[string is space -strict $Hedef]} {
putserv "NOTICE $nick :Kullanımı: $::lastbind <Hedefteki Rumuz>"
return 0
}
set Posta [OkuLa [string range [string map {ö o ı i ü u ç c} [string tolower $Komut]] 1 end].txt]
set Posta [string map {%nick% $nick %Hedef% $Hedef %chan% $chan} $Posta]
switch -nocase -- $Komut {
!sev { puthelp "PRIVMSG $chan :$Posta" }
!terlik { puthelp "PRIVMSG $chan :$Posta" }
!döv { puthelp "PRIVMSG $chan :$Posta" }
default { }
}
return 0
}
proc OkuLa Dosya {
if {![file readable $Dosya] || ![file exists $Dosya]} {
catch { close [open $Dosya w+] }
}
set Oku [open $Dosya]
set Satir [split [read $Oku] \n]
close $Oku
return [lindex $Satir [expr {int(rand()*[llength $Satir])}]]
}
.txt Dosyaları Hazırlayın,
Bot Ana Dizininde Küçük Harflerle ,
ö,ü,ı Gibi Türkçe Karakterler Kullanılmadan,
dov.txt,eglence.txt Gibi...
Siz Hazırlamasanız Dahi Script Yüklenip,
!Komut'lardan Biri Kullanılırsa,
Boş Olarak Oluşturacaktır!
Dosyalara AltAlta Satır Satır Ekleyin.
Hedefteki Kişi İçin %Hedef%
Komutu Kullanan Kişi İçin %nick%
Komutun Kullanıldığı Kanal Adı Geçecekse %chan%
Şeklinde .txt Satırlarına Eklenilmelidir!
Misal,Kanala Yansıyacak;
Automatic - Heatborken terlikle dövüyor
.txt Dosyasında;
%nick% - %Hedef% terlikle dövüyor
Şeklinde Görülmelidir!
.txt Dosyasında Eklenecek " [ { } ] Gibi
Tcl Programlamada Anlam İçeren Karakterler:
\" \[ \{ \} \] Gibi Eklenmelidir!
Komutu Kullanacakları Seçmek İçin:
İzin Vereceğiniz Kişiyi,
Botunuza Bağlanıp, Kullanıcı Olarak
Ekleyip +f (Friend - Arkadaş)
Eggdrop Kullanıcı Flağı Verin!
Daha Evvel Pekçok Konuda Burada,
Ayrıntıyla Bunu Nasıl Yapılacağını Yazdım.
Doğrusu Tekrar Tekrar
Aynı Şeyleri Açıklamaktanda Bıktım!
Burada Resmi Sitesinde :
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Flaglar Anlamları Ve Nasıl Flag Atanacağı
Yazılı!
Bota Bağlandığınızda : .help +user
Nasıl Kullanıcı Ekleyip-Çıkaracağınızı Gösterecektir..
.help <Komut>
Bota Bağlıyken,Botun Kendi Help(Yardım)
Konularından Detaylı Bilgi Almanızı Sağlayacaktır.
Hala Yapamadım Vs... Deniyorsa,
Eski Cevap Yazdığım Konulara Bakmanızı
Tavsiye Ederim!
Çünkü Pekçok Kez Bunların İnciğini-Cıncığını
Yazdım Açıkladım Geçmiş Konu Postlarında,