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/)
-   -   ScanX global mesaj yardim. (https://www.ircforumlari.net/eggdrop-neostats-bnc/194933-scanx-global-mesaj-yardim.html)

Disparede 06 Nisan 2009 14:15

ScanX global mesaj yardim.
 
Selam üstadlar Scanx global mesaj atıyor ama karışık harflerden oluşuyor bunu nasıl düzeltebilirim yada düzenleyebilirim. iyi forumlar

TurkArkadas 06 Nisan 2009 16:06

Cevap: ScanX global mesaj yardim.
 
ScanX.tcl Dosyasinda Karisik olan harfi arat bulursun o harfleri silip kendin ne yazmak istiyorsan yaz. Sonra botu telnetten kille

Disparede 06 Nisan 2009 20:00

Cevap: ScanX global mesaj yardim.
 
Kod:

bind pub - !globalat globalat:msg
proc globalat:msg {n u h c a} {
    global botnick admin_chan rgolo
    if {[onchan $n $admin_chan]==1} {
        set meth [rand 11]
        switch -- $meth {
        1 {
        set msj selam
        putserv "PRIVMSG operserv : global $msj"
        }
        2 {
        set msj slm
        putserv "PRIVMSG operserv : global $msj"
        }
        3 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        4 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        5 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        6 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        7 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        8 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        9 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
        10 {
        set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
        putserv "PRIVMSG operserv : global $msj"
        }
      }
    }
}

if {![string match "*global_mesaj*" [timers]]} {
    timer [rand 20] global_mesaj
}
proc global_mesaj {} {
  global rgolo
    set meth [rand 11]
    switch -- $meth {
    1 {
    set msj selam
    putserv "PRIVMSG operserv : global $msj"
    }
    2 {
    set msj slm
    putserv "PRIVMSG operserv : global $msj"
    }
    3 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    4 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    5 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    6 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    7 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    8 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    9 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
    10 {
    set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
    putserv "PRIVMSG operserv : global $msj"
    }
      }
      timer [rand 20] global_mesaj
      return 1
}

kod burda

TurkArkadas 06 Nisan 2009 21:58

Cevap: ScanX global mesaj yardim.
 
Kardeşim Senın vermiş oldugun kodun tam üstünde karişik harfler olmasi lazim böyle
PHP- Kodu:

set rgolo "ABCDF GHIJ KLMN PRS TUV YZabcdfgh ijkkl mnop rstu vyzABCDF GHIJ KLMN PRS TUV YZabcdfgh ijkkl mnop rstu vyzABCDF GHIJ KLMN PRS TUV YZabcdfgh ijkkl mnop rstu vyz0123 456789"
bind pub - !globalat globalat:msg
proc globalat
:msg {n u h c a} {
 global 
botnick admin_chan rgolo server
 
if {[onchan $n $admin_chan]==1} { 

Sen burdaki karişik kelimeleri kendine gore duzenle Renklam KOntrol diye falan filan değişirsin.

Disparede 06 Haziran 2009 20:21

Cevap: ScanX global mesaj yardim.
 
Yaptım olmadı yine eksik yazıyor. [20:20] -Global- ç yardım eden yokmu

Raw 06 Haziran 2009 22:05

Cevap: ScanX global mesaj yardim.
 
ScanX.tcl içinde ;

set rgolo

olan satırı arat orada ki harflerden karışık olarak seçip global atıyor bot oradan ayarla kardeş

Disparede 07 Haziran 2009 19:25

Cevap: ScanX global mesaj yardim.
 
set rgolo "ABCDF GHIJ KLMN PRS TUV YZabcdfgh ijkkl mnop rstu vyzABCDF GHIJ KLMN PRS TUV uzayıp gidiyor işte burda yaptım ama kabul etmedi [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] diyorum ama gösteriyor

Disparede 09 Haziran 2009 11:13

Cevap: ScanX global mesaj yardim.
 
Alıntı:

Disparede Nickli Üyeden Alıntı (Mesaj 730883)
set rgolo "ABCDF GHIJ KLMN PRS TUV YZabcdfgh ijkkl mnop rstu vyzABCDF GHIJ KLMN PRS TUV uzayıp gidiyor işte burda yaptım ama kabul etmedi [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] diyorum ama gösteriyor

yanlış yazmışım göstermiyor dieyecektim. yardım edecek biri yokmu arkadaşlar.


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

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