IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi  
 sohbet
derya sohbet
Kayıt ol
Güncel Konular
irc.Soyle.NET Sunucusu Tüm Hakları İle Satın Alınmıştır..     */ ZurnaSohbet.Com.TR - Yeni Arayüzü Çalışması     TRmIRC.Net Satılıktır...     Sunucu Rehberi - Dostyeri.Org     Meepress: Full SEO Uyumlu ve Yaratıcı Haber Scripti     Wordpress Sohbet Siteleri İçin Öneriler Eklentisi ÇIKTI ve ÜCRETSİZ     10 bin Kişi Getirecek DJ Ve admin ALımları...     SuperSohbet.Net Güncel Yönetim Kadrosu     Satılık Radyo Domaini     Sohbet Chat Makaleleri Alınacaktır.    Sunucu Polemiği - AyYildizSohbet.Com & AyYildizFM    🎙️Radyo Polemiği 57- DostCanlar.Net & DostCanlar-Fm🎤📻    Ayın Editörü - Astrea    Ne Seninle Ne Sensiz - Brittle


mIRC Scripting Sorunları - Yardım mIRC Scripting ile ilgili sorunlariniza ait güncel yanıtlara bu başlık altından ulaşabilirsiniz.

11Beğeni(ler)


Yeni Konu Aç
Cevap Yaz
  
Sayfa 2 Toplam 2 Sayfadan 1 2
 
Seçenekler Stil
Alt 18 Aralık 2020, 16:13   #11
Set
Özel Üye
Set - ait Kullanıcı Resmi (Avatar)
Standart
Alıntı:
FuaT Nickli Üyeden Alıntı Mesajı göster
AyNet.org Sunucumuzda ki MerLyn botu socket. Bu kodu o botta kullanacagız.
O bot'ta

Kod

alias veri {
  tokenize 32 $1-
  if $regex($2,/privmsg/i) {
    var %nick $right($token($1,1,33),-1), %ident $token($token($1,1,64),2,33), %host $token($1,2,64), %chan $3
    tokenize 32 $right($4-,-1)
    echo -s Nick: %nick Kanal: %chan Mesaj: %mesaj
  }
}


on *:sockread:sockname: {
  var %x | %sockread %x 
  tokenize 32 %x
  veri $1-
}

Üsteki gibi bir eklendi deneyip verilerin nasıl geldigini görebilirsin, socket mantıgı ham veridir, sadece gelen verileri sekillendirmek kalıyor, sekillendirmektende kastım oradanda gelen verilere kosullar (if else gibi) yazılacak, bak bakalim devam'ını az kurcala yapamazsan 1 saat sonra gene dönüs yap, kodu istedigin sekil düzenlip paylasırım sana.

 
Alıntı Yap
Alt 18 Aralık 2020, 16:15   #12
Kyo
Kyo - ait Kullanıcı Resmi (Avatar)
Standart Teşekürler ÜStadım
Alıntı:
Set Nickli Üyeden Alıntı Mesajı göster
O bot'ta

Kod

alias veri {
  tokenize 32 $1-
  if $regex($2,/privmsg/i) {
    var %nick $right($token($1,1,33),-1), %ident $token($token($1,1,64),2,33), %host $token($1,2,64), %chan $3
    tokenize 32 $right($4-,-1)
    echo -s Nick: %nick Kanal: %chan Mesaj: %mesaj
  }
}


on *:sockread:sockname: {
  var %x | %sockread %x 
  tokenize 32 %x
  veri $1-
}

Üsteki gibi bir eklendi deneyip verilerin nasıl geldigini görebilirsin, socket mantıgı ham veridir, sadece gelen verileri sekillendirmek kalıyor, sekillendirmektende kastım oradanda gelen verilere kosullar (if else gibi) yazılacak, bak bakalim devam'ını az kurcala yapamazsan 1 saat sonra gene dönüs yap, kodu istedigin sekil düzenlip paylasırım sana.
Sunucu Sahibi Geldiğinde beraber deneyerek size dönüş yapacağım. Socket Öğrenmeme vesile olursunuz insallah. Bilgi ve alakanız için minnetarım. Saygılar, Teşekürler. Üstadım.

