Add-on ve snippet(parça) kod istekleri buraya - Sayfa 53 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Mylife · 05 Kasım 2016, 13:44

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

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

on *:text:$($+(*,$me,*)):#: {
  hinc -mu10 _sz $nick 1
  $iif(!$fopen(_sz),.fopen _sz Kurallar.txt)
  $iif($feof,.fseek -l _sz 1)
if ($hget(_sz,$nick) < 2) msg $nick $fread(_sz) }

S.a Muaf Nickler icin Txt Eklemek istiyorum bu cod a txt de nicklere gondermiyecek Yardimci olursaniz sevinirim . Tesekkur ederim simdiden

Aleyküm selam.

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

on 1*:input:#: {
  if $regex($1,/^[.!]mekle$/Si) {
    if (!$2) { msg # Nick belirtin. | return }
    else if $read(muaf.txt,w,$2) { msg # $2 zaten muaf listesinde var. }
    else {
      write muaf.txt $2
      msg # $2 muaf listesine eklendi.
    }
  }
  if $regex($1,/^[.!]msil$/Si) {
    if (!$2) { msg # nick belirtin. | return }
    else if !$read(muaf.txt,w,$2) { msg # Tanıma uygun nick bulunamadı }
    else {
      write $+(-dl,$2) muaf.txt
      msg # $2 muaf listenizden silindi.
    }
  }
}
Bot da kullanmak istiyorsan input event'ini text eventi yapmalısın.

.mekle nick
.msil nick

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

if $read(muaf.txt,w,$+(*,$nick,*)) { return }

muaf.txt içinde $nick varsa başa dön/Kodu tekrarla

Rakun · 11 Kasım 2016, 04:52

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

!bilgiekle ahmet mehmetle tartısıyor yazısı kanala yansımasın demıssın yanlıs anlamadıysam,
Bu sebeble botun özelinden bu tarz durumları yazmak daha uygun geldi bana,
En azından şikayet ve heber verme olayını iletiyi yazan ve okuyandan baskası göremez..

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

on *:text:*:?: {
  if ($regex($1,/^[!.]b[iı]lg[iı]ekle$/Si)) {
    if (!$2) { msg $nick hatalı kullanım mesaj giriniz, kullanım; !bilgiekle mesajınız. | return }
    if ($nick ison #kanalismi) { .write memolist.txt $nick Mesajı: $2-
      ms send seninnickin Notunuz var: $nick Mesajı: $2-
      ms send birbaskanick Notunuz var: $nick Mesajı: $2- | .msg $nick - $nick Notunuz Gönderilmistir.. 
    }
    else { .msg $nick #kanalismi kanalında olmadığınız için komut kullanamıyorsunuz. }
  }
  if ($regex($1,/^[!.]b[iı]lg[iı]l[iı]st$/Si)) {
    if !$istok(seninnickinburaya,$nick,32) { .msg $nick Bu komutu kullanmaya yetkili degilsiniz | return }
    if ($nick ison #kanalismi) { mlistesi } 
    else { .msg $nick #kanalismi kanalında olmadığınız için komut kullanamıyorsunuz. }
  }
  if ($regex($1,/^[!.]b[iı]lg[iı]s[iı]l$/Si)) {
    if !$istok(seninnickinburaya,$nick,32) { .msg $nick Bu komutu kullanmaya yetkili degilsiniz | return }
    if ($nick ison #kanalismi) { .msg $nick - $nick memo mesaj listesi Silindi.. | .remove memolist.txt } 
    else { .msg $nick #kanalismi kanalında olmadığınız için komut kullanamıyorsunuz. }
  }
}
alias mlistesi { var %:aLn = 1,%:aLns = $lines(memolist.txt) | while %:aLn <= %:aLns {  .msg $nick  $read(memolist.txt,%:aLn) | inc %:aLn } }

!Bilgiekle mesajınız...
!Bilgilist
!Bilgisil
Botun özeline yazcaksınız komutları..
kırmızı ile belirttigim yerlerinick/kanaldüzenlersiniz.
deneme vaktim olmadı bir hata olursa bildir düzeltiriz.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ; biraz geç döndüm cevap olarak kusura bakma. Şehir dışındaydım, anca deneme fırsatım oldu. Çok teşekkür ederim, gayet sorunsuz ve tam istediğim gibi çalışmakta. Ellerine ve emeğine sağlık.

Yarın sakin kafa ile bot'a yeni bir kod eklemeyi düşünüyorum. O'nun içinde tekrardan senden yardım isteyebilir miyim ?

Yeni bir özellik daha katma düşüncem var.

Şimdiden tekrar teşekkür ederim. Emeğine sağlık.

Tapatalk kullanarak iPhone aracılığıyla gönderildi

aLone · 11 Kasım 2016, 13:45

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Uygun bölümde talebini belirtirsen, Bölümdeki Ms severler Buyuk bir keyfle yardım ederler.

Rakun · 11 Kasım 2016, 18:31

Merhaba Arkadaşlar;

Bir kod için yardımınıza ihtiyacım var. İlgilenecek ve yardım edicek olan tüm dostlara şimdiden teşekkür ederim.

Elinde bulunan kod ;

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

on *:rawmode:#xxx,#xxx1,#xxx2:{  
  if ($1 == +m) { msg #takip  4 $nick 1 # Kanalını 12 Sohbete Kapattı. 13(Mode; +m)  }
  if ($1 == -m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Açtı. 13(Mode; -m) }

Yukarıda vermiş olduğum kod, kullanmakta olduğum takip botunun içerisinde bulunan bir koddur.

İsteğim ;

Az evel yukarıda vermiş olduğum koda binayen,misal aaa operatörü kanalı sohbete açtığında #takip kanalında { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Açtı. 13(Mode; -m) }
bu koddan sonra, uyarı olarak : Lütfen Kanalı sohbete açmadan önce, tüm kanallar da badnick kontrolü yapınız gibi bir uyarı vermesini istiyorum.

Bir kez daha yardım ve desteğiniz için,teşekkür ederim.
İyi forumlar.

aLone · 11 Kasım 2016, 19:45

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

on *:mode:#xxx,#xxx1,#xxx2:{  
  if ($1 == +m) { msg #takip  4 $nick 1 # Kanalını 12 Sohbete Kapattı. 13(Mode; +m)  }
  if ($1 == -m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Açtı.  13(Mode; -m) | msg # uyarı $nick kanallarda badnick taraması yapmadan  kanalı sohbete acmayınız.. }

gibi yapabılırsın

Rakun · 11 Kasım 2016, 20:28

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

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

on *:mode:#xxx,#xxx1,#xxx2:{  
  if ($1 == +m) { msg #takip  4 $nick 1 # Kanalını 12 Sohbete Kapattı. 13(Mode; +m)  }
  if ($1 == -m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Açtı.  13(Mode; -m) | msg # uyarı $nick kanallarda badnick taraması yapmadan  kanalı sohbete acmayınız.. }

gibi yapabılırsın

aLone aslında tam olarak istediğim ;

Misal xxx op kanalı sohbete açtığında, bot o nickin özeline : kanallarda badnick taraması yapmadan kanalı sohbete acmayınız.. gibi yazıcak yapılabilir mi ?

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:28 -->-> Daha önceki mesaj 18:06 --

@aLone desteğin için çok teşekkür ederim. 25 mesaj sayısına ulaşmadığım için,özel mesajını yanıtlayamadım.
Ben sana ilgili kodun tamamını paylaşayım istediğim şekli de kırmızı renk ile belirteyim istersen.

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

if ($1 == +m) { msg #takip  4 $nick 1 # Kanalını 12 Sohbete Kapattı. 13(Mode; +m) }
  if ($1 == -m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Açtı.  13(Mode; -m)  }
  if ($1 == -i) { msg #takip 4 $nick 12 # 1Kanalını 12 Davetsel Moddan Çıkardı.13 (Mode; -i) 1Lütfen KontroL Edin. }
  if ($1 == +i) { msg #takip 4 $nick 12 # 1Kanalını 4 Davetsel Moda Aldı.13 (Mode; +i) 1Lütfen KontroL Edin.  }
  if ($1 == +v) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickine 4"VOICE" 1verdi... 1Lütfen KontroL Edin.  }
  if ($1 == -v) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickinin  4VOICESİNİ 1aldı... 1Lütfen KontroL Edin.  }
  if ($1 == +o) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickini 4"OP"1 Yaptı.  }
  if ($1 == -o) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickini 4"DEOP"1 Yaptı.  }
  if ($1 == +h) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickini 4"HALFOP"1 Yaptı.  }
  if ($1 == -h) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickini 4"DEHALFOP"1 Yaptı.  }
  if ($1 == +a) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickini 4"Korumaya"1 Aldı.  }
  if ($1 == -a) { msg #takip 4 $nick 12 # 1Kanalında 4" $2- "1 nickini 4"Korumadan"1 Çıkardı. 

takip botunda ki modeler bu şekilde. 

mesela xxx op'u #aaa kanalını açtığında yani;
 if ($1 == -m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Açtı.  13(Mode; -m)  }

bunda Lütfen tüm kanallar da badnick kontrolü yapmadan,kanalları sohbete açmayınız diye uyarı versin özelden

misal xxx op'u #bbb kanalını sohbete kapadığında ise, yani ;
if ($1 == +m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Kapattı. 13(Mode; +m) }
bunda da Lütfen Kanalları devredebileceğiniz görevli arkadaşlarınızın olup,olmadığını kontrol edip ondan sonra sohbete kapatınız..

gibi uyarı versin istiyorum.

Diğer modlar için ise biraz önce senin paylaştığın şekilde olursa sevinirim..

Çok teşekkür ederim şimdiden... ellerine,emeğine sağlık

Mylife · 11 Kasım 2016, 21:16

Alıntı:

if ($1 == +m) { msg #takip 4 $nick 1 # Kanalını 12 Sohbete Kapattı. 13(Mode; +m) }

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

if ($1 == +m) { msg #takip $nick # kanalını sohbete kapattı | privmsg $nick mesajın }

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

işlem | işlem | işlem | işlem | işlem

bu şekilde yapılıcak işlemleri arttırabilirsiniz
veya;

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

if ($1 == +m) {
işlem
işlem
işlem
işlem
}

alt alt a yine işlemleri yaptırabilirsiniz @Rakun

Alıntı:

bunda Lütfen tüm kanallar da badnick kontrolü yapmadan,kanalları sohbete açmayınız diye uyarı versin özelden

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

if ($1 == -m) { privmsg $nick badnick kontrolu yapılmadan lütfen kanalı sohbete açmayınız. }

burada

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

privmsg $chan mesaj

şu kanala bu mesajı gönder $chan burada işlem yapılan kanal a denk gelir

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

privmsg #geveze mesaj

#geveze kanalına mesaj yazan kısımdaki mesajı gönderir

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

privmsg #Geveze selam naber | privmsg $nick selam naber deneme

sorgu tutarsa #geveze kanalına selam naber yazar ve mode de işlem yapan kişi yani $nick e mesaj gönderir. işlem | işlem | işlem birden fazla işlem yaptırmak için sorgu eşleşirse uygular.

Rakun · 11 Kasım 2016, 21:34

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] teşekkür ederim, tam istediğim gibi oldu. Fakat küçük bir sorun var, Botta karşılama mesajı olduğu için istediğim mesaj,karşılama mesajlarının arasına karışıyor. Mesajı zamanlı yollama gibi ya da farklı bir başka yöntem var mıdır ?

Mylife · 11 Kasım 2016, 21:42

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

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] teşekkür ederim, tam istediğim gibi oldu. Fakat küçük bir sorun var, Botta karşılama mesajı olduğu için istediğim mesaj,karşılama mesajlarının arasına karışıyor. Mesajı zamanlı yollama gibi ya da farklı bir başka yöntem var mıdır ?

Tabiki zamanlayıcı lar dan faydalanarak bunu yapabiliriz bunun için timer i kullanmalısınız.

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

timer 1 15 işlem | timer 1 20 işlem | timer 1 25 işlem

koşullar tutarsa 1 defa 15 saniyede şu işlemi uygula sonra 2. işlemi uygula daha sonra 3. işlemi uygula gibi

Rakun · 11 Kasım 2016, 22:09

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

Tabiki zamanlayıcı lar dan faydalanarak bunu yapabiliriz bunun için timer i kullanmalısınız.

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

timer 1 15 işlem | timer 1 20 işlem | timer 1 25 işlem

koşullar tutarsa 1 defa 15 saniyede şu işlemi uygula sonra 2. işlemi uygula daha sonra 3. işlemi uygula gibi

if ($1 == -m) { timer 1 5 privmsg $nick badnick kontrolu yapılmadan lütfen kanalı sohbete açmayınız. }

gibi mi @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ?

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.