Opme Yardım pls - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

cashmare · 16 Mayıs 2008, 19:25

GemLik Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ilk olarak bi eggdrop confu yarat kendine örnekleri forumda mevcut onu eggdrop klasörüne at ondan sonra vermiş olduğum tcl yi opme.tcl bir dosya oluşturup eggdrop/scrips klasörüne at daha sonra oluşturuğunu conf a source scripts/opme.tcl eklemeyi unutma en sonra olarak ./eggdrop -m botunismi.conf yaparak sokarsın

arkadaşlar
şimdi ben ftp den girdim unreal3.2 ye eggdrop klasorunda..
atıyorum rastgele xx.conf un için source scripts/opme.tcl
en son satıra bu kodu ekledim.. sonra kaydettim
/eggdrop -m xx.conf yaptıgımda.
EGGDROP Unknown command
böyle bi uyarı cıkıyor yaw..
tabi bu komutu sunucuda uyguluyorum.. yoksa telnette mi uygulamam gerek ?
yaw biri allah için bana sunu detaylı bi şekilde anlatabilir mi..
arkadaşlar telnettende denedim olmadı.. girdim telnete.
sonra cd eggdrop
yaptım enterledim..
sonra /eggdrop -m xx.conf yaptım
-bash /eggdrop no such file or directory die bi hata cıktı..
yani kısacası verdiginiz source kodunu kelime.conf a ekledim
sonra opme.tcl die bir dosyayıda eggdrop/scriptsin içine attım
sonra girdim telnete
cd eggdrop
/eggdrop -m kelime.conf
yazdıgımda yukardaki gibi bi hata cıkıyor sanırım.. nerde hata yapıyorum.. ?

GemLik · 16 Mayıs 2008, 20:02

komut yanlş ./eggdrop -m botismi.cof olacak ( . ) unutma ve bunu telnette yapacaksın

cashmare · 17 Mayıs 2008, 00:50

GemLik Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

komut yanlş ./eggdrop -m botismi.cof olacak ( . ) unutma ve bunu telnette yapacaksın

yaw kardeş verdigin komut tmm oldu ama Merlyn die bir bot girmedi sunucuya.. neden acaba bu arada sunucum unreal ondanmıdır ki ?

JoinT · 17 Mayıs 2008, 00:54

birde ./eggdrop -nm botismi.conf olarak dene neden giremedigini görürsün Burayada yazarsan yardımcı olan çıkar

GemLik · 17 Mayıs 2008, 01:00

cashmare Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

yaw kardeş verdigin komut tmm oldu ama Merlyn die bir bot girmedi sunucuya.. neden acaba bu arada sunucum unreal ondanmıdır ki ?

hayır unreal le alakası yok hazırladığın conf da botun nickini belirliyorsunuz zaten ondan sonra verdiğim komutu uyguluyorsun ./eggdrop -m confadi.conf gibi

cashmare · 17 Mayıs 2008, 01:10

GemLik Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

hayır unreal le alakası yok hazırladığın conf da botun nickini belirliyorsunuz zaten ondan sonra verdiğim komutu uyguluyorsun ./eggdrop -m confadi.conf gibi

abi iyide bana sadece confa source scripts/isim.tcl ekle demişlerdi botun nickini nereye ekliycem varsa elinizde bana Merlyn adında bir conf verirmisiniz. rica etsem

GemLik · 17 Mayıs 2008, 01:26

yaws paşam bir örnek conf yapmadın mı onun içinde gireceği serverı kanalı nicki belirtiyorsun ya oradan botun nickini yaz Merlyn die ondan sonra en alt tcl ekle kod olarak source scripts/isim.tcl şeklinde eğer yapamazsan pm de msn adresini ver yardımcı olayım ok

cashmare · 17 Mayıs 2008, 01:37

GemLik Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

yaws paşam bir örnek conf yapmadın mı onun içinde gireceği serverı kanalı nicki belirtiyorsun ya oradan botun nickini yaz Merlyn die ondan sonra en alt tcl ekle kod olarak source scripts/isim.tcl şeklinde eğer yapamazsan pm de msn adresini ver yardımcı olayım ok

tmm yolladım
______________________
###### Bilgi Satiri #####
set mod-path "modules/"
set help-path "help/"
set text-path "text/"
loadmodule dns
loadmodule channels
loadmodule server
loadmodule ctcp
loadmodule irc
loadmodule notes
loadmodule console
checkmodule blowfish

