!eglence TCL - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Heartbroken · 08 Eylül 2020, 13:58

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,

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Eglence botu yardım	mys_35	mIRC Scripting Sorunları	13	12 Aralık 2021 14:36
eglence komutları	Zalimsin	mIRC Scripting Sorunları	4	28 Eylül 2019 21:13
Ücretsiz Eglence Socket Bot Hizmeti	Che	Ar-Ge Faaliyetler	26	17 Şubat 2018 18:19
Eglence Socket Bot	Che	IRCd Botlar	13	17 Şubat 2018 05:21

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.