IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 23 Mayıs 2009, 04:26   #1
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Socket bot Yardim



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

on *:SOCKREAD:nm: {
  var %s
  sockread %s
  tokenize 32 %s
  if $1 == PING {
    sw $sockname PONG $2
  }
  if $2 == 376 || $2 == 422 {
    sw $sockname Oper opernick şifre
  }
  if $2 == 381 {
    sw $sockname MODE %nmnick -s
    sw $sockname MODE %nmnick +s
    sw $sockname MODE %nmnick -s
    sw $sockname MODE %nmnick +s
    sw $sockname join 0,
    ; sw $sockname KILL Ajan The Ajan Bot - Coded by Set (auto reconnect)
    .timer 1 2 sw $sockname NICK Ajan-Bilgi
    .timer 1 5 sw $sockname sajoin Ajan-Bilgi #opers
  }
  if $2 == NICK {
    if $right($3,-1) == Ajan-Bilgi {
      sw $sockname MODE Ajan-Bilgi BH-h
      sw $sockname MODE Ajan-Bilgi +s
      sw $sockname MODE Ajan-Bilgi -s
      sw $sockname MODE Ajan-Bilgi +s
      sw $sockname ns identify nickşifresi
      sw $sockname os su su-şifresi
      sw $sockname os raw swhois Ajan-Bilgi :12 4•14 Ajan 4• 14Securty14 Technology144™ 
      sw $sockname sethost Channel.Securty.Technology
      .timer 1 5 sw $sockname SAJOIN Ajan-Bilgi #opers
      .timer 1 5 sw $sockname sethost Ajan.Securty.Technology
      .timer 1 5 sw $sockname JOIN #opers
      ; .timernm2list 0 180 sw $sockname LIST
    }
    if $botfnick($1) == Ajan-Bilgi {
      sw $sockname os raw KILL Ajan-Bilgi Auto Reconnect
      .timer 1 3 sw $sockname NICK Ajan-Bilgi
      .timer 1 5 sw $sockname SAJOIN Ajan-Bilgi #opers
      .timer 1 5 sw $sockname JOIN #opers
    }
  }
  if $2 == NOTICE && $3 == Ajan-Bilgi && *.*.* iswm $botfnick($1) {
    if *client connecting* iswm $strip($1-) {
      sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
      sw $sockname privmsg $12 :2Merhaba 4 $9 , 2Sunucumuza Hosgeldiniz  4... 
      sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
      sw $sockname privmsg $12 :4Kurallar : 12IRC Network'u üzerinde küfür etmek, reklam yapmak, proxy kullanmak, saldırı teşebbüsünde bulunmak, diğer kullanıcıları rahatsız etmek 4YASAKTIR! 2Ayrıntılı bilgi için; 12/MOTD 2 yazıp kurallar kısmını gözden geçiriniz. 4Not: 2Sunucuya bağlanan herkez bu kuralları okumuş ve kabul etmiş sayılır.
      sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
      sw $sockname privmsg $12 :4Uyari : Server İçinde Msn , Link , Site , Özel'inize Gelen Kişi'lerden Msn'e Almaktan Kaçinin , KanaL'a Gelen Msn'e Ve SiteLerden'de Kaçininiz , O Gibi Trojen'Ler Bilgisayar'iniza Zarar Verebilir , NOT : Her Hangi Bir Olayda 4 $server Sorumlu Degildir .
      sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
      sw $sockname privmsg $12 : 4Bilgi : 2Rumuzunuz sunucumuza kayitli degildir. Kayit(REGISTER) edebilmek ve sadece size ait olmasini saglamak icin 4/NickServ REGISTER SIFRENIZ E-MAILINIZ 2komutunu kullanabilirsiniz 4...
      sw $sockname privmsg $12 : 4Bilgi :  4Örnek2, /Nickserv register 123456 $9 $+ @ $+  $server  , Burada sifreniz 4123456 2E-Mailiniz ise  4 $9 $+ @ $+ $server  2olacaktir 4...
      sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
      sw $sockname privmsg $12 : 4 $server 2Sohbet Odalarinin Resmi Sitesi : 4 %web
      sw $sockname privmsg $12 : 4 %web 2Sohbet Odalarinin Resmi Script'ini İndirmek İçin : 4 %scriptlink
      sw $sockname privmsg $12 : 4 %web 2Sohbet Odalarinin Resmi Radyo'sunu DinLemek İçin : 4 %radyolink
      sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
      sw $sockname privmsg $12 :  4 4•14 Ajan 4• 14Securty14 Technology144™4• Hoş Sohbet'ler Diler..    
    }
  }
  if $2 == 301 {
    mesajkontrol $4 $right($strip($5-),-1)
  }
  if $2 == 317 {
    set -u20 %idle. [ $+ [ $4 ] ] $5
  }
  if $2 == PRIVMSG || $2 == NOTICE || $2 == ACTION {
    if $3 == Sohbettin-Bilgi && *.*.* !iswm $botfnick($1) {
      if $4 == :TIME {
        sw $sockname NOTICE $botfnick($1) TIME $time
      }
      if $4 == :VERSION {
        ; sw $sockname NOTICE $botfnick($1) VERSION 4 4•14 Ajan 4• 14Securty14 Technology144™4•
        sw $sockname NOTICE $botfnick($1) VERSION4 4•14 Ajan 4• 14Securty14 Technology144™4•
      }
      if $4 == :FINGER {
        sw $sockname NOTICE $botfnick($1) FINGER System Secure (bot) Idle 0 seconds
      }
    }
  }
} 