##### Bilgi Satiri #####
##### Bot bilgileri #####
set nick "MerLyn"
set realname "2Sunucu Bots"

#Bu opsiyonel su an kapalidir. Eger botunuz herhangi bir nedenden oturu size ctcp acmiyorsa
#Bu satira botun barindirilmis oldugu host'un ip adresini yazmaniz yeterli olacaktir.

#set my-ip "1.2.3.4"

set init-server {
putserv "oper MerLyn şifre"
putserv "PRIVMSG nickserv identify şifre"
}
set servers { ip:port }
channel add #Op { chanmode "lik" idle-kick 0 stopnethack-mode 0 }
set net-type 5
set owner TimothY

##### Dosyalar ve Dizinler #####
##### Bilgi Satiri #####
set userfile "bots.user"
set chanfile "bots.chan"
set temp-path "/tmp"
logfile msbxco * "logs/bots.log"
logfile jpk #log "logs/#log.log"
set console "mkcobxs"

##### SCRIPTLER #####
source scripts/Opme.tcl
loadhelp userinfo.help

# EndOf
böyle bi merlyn.conf oluşturdum attım eggdropun içine.. nerede hata vr acaba
ip port kısımları ve şifreleri kendim gizledim burada.. oralar dogru yazıldı.

buda tcl
################################################## ##############################
# opal.tcl 1.0 - #
# #
# Bu tcl nin amaci helperlarin ihticayi olduklari kanalda op almalarini sagla #
# maktir. Mynet myops botu ornek alinarak yapilmistir. Bot bulundugu kanaldan #
# verilen "opver #kanal" komutuna karsilik komutu veren kullaniciyi kanalda op #
# yapar. Dikkat edilmesi gereken kotu, botu normal kullanicilarin erisemiyecek #
# leri bir kanalda bulundurmaktir.! #
################################################## ####################GemLik####

# Botun giriste ircop olmasi icin gerekli ircop nicki
set inick "MerLyn"
# Buda gerekli olan sifre
set ipass "şifre"

# Ayarlar Bu kadar.! DOKUNMAYIN!!!
#gerekli bindler
bind pub - opver opver
bind evnt - init-server baglan_yap
proc baglan_yap {type} {
global inick ipass
putserv "OPER $inick $ipass"
putserv "WALLOPS
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
asari ile Login Oldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
}
proc opver {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a 0]
putserv "MODE $kanal +o :$gnick"
putserv "PRIVMSG $c :$n $kanal Kanalinda Oplandi..!"
putserv "WALLOPS :$n $kanal Kanalinda Oplandi..!"
}

¿ · 16 Temmuz 2008, 11:18

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


#~BASLA~######################################################################
#                                                                            #
#                   Coder By Namesis | 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
                      #
#                                                                            #
#######################################################################~OPME~#

# Botun girişte IRCOP olması için gerekli IRCOP nicki
set inick "MerLyn"

# Buda girişte IRCOP olması için gerekli IRCOP şifresi
set ipass "MerLyn"

# Ops Kanalı
set opschan "#Ops"

# Ayarlar Bu kadar! Diğerlerine DOKUNMAYIN; aksi taktirde kodlar çalışmayabilir!

bind evnt - init-server baglan:uygula
proc baglan:uygula {type} {
global inick ipass
  putserv "OPER $inick $ipass"
}

bind join - * join:ops
proc join:ops {nick uhost handle channel} {
     putquick "NOTICE $nick :\00302Merhaba\00304 $nick \00302hoşgeldiniz!"
     putquick "NOTICE $nick :\00302Hakkımda bilgi almak için lütfen özelime \00304!bilgi \00302yazınız!"
}

