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/)
-   -   socket botumda bi sorun olustu 4. satır ile alakalı (https://www.ircforumlari.net/mirc-scripting-sorunlari/699676-socket-botumda-bi-sorun-olustu-4-satir-ile-alakali.html)

aksoylum 28 Temmuz 2015 09:40

socket botumda bi sorun olustu 4. satır ile alakalı
 
* /sockopen: Yetersiz veya eksik parametre (Satır 4, script4.mrc)
[09:38:54] <unutulmaz> !online


4. satır olan bölum neresi acaba

Kod:

alias bağlan {
if !$sock(bot) {
sockopen bot irc.TRSohbet.Com
} }

yazaßilirsiniz

Kod:

on *:sockopen:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
  swbot NICK TatLı_Jadı
  swbot USER Tatli-Cadi * * :  Sus iZLe..4!
  swbot privmsg nickserv identify Trsohbet
  sockmark $sockname TatLı_Jadı
  swbot join 0
  swbot join #radyo
}
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 mIRC v6.17 Khaled Mardam-Bey $+ $chr(1) }
    if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER guARdiANof[THE]Light $+ $chr(1) }
    if $1 == PING { swbot PONG $2- }
    if $2 == 474 { %: $4 kanalında banlı. }
    if $2 == 366 { %: $4 kanalına girdi. }
    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 == NICK) {
      var %mynick = $me, %ynick = $remove($3,:)
      if (%ynick == dJ-UnuTuLMaZ) {
        /swbot privmsg #radyo :  Dj-UnuTuLMaZ iyi YayınLar ..
        return
      }
      if (%ynick == UnuTuLMaZ) {
        /swbot privmsg #radyo :  ~ UnuTuLMaZ 'ımmmm ~
        return
      }
    }
    if ($2 == Privmsg && $left($3,1) == $chr(35)) {
      if ($3 == #radyo) {
        if ($remove($4,:) == !konustur) { swbot privmsg $5 $6- }
      }
    }
    var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k =  $3
    if !$window(@Takip) { window -k0 @Takip } | aline -p @Takip $timestamp <  $1-
  }
}
on *:text:*UnuTuLMaZ*:#:{ /swbot Privmsg $nick  Sevgilime SeSlenme !  }
on *:open:?:*:{ swbot Privmsg $nick : $+  12 Pc Başında Olmaya Bilirim , Lütfen Notunuzu Bırakın }


Feragat 28 Temmuz 2015 10:09

Cevap: socket botumda bi sorun olustu 4. satır ile alakalı
 
sockopen komutu ile ilgili hata vermiş. Bağlanılacak portu yazıp bir dene bakalım

bu şekilde.
Kod:

sockopen bot irc.TRSohbet.Com 6667


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

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