Bu Kod Neden Calişmiyor Acaba /sockopen nm Serverip port'u Yazdigim HaLde bot tekrar girmiyor hata nerede acaba yardim ederseniz cok sevinirim.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 23 Mayıs 2009, 11:46   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket bot Yardim



sockopen kısmını göremedim kodlarda yada sen eksik verdin yoksa bu şekilde ekle;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:sockopen:nm:{
  sockwrite -tn $sockname NICK botnicki
  sockwrite -tn $sockname USER botunidenti * * : $+ botunfullnamei
}

Bu kısım varsa ve açık olan botu çıkarıp tekrar sokmaksa niyetin önce /sockclose nm yazarak botun bağlantısını kes sonra tekrar sok.

 
Alıntı ile Cevapla

Alt 23 Mayıs 2009, 14:36   #3
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket bot Yardim



bu benim verdigim koda sorunmu var operi girmiyor kanala giriyor ama

SW Unknown command

bunu gösteriyr yardimci olurmusunuz biraz :S

 
Alıntı ile Cevapla

Alt 23 Mayıs 2009, 15:07   #4
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket bot Yardim



gördügüm kadariyla hata yok. Ama ;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:SOCKREAD:nm: {
 var %s
 sockread %s
 tokenize 32 %s
if $1 == PING {
sw $sockname PONG $2
}
 if $2 == 376 || $2 == 422 {
Oper opernick şifre
}
 if $2 == 381 {
sw $sockname MODE %nmnick -s
   sw $sockname MODE %nmnick +s
   sw $sockname MODE %nmnick -s
   sw $sockname MODE %nmnick +s
   sw $sockname join 0,
   ; sw $sockname KILL Ajan The Ajan Bot - Coded by Set (auto reconnect)
   .timer 1 2 sw $sockname NICK Ajan-Bilgi
.timer 1 5 sw $sockname sajoin Ajan-Bilgi #opers
}
 if $2 == NICK {
   if $right($3,-1) == Ajan-Bilgi {
sw $sockname MODE Ajan-Bilgi BH-h
     sw $sockname MODE Ajan-Bilgi +s
     sw $sockname MODE Ajan-Bilgi -s
     sw $sockname MODE Ajan-Bilgi +s
     sw $sockname ns identify nickşifresi
     sw $sockname os su su-şifresi
     sw $sockname os raw swhois Ajan-Bilgi :12 4•14 Ajan 4• 14Securty14 Technology144™ 
sw $sockname sethost Channel.Securty.Technology
.timer 1 5 sw $sockname SAJOIN Ajan-Bilgi #opers
.timer 1 5 sw $sockname sethost Ajan.Securty.Technology
.timer 1 5 sw $sockname JOIN #opers
; .timernm2list 0 180 sw $sockname LIST
   }
   if $botfnick($1) == Ajan-Bilgi {
sw $sockname os raw KILL Ajan-Bilgi Auto Reconnect
.timer 1 3 sw $sockname NICK Ajan-Bilgi
.timer 1 5 sw $sockname SAJOIN Ajan-Bilgi #opers
.timer 1 5 sw $sockname JOIN #opers
}
 }
 if $2 == NOTICE && $3 == Ajan-Bilgi && *.*.* iswm $botfnick($1) {
   if *client connecting* iswm $strip($1-) {
sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $12 :2Merhaba 4 $9 , 2Sunucumuza Hosgeldiniz  4... 
sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $12 :4Kurallar : 12IRC Network'u üzerinde küfür etmek, reklam yapmak, proxy kullanmak, saldırı teşebbüsünde bulunmak, diğer kullanıcıları rahatsız etmek 4YASAKTIR! 2Ayrıntılı bilgi için; 12/MOTD 2 yazıp kurallar kısmını gözden geçiriniz. 4Not: 2Sunucuya bağlanan herkez bu kuralları okumuş ve kabul etmiş sayılır.
     sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
     sw $sockname privmsg $12 :4Uyari : Server İçinde Msn , Link , Site , Özel'inize Gelen Kişi'lerden Msn'e Almaktan Kaçinin , KanaL'a Gelen Msn'e Ve SiteLerden'de Kaçininiz , O Gibi Trojen'Ler Bilgisayar'iniza Zarar Verebilir , NOT : Her Hangi Bir Olayda 4 $server Sorumlu Degildir .
     sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
     sw $sockname privmsg $12 : 4Bilgi : 2Rumuzunuz sunucumuza kayitli degildir. Kayit(REGISTER) edebilmek ve sadece size ait olmasini saglamak icin 4/NickServ REGISTER SIFRENIZ E-MAILINIZ 2komutunu kullanabilirsiniz 4...
     sw $sockname privmsg $12 : 4Bilgi :  4Örnek2, /Nickserv register 123456 $9 $+ @ $+  $server  , Burada sifreniz 4123456 2E-Mailiniz ise  4 $9 $+ @ $+ $server  2olacaktir 4...
     sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
     sw $sockname privmsg $12 : 4 $server 2Sohbet Odalarinin Resmi Sitesi : 4 %web
     sw $sockname privmsg $12 : 4 %web 2Sohbet Odalarinin Resmi Script'ini İndirmek İçin : 4 %scriptlink
     sw $sockname privmsg $12 : 4 %web 2Sohbet Odalarinin Resmi Radyo'sunu DinLemek İçin : 4 %radyolink
     sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
     sw $sockname privmsg $12 :  4 4•14 Ajan 4• 14Securty14 Technology144™4• Hoş Sohbet'ler Diler..    
   }
 }
 if $2 == 301 {
mesajkontrol $4 $right($strip($5-),-1)
 }
 if $2 == 317 {
set -u20 %idle. [ $+ [ $4 ] ] $5
}
 if $2 == PRIVMSG || $2 == NOTICE || $2 == ACTION {
   if $3 == Sohbettin-Bilgi && *.*.* !iswm $botfnick($1) {
     if $4 == :TIME {
sw $sockname NOTICE $botfnick($1) TIME $time
}
     if $4 == :VERSION {
       ; sw $sockname NOTICE $botfnick($1) VERSION 4 4•14 Ajan 4• 14Securty14 Technology144™4•
sw $sockname NOTICE $botfnick($1) VERSION4 4•14 Ajan 4• 14Securty14 Technology144™4•
}
     if $4 == :FINGER {
sw $sockname NOTICE $botfnick($1) FINGER System Secure (bot) Idle 0 seconds
}
   }
 }
}

bu şekilde yapabilirsin. denedim çalişiyor.

Konu Freedom tarafından (23 Mayıs 2009 Saat 15:20 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 23 Mayıs 2009, 21:59   #5
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket bot Yardim



usta bu gene operi girmiyor :S

 
Alıntı ile Cevapla

Cevapla

Etiketler
bot, mirc, mirc download, mirc indir, socket, yardim

« önceki Konu | sonraki Konu »

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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık

Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
özele !yardim yazildiginda yardim kanalına sajoinlemek BunaLim mIRC Scripting Sorunları 2 15 Eylül 2009 15:36
CipmerCy v3 Socket Bot EkLenti Yapamiyorum Yardim AyazGeceLer mIRC Scripting Sorunları 5 23 Aralık 2008 17:33
Socket Bot'da (NoMercy) dinleyiciyi yüksek gösterme [YARDIM] Cry mIRC Scripting Sorunları 1 29 Temmuz 2008 12:47




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
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.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org