bind pub - !op op
proc op {nick uhand host chan text} {
  global gnick opschan
  set gnick $nick
        if {([onchan $nick $opschan])} {
        set kanal [lindex $text 0]
        if {$kanal == ""} {
        putquick "NOTICE $nick :\00302Lütfen kanal ismi yazın. \00304Ör; \00302!op #Sohbet"
        } else {
        putquick "sajoin $nick $kanal"
        putquick "mode $kanal +o $nick"
        putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda size,\00304 $kanal \00302kanalında \00304AOP(@)\00302 verdim."
         }
        } else {
        putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !deop deop
proc deop {nick uhand host chan text} {
  global gnick opschan
  set gnick $nick
        if {([onchan $nick $opschan])} {
        set kanal [lindex $text 0]
        if {$kanal == ""} {
        putquick "NOTICE $nick :\00302Lütfen kanal ismi yazın. \00304Ör; \00302!deop #Sohbet"
        } else {
        putquick "sajoin $nick $kanal"
        putquick "mode $kanal -o $nick"
        putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda sizi,\00304 $kanal \00302kanalında \00304DEOP\00302 yaptım."
         }
        } else {
        putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !voice voice
proc voice {nick uhand host chan text} {
  global gnick opschan
  set gnick $nick
        if {([onchan $nick $opschan])} {
        set kanal [lindex $text 0]
        if {$kanal == ""} {
        putquick "NOTICE $nick :\00302Lütfen kanal ismi yazın. \00304Ör; \00302!voice #Sohbet"
        } else {
        putquick "sajoin $nick $kanal"
        putquick "mode $kanal +v $nick"
        putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda size,\00304 $kanal \00302kanalında \00304VOP(+)\00302 verdim."
         }
        } else {
        putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !devoice devoice
proc devoice {nick uhand host chan text} {
  global gnick opschan
  set gnick $nick
        if {([onchan $nick $opschan])} {
        set kanal [lindex $text 0]
        if {$kanal == ""} {
        putquick "NOTICE $nick :\00302Lütfen kanal ismi yazın. \00304Ör; \00302!devoice #Sohbet"
        } else {
        putquick "sajoin $nick $kanal"
        putquick "mode $kanal -v $nick"
        putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda sizi,\00304 $kanal \00302kanalında \00304DEVOICE\00302 yaptım."
         }
        } else {
        putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !halfop halfop
proc halfop {nick uhand host chan text} {
  global gnick opschan
  set gnick $nick
        if {([onchan $nick $opschan])} {
        set kanal [lindex $text 0]
        if {$kanal == ""} {
        putquick "NOTICE $nick :\00302Lütfen kanal ismi yazın. \00304Ör; \00302!halfop #Sohbet"
        } else {
        putquick "sajoin $nick $kanal"
        putquick "mode $kanal +h $nick"
        putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda size,\00304 $kanal \00302kanalında \00304HOP(%)\00302 verdim."
         }
        } else {
        putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !dehalfop dehalfop
proc dehalfop {nick uhand host chan text} {
  global gnick opschan
  set gnick $nick
        if {([onchan $nick $opschan])} {
        set kanal [lindex $text 0]
        if {$kanal == ""} {
        putquick "NOTICE $nick :\00302Lütfen kanal ismi yazın. \00304Ör; \00302!dehalfop #Sohbet"
        } else {
        putquick "sajoin $nick $kanal"
        putquick "mode $kanal -h $nick"
        putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda sizi,\00304 $kanal \00302kanalında \00304DEHALFOP\00302 yaptım."
         }
        } else {
        putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !kb kickban
proc kickban {nick uhand host chan text} {
global opschan
set banmask "[getchanhost [lindex $text 0] $chan]"
set kisi "[lindex $text 0]"
set sebep "[lrange $text 1 end]"
if {([onchan $nick $opschan])} {
if {$sebep == ""} {
putquick "mode $chan +b $banmask"
putquick "kick $chan $kisi $nick"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $kanal \00302kanalından;\00304 $kisi \00302nickli kişi;\00304 SEBEP \00302belirtilmeden banlanıp atıldı."
} else {
putquick "mode $chan +b $banmask"
putquick "kick $chan $kisi $sebep"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $kanal \00302kanalından;\00304 $kisi \00302nickli kişi;\00304 $sebep \00302sebebinden dolayı banlanıp atıldı."
 }
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !kick kick
proc kick {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
set sebep "[lrange $text 1 end]"
if {([onchan $nick $opschan])} {
if {$sebep == ""} {
putquick "kick $chan $kisi $nick"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalından;\00304 $kisi \00302nickli kişi;\00304 SEBEP \00302belirtilmeden atıldı."
} else {
putquick "kick $chan $kisi $sebep"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalından;\00304 $kisi \00302nickli kişi;\00304 $sebep \00302sebebinden dolayı atıldı."
 }
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !ban banneds
proc banneds {nick uhand host chan text} {
global opschan
set banmask "[getchanhost [lindex $text 0] $chan]"
if {([onchan $nick $opschan])} {
putquick "mode $chan +b $banmask"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişi banlandı."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !o ops
proc ops {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
if {([onchan $nick $opschan])} {
putquick "mode $chan +o $kisi"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişiye \00304AOP(@) \00302modesi verildi."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !do deops
proc deops {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
if {([onchan $nick $opschan])} {
putquick "mode $chan -o $kisi"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişiden \00304AOP(@) \00302modesi alındı."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !h halops
proc halops {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
if {([onchan $nick $opschan])} {
putquick "mode $chan +h $kisi"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişiye \00304HOP(%) \00302modesi verildi."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !dh dehalops
proc dehalops {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
if {([onchan $nick $opschan])} {
putquick "mode $chan -h $kisi"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişiye \00304HOP(%) \00302modesi alındı."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !v voices
proc voices {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
if {([onchan $nick $opschan])} {
putquick "mode $chan +v $kisi"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişiye \00304VOP(+) \00302modesi verildi."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !dv devoices
proc devoices {nick uhand host chan text} {
global opschan
set kisi "[lindex $text 0]"
if {([onchan $nick $opschan])} {
putquick "mode $chan -v $kisi"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında;\00304 $kisi \00302nickli kişiye \00304VOP(+) \00302modesi alındı."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind pub - !unban unban
proc unban {nick uhand host chan text} {
global opschan
foreach ban [chanbans $chan] {
append banlist "[lindex $ban 0] "
if {([onchan $nick $opschan])} {
putquick "MODE $chan -bbbbbbbbbb [lrange $banlist 0 10]"
putquick "MODE $chan -bbbbbbbbbb [lrange $banlist 11 20]"
putquick "MODE $chan -bbbbbbbbbb [lrange $banlist 21 30]"
putquick "MODE $chan -bbbbbbbbbb [lrange $banlist 31 40]"
putquick "MODE $chan -bbbbbbbbbb [lrange $banlist 41 50]"
putquick "NOTICE $nick :\00302Isteğiniz doğrultusunda;\00304 $chan \00302kanalında ki tüm \00304 BAN\00302'lar açıldı."
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
  }
 }
}

bind pub - !temizle clear
bind pub - !clear clear
proc clear {nick uhand host chan text} {
global opschan
if {([onchan $nick $opschan])} {
putquick "PRIVMSG $chan : "
putquick "PRIVMSG $chan :  "
putquick "PRIVMSG $chan :   "
putquick "PRIVMSG $chan :    "
putquick "PRIVMSG $chan :     "
putquick "PRIVMSG $chan :      "
putquick "PRIVMSG $chan :       "
putquick "PRIVMSG $chan :        "
putquick "PRIVMSG $chan :         "
putquick "PRIVMSG $chan :          "
putquick "PRIVMSG $chan :           "
putquick "PRIVMSG $chan :            "
putquick "PRIVMSG $chan :             "
putquick "PRIVMSG $chan :              "
putquick "PRIVMSG $chan :               "
putquick "PRIVMSG $chan :                "
putquick "PRIVMSG $chan :                 "
putquick "PRIVMSG $chan :                  "
putquick "PRIVMSG $chan :                   "
putquick "PRIVMSG $chan :                    "
putquick "PRIVMSG $chan :                     "
putquick "PRIVMSG $chan :                      "
putquick "PRIVMSG $chan :                       "
putquick "PRIVMSG $chan :                        "
putquick "PRIVMSG $chan :                         "
putquick "PRIVMSG $chan :                          "
putquick "PRIVMSG $chan :                           "
putquick "PRIVMSG $chan :                            "
putquick "PRIVMSG $chan :                             "
putquick "PRIVMSG $chan :                              "
putquick "PRIVMSG $chan :\00302Oda Ekranı Temizlendi\00304 $nick !"
} else {
putquick "NOTICE $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

bind msgm - * bilgilendirme
proc bilgilendirme {nick uhost hand text} {
  global opschan
     if {([onchan $nick $opschan])} {
     set bilgilen [lindex $text 0]
     if {$bilgilen == "!bilgi"} {
putquick "PRIVMSG $nick :\00302Merhaba\00304 $nick"
putquick "PRIVMSG $nick :\00302Üstat \00304Namesis\00302 tarafından yapıldım! \00304:PpP"
putquick "PRIVMSG $nick :\00302Yararlanabilmeniz için\00304 $opschan \00302kanalında bulunmanız şarttır!"
putquick "PRIVMSG $nick :\00302Kanal geneline, hafızamda bulunan komutları yazıp kullanabilirsiniz!"
putquick "PRIVMSG $nick : "
putquick "PRIVMSG $nick :\00304Komutlar;"
putquick "PRIVMSG $nick :\00302Herhangi bir kanalda \00304OP \00302olabilmeniz için\00304 $opschan \00302kanalına bunu yazın;"
putquick "PRIVMSG $nick :\00304!op #Kanal"
putquick "PRIVMSG $nick :\00304deop \00302olmanız için; \00304!deop #Kanal"
putquick "PRIVMSG $nick :\00302Herhangi bir kanalda \00304VOICE \00302olabilmeniz için\00304 $opschan \00302kanalına bunu yazın;"
putquick "PRIVMSG $nick :\00304!voice #Kanal"
putquick "PRIVMSG $nick :\00304devoice \00302olmanız için; \00304!devoice #Kanal"
putquick "PRIVMSG $nick :\00302Herhangi bir kanalda \00304HALFOP \00302olabilmeniz için\00304 $opschan \00302kanalına bunu yazın;"
putquick "PRIVMSG $nick :\00304!halfop #Kanal"
putquick "PRIVMSG $nick :\00304dehalfop \00302olmanız için; \00304!dehalfop #Kanal"
putquick "PRIVMSG $nick :  "
putquick "PRIVMSG $nick :\00304!ban Nick \00301- \00302Herhangi bir nicki kanaldan \00304banlarsınız."
putquick "PRIVMSG $nick :\00304!kb Nick Sebep \00301- \00302Herhangi bir nicki kanaldan \00304banlar \00302ve \00304atarsınız."
putquick "PRIVMSG $nick :\00304!kick Nick Sebeb \00301- \00302Herhangi bir nicki kanaldan \00304atarsınız."
putquick "PRIVMSG $nick :\00304!o Nick \00301- \00302Herhangi bir nicke \00304AOP(@) \00302modesi \00304verirsiniz."
putquick "PRIVMSG $nick :\00304!do Nick \00301- \00302Herhangi bir nicketen \00304AOP(@) \00302modesini \00304geri alırsınız."
putquick "PRIVMSG $nick :\00304!h Nick \00301- \00302Herhangi bir nicke \00304HOP(%) \00302modesi \00304verirsiniz."
putquick "PRIVMSG $nick :\00304!dh Nick \00301- \00302Herhangi bir nickten \00304HOP(%) \00302modesini \00304geri alırsınız."
putquick "PRIVMSG $nick :\00304!v Nick \00301- \00302Herhangi bir nicke \00304VOP(+) \00302modesi \00304verirsiniz."
putquick "PRIVMSG $nick :\00304!dv Nick \00301- \00302Herhangi bir nickten \00304VOP(+) \00302modesini \00304geri alırsınız."
putquick "PRIVMSG $nick :\00304!unban \00301- \00302Kanalda ki tüm \00304BAN\00302'ları açarsınız."
putquick "PRIVMSG $nick :\00304!temizle \00301veya \00304!clear \00301- \00302Oda ekranını temizler!"
putquick "PRIVMSG $nick :   "
putquick "PRIVMSG $nick :\00304!bilgi \00302sonu! \00304Coder By Namesis!"
} else {
putquick "PRIVMSG $nick :\00302Hakkımda bilgi almak için lütfen \00304!bilgi \00302yazınız!"
 }
} else {
putquick "privmsg $nick :\00302Bu özelliği sadece\00304 $opschan \00302kanalında bulunan görevli \00304AOP(@)\00302'lar kullanabilir!"
 }
}

#~OPME~#######################################################################
#                                                                            #
#                   Coder By Namesis | 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
                      #
#                                                                            #
########################################################################~SON~#

Buyrun arkadaşlar UNREAL için OPME TCL herhanqi bir qüvenLik açıqı yoktur test edildi gayet iyi çalışıyor.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

KuLLanabiLeceqiniz KomutLar;

!op #KanaL - BeLirLediğiniz kanaLda AOP(@) oLursunuz.
!deop #KanaL - BeLirLediqiniz KanaLda DEOP oLursunuz.
!haLfop #KanaL - BeLirLediğiniz kanaLda HOP(%) oLursunuz.
!dehaLop #KanaL - BeLirLediğiniz kanaLda DEHALFOP oLursunuz.
!voice #KanaL - BeLirLediğiniz kanaLda VOP(+) oLursunuz.
!devoice #KanaL - BeLirLediğiniz kanaLda DEVOICE oLursunuz.!ban Nick - BeLirLediğiniz nicki KanaLdan banLarsınız.
!kb Nick Sebep - BeLirLediqiniz nicki kanaLdan banLar ve atarsınız.
!kick Nick Sebep - BeLirLediğiniz nicki kanaLdan atarsınız.
!o Nick - BeLirLediqiniz nicke AOP(@) verirsiniz.
!do Nick - BeLirLediğiniz nickten AOP(@) modesini aLırsınız.
!h Nick - BeLirLediğiniz nicke HOP(%) verirsiniz.
!dh Nick - BeLirLediğiniz nickten HOP(%) modesini aLırsınız.
!v Nick - BeLirLediğiniz nicke VOP(+) verirsiniz.
!dv Nick - BeLirLediğiniz nickten VOP(+) modesini aLırsınız.
!unban - KanaLda ki tüm BAN'Ları açarsınız.
!temizLe ve !cLear - Oda ekranını temizLersiniz.

Ayrıca KarşıLama ve ÖzeLde !biLgi

zafer84 · 12 Kasım 2008, 22:23

GemLik Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

sana opme tcl yi verim ama konu yalnış yere açılmış bunu eggdrop botuna koyacaksın ve botun admin olacak

Kod: Kodu kopyalamak için üzerine çift tıklayın!

################################################################################
# opal.tcl 1.0 - #
# #
# Bu tcl nin amaci helperlarin ihticayi olduklari kanalda op almalarini sagla #
# maktir. Mynet myops botu ornek alinarak yapilmistir. Bot bulundugu kanaldan #
# verilen "opver #kanal" komutuna karsilik komutu veren kullaniciyi kanalda op #
# yapar. Dikkat edilmesi gereken kotu, botu normal kullanicilarin erisemiyecek #
# leri bir kanalda bulundurmaktir.! #
######################################################################GemLik####
 
# Botun giriste ircop olmasi icin gerekli ircop nicki
set inick "botnick"
# Buda gerekli olan sifre
set ipass "şifre"
 
 
 
 
 
 
# Ayarlar Bu kadar.! DOKUNMAYIN!!!
#gerekli bindler
bind pub - opver opver
bind evnt - init-server baglan_yap
proc baglan_yap {type} {
global inick ipass
putserv "OPER $inick $ipass"
putserv "WALLOPS :Basari ile Login Oldum :)"
}
proc opver {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a 0]
putserv "SAMODE $kanal +o :$gnick"
putserv "PRIVMSG $c :$n $kanal Kanalinda Oplandi..!"
putserv "WALLOPS :$n $kanal Kanalinda Oplandi..!"
}

Gemlikli Selam arkadaşım ben bunu uyguladımda, opver #kanal nerde yazarsam yazayım Op veriyor, bunu sadece #Ops kanalında vermesi için ne yapmam gerekli, Birde Verilen Op u bazi kanallarda Chanserv Geri Alıyor, Almaması için ne yapmam gerekli..

Yardımcı Olursanız Sevinirim..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Yardım Nick info Son Görülen Zaman aşımından Access silme Yardım	HsN	mIRC Scripting Sorunları	4	14 Ocak 2014 21:15
opme op ver	Leo	mIRC Scripting Sorunları	7	18 Temmuz 2009 12:04
gozumden opme ayrılıktır...	StiLo	Şiir, Hikaye ve Güzel Sözler	2	02 Nisan 2009 05:42
Opme TCL Yardim	JackaL	TCL Scriptler	7	14 Kasım 2008 20:44
Opme Botu	tutkunum	Eggdrop, NeoStats, BNC	0	16 Mayıs 2007 16:13

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

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.