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/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   küçük bir sock bot rica edecektim? (https://www.ircforumlari.net/mirc-scripting-sorunlari/242708-kucuk-bir-sock-bot-rica-edecektim.html)

alfa 10 Ağustos 2009 15:23
küçük bir sock bot rica edecektim?
 
arkadaşlar koruma botuma ek olarak değişik birşey yaptırmak istiyorum çok ufak birşey rica edecektim sizden

/bağlan komutuyla sock bağlansın
/sokcnick komutuyla nickini belirliyeyim
/tümçık komutuyla oto girdigi tüm odalalardan çıkarayım
/sockexit komutuyla disconnect ettireyim

acaba yardım edebilecek bir arkadaş varmı ?

Editor 10 Ağustos 2009 20:50
Cevap: küçük bir sock bot rica edecektim?
 
alfa , Bu istediğin özelliklerin hepsini forum içerisinde verilen Kod(bot) lar'dan temin edebilirsin.Ama bana hazır lazım kim uğraşıcak , kim yapıcak şimdi onu dersen , ilgilenen kimse olmaz.

alfa 11 Ağustos 2009 00:58
Cevap: küçük bir sock bot rica edecektim?
 
yok öyle demem sagopa sagol ugraştım ama bot girmedi baglanmadı çözemedim...

alfa 11 Ağustos 2009 01:28
Cevap: küçük bir sock bot rica edecektim?
 
Kod:
alias bot { sockopen bot irc.aaaaaÖrnek.com 6667 }
on *:sockopen:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
  swbot NICK aaaa
  swbot USER mIRC * * :mIRCTURK
  sockmark $sockname aaaa
  .timer 0 60 /sockwrite -nt $SocknAme JOIN #aaaa
}
on *:sockread:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
  var %; | sockread %; | tokenize 32 %;
  swalias $1-
}
alias swbot { if $sock(bot) { sockwrite -n bot $1- } }
alias swalias {
  if $sock(bot) {
    var %: = echo $color(info) -st > Socket bot:
    if :VERSION iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION IRC Security $+ $chr(1) }
    if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER IRC Security $+ $chr(1) }
    if $1 == PING { swbot PONG $2- }
    if $2 == KICK && $4 == $sock(bot).mark { %: $3 kanalından %n tarafından kicklendi. $+($chr(40),$right($5-,-1),$chr(41)) | swbot JOIN $3 }
    if $2 == PRIVMSG {
      var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k = $3
      if $istok(admin1 admin2,%n,32) {
        if .hop == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< | swbot JOIN %< }
        if .part == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< }
        if .join #* iswm %m { swbot JOIN $gettok(%m,2-,32) }
        if *irc.* iswm %m { swbot PRIVMSG #spam reklam, $nick }
      }
      if * iswm %m { swbot PRIVMSG #spam $remove($4-,:) }
    }
  }
}

arkadaşlar yukardakı kodları buldum servera baglanıyor 1 kanalada giriyor ama sonra ne yaptım ne ettiysem komutlarla ne kanala giriyor ne kanaldan part oluyor ne özel mesaj gönderiyor neden ama ?

alfa 11 Ağustos 2009 22:43
Cevap: küçük bir sock bot rica edecektim?
 
yokmu kimse ya bu canlı foruma ne olmuş böyle... hey gidi hey..

XcLusive 12 Ağustos 2009 20:53
Cevap: küçük bir sock bot rica edecektim?
 
ne yapacağını bilmezsen daha çok uğraşırsın botun ilk önce karşıdan bir veri alması gerek ki ona göre hareket etsin sock bot bildiğiniz mirc botlara benzemez..
"alias komut sockwrite -nt bot $1-" remotene ekle bunu sonrada /komut join #kanal - /komut part #kanal gibi kanala girip çıkartırsın mesaj göndermek için /komut privmsg #kanal/nick mesaj.
-
ayrıca foruma birşey olduğu yok bilgisizliğini foruma mal etme. araştırmasını yaparsan onlarca döküman bulursun 99 senesinde değilsin dökümanlar yardımlar kısıtlı olsun 2009 senesindeyiz.