Konu Kyo tarafından (18 Aralık 2020 Saat 16:17 ) değiştirilmiştir.. Sebep: güncelleme
 
Alıntı Yap
Alt 18 Aralık 2020, 23:30   #13
Kyo
Kyo - ait Kullanıcı Resmi (Avatar)
Standart Merhaba
Alıntı:
Set Nickli Üyeden Alıntı Mesajı göster
O bot'ta

Kod

alias veri {
  tokenize 32 $1-
  if $regex($2,/privmsg/i) {
    var %nick $right($token($1,1,33),-1), %ident $token($token($1,1,64),2,33), %host $token($1,2,64), %chan $3
    tokenize 32 $right($4-,-1)
    echo -s Nick: %nick Kanal: %chan Mesaj: %mesaj
  }
}


on *:sockread:sockname: {
  var %x | %sockread %x 
  tokenize 32 %x
  veri $1-
}

Üsteki gibi bir eklendi deneyip verilerin nasıl geldigini görebilirsin, socket mantıgı ham veridir, sadece gelen verileri sekillendirmek kalıyor, sekillendirmektende kastım oradanda gelen verilere kosullar (if else gibi) yazılacak, bak bakalim devam'ını az kurcala yapamazsan 1 saat sonra gene dönüs yap, kodu istedigin sekil düzenlip paylasırım sana.
Üstad Zahmet olmazsa Kodu simdi uygun şekilde verir misin

 
Alıntı Yap
Alt 19 Aralık 2020, 01:37   #14
Set
Özel Üye
Set - ait Kullanıcı Resmi (Avatar)
Standart
Alıntı:
FuaT Nickli Üyeden Alıntı Mesajı göster
Üstad Zahmet olmazsa Kodu simdi uygun şekilde verir misin

Socket'in veri akışına caykahve $1- gibi ekleme yaparsın, deneme yapmadım ama çalışcaktır, genede sorun olursa belirtirsin konu altında

Kod

alias caykahve {
  if $regex($2,/privmsg/i) {
    var %nick $right($token($1,1,33),-1), %chan $3
    tokenize 32 $right($4-,-1)
    ;;;Altaki büyük harflerle SOCKNAME yerine bot'un socket ismi yazılacak

    ;var %komut sockwrite -nt SOCKNAME
    if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
      %komut privmsg %chan $+(4,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
      hadd -m ikram komut $regml(1)
      hadd -m ikram chan %chan
      hadd -m ikram nick %nick
      %komut names %chan
    }
  }
  if $regex($2,353) {
    if $hget(ikram,komut) {
      var %x 1
      while $token($right($6-,-1),%x,32) { 
        var  %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,8),32), %renkver $+(,$chr(3),%rnk)
        var %nick %renkver $remove($token($v1,1,33),.,~,@,&,%,+)
        set %nickler %nickler %nick
        inc %x
      }
    }
  }
  if $regex($2,366) {
    var %cay 4,0)4_4,0(>0,0_ , %kahve 5,0|5,0_5|>, %komut sockwrite -nt SOCKNAME
    if $regex($hget(ikram,komut),/[cçÇ]aylar/Si) {
      %komut privmsg $hget(ikram,chan) $+(4,$hget(ikram,nick)) 1Tüm kanala 4Çay 1ısmarladı. Buyurun  %nickler 4çaylarınız...
      %komut privmsg $hget(ikram,chan) $+($str($+(%cay,$chr(32)),$calc($token(%nickler,0,32) - 1)))
      %komut privmsg $hget(ikram,chan) 4Afiyet olsun.
      .hfree -sw ikram
      unset %nickler
    }
    if $regex($hget(ikram,komut),/kah[fv]eler/Si) {
      %komut privmsg $hget(ikram,chan) $+(4,$hget(ikram,nick)) 1Tüm kanala 5Kahve 1ısmarladı. Buyurun %nickler 4kahveleriniz...
      %komut privmsg $hget(ikram,chan) $+($str($+(%kahve,$chr(32)),$calc($token(%nickler,0,32) - 1)))
      %komut privmsg $hget(ikram,chan) 4Afiyet Bal Şeker olsun.
      .hfree -sw ikram
      unset %nickler

    }
  }
}