alfa 12 Ağustos 2009 22:18
Cevap: küçük bir sock bot rica edecektim?
 
1.ben bu foruma senelerdir giriyorum şuan en verimsiz zamanı 2 komut bildin diye havalara girme..

2.birşeyi mal etmiyorum evet bilgisizim irc konusunda ve burasıda gariptirki yardım platformu boş boş ve havalı havalı birşey biliyorum diye konuşma...

3. ırım kırımla birşeyler yazmıssın yardım olarak "sagol"

ibrahim158 19 Ocak 2011 23:36
Cevap: küçük bir sock bot rica edecektim?
 
Alıntı:
alfa Nickli Üyeden Alıntı (Mesaj 779039)
Kod:
alias bot { sockopen bot irc.aaaaaÖrnek.com 6667 }
on *:sockopen:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
  swbot NICK aaaa
  swbot USER mIRC * * :mIRCTURK
  sockmark $sockname aaaa
  .timer 0 60 /sockwrite -nt $SocknAme JOIN #aaaa
}
on *:sockread:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
  var %; | sockread %; | tokenize 32 %;
  swalias $1-
}
alias swbot { if $sock(bot) { sockwrite -n bot $1- } }
alias swalias {
  if $sock(bot) {
    var %: = echo $color(info) -st > Socket bot:
    if :VERSION iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION IRC Security $+ $chr(1) }
    if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER IRC Security $+ $chr(1) }
    if $1 == PING { swbot PONG $2- }
    if $2 == KICK && $4 == $sock(bot).mark { %: $3 kanalından %n tarafından kicklendi. $+($chr(40),$right($5-,-1),$chr(41)) | swbot JOIN $3 }
    if $2 == PRIVMSG {
      var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k = $3
      if $istok(admin1 admin2,%n,32) {
        if .hop == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< | swbot JOIN %< }
        if .part == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< }
        if .join #* iswm %m { swbot JOIN $gettok(%m,2-,32) }
        if *irc.* iswm %m { swbot PRIVMSG #spam reklam, $nick }
      }
      if * iswm %m { swbot PRIVMSG #spam $remove($4-,:) }
    }
  }
}

arkadaşlar yukardakı kodları buldum servera baglanıyor 1 kanalada giriyor ama sonra ne yaptım ne ettiysem komutlarla ne kanala giriyor ne kanaldan part oluyor ne özel mesaj gönderiyor neden ama ?

bunu bi ara ben web de gezerken bulmusdum ve edıtledım super bı koruma botu oldu :))
/swbot part #kanal1,#kanal2 vs
/swbot join #kanal1,#kanal2 vs
/swbot privmsg #kanal mesaj
/swbot mode #kanal +-modes
guzel birsey ben kendım edıtlemeye calısdım nomercy den bıraz kod aldım o kadar :DDD
bak mak ısdeyenler irc.sohbet15.com sunucuya gırıp bakabılırler nıckı Syrix

----------

Alıntı:
ibrahim158 Nickli Üyeden Alıntı (Mesaj 1040653851)
bunu bi ara ben web de gezerken bulmusdum ve edıtledım super bı koruma botu oldu :))
/swbot part #kanal1,#kanal2 vs
/swbot join #kanal1,#kanal2 vs
/swbot privmsg #kanal mesaj
/swbot mode #kanal +-modes
guzel birsey ben kendım edıtlemeye calısdım nomercy den bıraz kod aldım o kadar :DDD
bak mak ısdeyenler irc.sohbet15.com sunucuya gırıp bakabılırler nıckı Syrix
pardon tek sey unutmusum if $istok(admin1 admin2,%n,32) {
admin1 yerine kendı nıckını yazarsan yada $me Botun ozelde uygulaya bılırsın .join #kanal .part #kanal .hop #kanal


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

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