Konu Set tarafından (19 Aralık 2020 Saat 03:47 ) değiştirilmiştir..
 
Alıntı Yap
Alt 19 Aralık 2020, 01:38   #15
Kyo
Kyo - ait Kullanıcı Resmi (Avatar)
Standart Teşekürler ÜStadım
Alıntı:
Set Nickli Üyeden Alıntı Mesajı göster
Socket'in veri akışına caykahve $1- gibi ekleme yaparsın, deneme yapmadım ama çalışcaktır, genede sorun olursa belirtirsin konu altında

Kod

alias caykahve {
  if $regex($2,/privmsg/i) {
    var %nick $right($token($1,1,33),-1), %chan $3
    tokenize 32 $right($4-,-1)
    ;;;Altaki büyük harflerle SOCKNAME yerine bot'un socket ismi yazılacak

    ;var %komut sockwrite -nt SOCKNAME
    if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
      %komut privmsg %chan $+(4,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
      hadd -m ikram komut $regml(1)
      hadd -m ikram chan %chan
      hadd -m ikram nick %nick
      %komut names %chan
    }
  }
  if $regex($2,353) {
    if $hget(ikram,komut) {
      var %x 1
      while $token($right($6-,-1),%x,32) { 
        var  %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,8),32), %renkver $+(,$chr(3),%rnk)
        var %nick %renkver $remove($token($v1,1,33),.,~,@,&,%,+)
        set %nickler %nickler %nick
        inc %x
      }
    }
  }
  if $regex($2,366) {
    var %cay 4,0)4_4,0(>0,0_ , %kahve 5,0|5,0_5|>, %komut sockwrite -nt SOCKNAME
    if $regex($hget(ikram,komut),/[cçÇ]aylar/Si) {
      %komut privmsg $hget(ikram,chan) $+(4,$hget(ikram,nick)) 1Tüm kanala 4Çay 1ısmarladı. Buyurun  %nickler 4çaylarınız...
      %komut privmsg $hget(ikram,chan) $+($str($+(%cay,$chr(32)),$calc($token(%nickler,0,32) - 1)))
      %komut privmsg $hget(ikram,chan) 4Afiyet olsun.
      .hfree -sw ikram
      unset %nickler
    }
    if $regex($hget(ikram,komut),/kah[fv]eler/Si) {
      %komut privmsg $hget(ikram,chan) $+(4,$hget(ikram,nick)) 1Tüm kanala 5Kahve 1ısmarladı. Buyurun $+ %nickler 4kahveleriniz...
      %komut privmsg $hget(ikram,chan) $+($str($+(%kahve,$chr(32)),$calc($token(%nickler,0,32) - 1)))
      %komut privmsg $hget(ikram,chan) 4Afiyet Bal Şeker olsun.
      .hfree -sw ikram
      unset %nickler

    }
  }
}
Emeğine Sağlık Üstadım. Hayırlı Geceler Diliyorum. Teşekürler.

 
Alıntı Yap
Cevap Yaz
Sayfa 2 Toplam 2 Sayfadan 1 2

« Socket kodu hakkında yardım | txt den kanala okutma yarim »

Konuyu Toplam 2 Üye okuyor. (0 Kayıtlı üye ve 2 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 Kapalı
Refbacks are Kapalı




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

İçerik sağlayıcı paylaşım forumlarından biri olan ircrehberi.net sitemizde T.C.K 20.ci Madde ve 5651 Sayılı Kanun'un 4.cü maddesinin (2).ci fıkrasına göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur. ircrehberi.net hakkında yapılacak tüm hukuki şikayetlere ilişkin iletişim sayfasından Veya E-Mail ile irtibata geçilmesi halinde ilgili kanunlar ve yönetmelikler çerçevesinde en geç 15 (On beş) gün içinde tarafımızca gerekli aksiyon alınacak ve size dönüş yapılacaktır.
Chat Chat Sohbet Okey Oyna sohbet mobil sohbet Uğur Ücretsiz Sohbet odalari Sohbetci
IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi Arşiv Gizlilik Bildirimi Kullanım Koşulları İletişim
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Copyright ©2019 - 2023 | IRCRehberi