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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Add-on ve snippet(parça) kod istekleri buraya (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/523479-add-ve-snippetparca-kod-istekleri-buraya.html)

Toprak 06 Aralık 2015 11:17

Alıntı:

bluecr Nickli Üyeden Alıntı (Mesaj 1041705804)
Teşekkür Ederim TOPRAK bu başlığı buldum ama bu olduğunu bilemedim -) burada 5 kullanıcı sınırı ve sebebi değiştirme sansım varmıdır ? Sunucudan atılma sebebini

Kod:

menu * {
  .Agresif Giriş Koruması
  ..Açık:.enable #ags | .echo -a Agresif Giriş Koruması Açıldı.
  ..Kapalı:.disable #ags | .echo -a Agresif Giriş Koruması Kapatıldı.
}
alias _s return 3
alias _g return 5
alias _ban return Agresif giriş koruması.

#ags off
on *:snotice:*:{
  if $regex($1-,/(Kullanıcı ba[gqğĞ]landı|Client connecting)/Si) {
    .hadd $+(-msu,$_s) Ags $token($token($4-,2,64),1,41)
    if $hget(Ags,$token($token($4-,2,64),1,41)) >= $_g {
      gline $+(*@,$token($token($4-,2,64),1,41)) +1h $_ban
      .hdel -ms Ags $token($token($4-,2,64),1,41)
    }
  }
}
#ags end

Bu kısımlarda oynama yapabilirsin.

Kod:

alias _s return 3 (Saniye)
alias _g  return 5 (Giriş)
alias _ban return Agresif giriş koruması. (Ban Sebep'i)

Yani 3 saniyede 5 ve üzeri giriş olursa atılır.

mikropp 06 Aralık 2015 14:55

Mirc Bildirim Kutusu.
 
Merhaba Arkadaşlar Biliyorum Yanliş Actım. ama Nereye acıcagımı Bilemedım.

Arkadaşlar sizden bir Kod isticegim. Biri Bana seslendıgınde Bende Masa üstündeysem Bana Bildirim Gelmesini istiyorum. Örnek: Kutu Olabılır

Herkese Teşekkürler Ederim Kolay Gelsin

TİGeR 08 Aralık 2015 00:27

Cevap: Mirc Bildirim Kutusu.
 
mirc ayarlarından baloncuk'u aktifleştirirsen istediğin olur

ASiHeLL 09 Aralık 2015 16:29

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
bunlar bende çalışmıyor nasıl yapmam gerekli ?

alifb 10 Aralık 2015 23:24

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Merhabalar, bir kod arıyorum hocalarımın yardımını bekliyorum bu konu hakkında.Forumda arama yaptım ama tam anlamıyla istediğimi bulamadım. Aradığım kod !banac komutunu uyguladığımda bana atılan xline ile ilgili kimin attığı hakkında bilgi vermesi ve !ac !acma komutlarıyla atılan xline yönlendirmek istiyorum, yardımcı olursanız sevinirim.

c00 11 Aralık 2015 00:58

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Selam, sunucuya atılan global mesajlari @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde toplamak istiyorum .

KuL 11 Aralık 2015 12:34

Alıntı:

alifb Nickli Üyeden Alıntı (Mesaj 1041708252)
Merhabalar, bir kod arıyorum hocalarımın yardımını bekliyorum bu konu hakkında.Forumda arama yaptım ama tam anlamıyla istediğimi bulamadım. Aradığım kod !banac komutunu uyguladığımda bana atılan xline ile ilgili kimin attığı hakkında bilgi vermesi ve !ac !acma komutlarıyla atılan xline yönlendirmek istiyorum, yardımcı olursanız sevinirim.

Kim ne sebepden ban atmis olayin bakmak icin, her atilan bani kayit etmen gerekiyor.

Bunun icin XcLusive daha önce bir Kod yazmisti, o Kodun alt kismini diledigin sekilde degistirip bunu elde edebilirsin.

Oda böyle gözükür:

Kod:

alias xline.data return $shortfn($+($mircdir,xline.data))
on *:snotice:*:{
  if (*Z:line added* iswm $1-) {
    if ($2 == Global) { write xline.data $6 $+ $chr(183) $+ $15 $+ $chr(183) $+ $left($25-,-1) $+ $chr(183) $+ $date $time }
    else { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time }
  }
  if (*K:Line added for* iswm $1-) { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time }
  if (*G:Line added for* iswm $1-) { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time }
  if (*Permanent Global Z:line* iswm $1-) { write xline.data $7 $+ $chr(183) $+ $remove($16,:) $+ $chr(183) $+ $left($17,-1) $date $time }
  if (*Permanent Z:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time }
  if (*Permanent G:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time }
  if (*Permanent K:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time }
  if (*removed Global Z:line* iswm $1-) { if ($read($xline.data,w,$+(*,$5,*))) { write $+(-dl,$readn) $xline.data  } }
  if (*removed K:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) {  write $+(-dl,$readn) $xline.data  } }
  if (*removed Z:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data  } }
  if (*removed G:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring Global Z:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($5,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring K:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring G:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
  if *Expiring Z:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data  } }
}
on *:input:#KANAL:{
  if $1 == !banac && $2 {
    if $read($xline.data,w,$+(*,$2,*)) { var %xline.data $read($xline.data,$readn) | set -u30 %banliip $2 }
    if (!%xline.data) { msg # $qt($2) ipi icin herhangi bir Kayit bulunamadi! | halt }
    else {
      msg # $qt($2) Hakkinda Ban Raporu:
      msg # -
      msg # IP Adresi: $gettok(%xline.data,1,183)
      msg # Banlayan: $gettok(%xline.data,2,183)
      msg # Sebep ve Tarih: $gettok(%xline.data,3,183) $gettok(%xline.data,4,183)
      msg # -
      msg # Bani acmak istiyorsaniz !ac yazmaniz yeterli.
    }
  }
  if $1 == !ac {
    .gline $+(-*@,%banliip)
    .gzline $+(-*@,%banliip)
    .zline $+(-*@,%banliip)
    .kline $+(-*@,%banliip)
    .shun $+(-*@,%banliip)
    msg # %banliip üzerinde bütün Banlar kaldirilmistir.
  }
}

!ac Komutunu anladimda, !acma ne icin gerekli onu anlamadim.

Calisma sekli söyle, Üstde kalin sekilde yazan Kanal yerine calismasini istedigin kanali yaziyorsun.

Sonra o Kanala !banac IP diyorsun.

Ban varsa sana raporu gösteriyor, yoksada bir sonuc bulunamadi yaziyor.

Rapor cikiyorsa eger verilen IP Adresi 30 Saniyeligine hafizaya aliniyor. Ve sen kanala !ac dediginde o IP üzerindeki Banlari aciyor.

30 saniye sonra gectikden sonra !ac dersen islem yapmaz.

Banin acilmasini istemiyorsan, hic birsey yapman gerekmiyor


--

Sahsi fikrim böyle birseyi yapicaksan, kanalda hep duran bir botun icine eklemeni tavsiye ederim. Yoksa sen online oldugun sürece kayit tutar. Sen ciktikdan sonra atilmis olan banlari kayit edemez.

Bu yüzden INPUT Eventini TEXT olarak degistirip, basit bir botun icine ekleyip tüm banlari kontrol edebilirsin.

######################################

Alıntı:

c00 Nickli Üyeden Alıntı (Mesaj 1041708284)
Selam, sunucuya atılan global mesajlari @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde toplamak istiyorum .

Global mesaj notice olarak algilaniyordu sanirim.

Bu sekilde deniyebilirsin.

Kod:

on *:NOTICE:*:*:{
  if ($nick == Global) {
    window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
    aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1-
    halt
  }
}

Global Mesaj gelince, hangi Nickden geliyor sana bilmiyorum. Genelde GLOBAL MESAJ seklinde geldigi icin üstde $nick Kismina Global yazdim.

Eger baska Nickde geliyorsa orayi degisebilirsin.

Derta 13 Aralık 2015 11:31

Cevap: nick değiştirme,bad nick değişme
 
ben soyle bir kod ariyorum badnick sunuya girdinde otomatik nick degissin boyle bir addon yapma sansiniz varmi wepden girenlerde girebilsin kill olani var ancak o kil atiyor geri almiyor kanala nicki degismiyorda bole bir addon yapabilirseniz sevinirim.

IRC-Dancer 13 Aralık 2015 13:28

Cevap: nick değiştirme,bad nick değişme
 
Alıntı:

Derta Nickli Üyeden Alıntı (Mesaj 1041709131)
ben soyle bir kod ariyorum badnick sunuya girdinde otomatik nick degissin boyle bir addon yapma sansiniz varmi wepden girenlerde girebilsin kill olani var ancak o kil atiyor geri almiyor kanala nicki degismiyorda bole bir addon yapabilirseniz sevinirim.

Kod:

on *:snotice:*client connect*:var %1 = 1 | while ($read(bad.txt,%1)) { if ($regex($9,/ $+ $v1 $+ /i)) { inc %* 1 | os raw svsnick $9 $+(user,%*,$r(0,999)) 0:0 | break } | inc %1 }
Badnick'leri bi txt kaydedin ; Örnek : bad.txt gibi.

Feragat 13 Aralık 2015 14:18

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Şöyle de yapabilirsin

Eğer sunucuya girişte karantina vb. bir kanal varsa

ALT + R (Remote) bölümüne eklemen gereken kod.
Kod:

on x:join:#karantina:os raw svsnick $nick Nick $+ $r(111,9999) :0
x leveline nick ekleyebilirsin, wildcard kullanabilirsin.

Bad Nick Ekleme:
Kod:

/auser x Feragat!*@*
/auser x *evli*!*@*
/auser x deneme*!*@*

Bad Nick Silme:
Kod:

/ruser x Feragat!*@*
/ruser x Nick!*@*

auser komutunu kullanırken kalıp, Nick!Ident@IP kalıbı ile eklenir.

Örnek:
Feragat!*@* Nick Feragat olsun, ident herhangi birşey olabilir, IP herhangi birşey olabilir.

Feragat!mIRC@*
Nick Feragat olsun, Ident mIRC olsun, IP önemsiz.

Senin işine neresi yararsa onu kullan. Sadece Nick ekle yani.

Bu seni nelerden kurtarır ?
1- Döngüden
2- Dosya okuma ve yazma işleminden.


auser
komutuyla eklediğin nickler mIRC içinde Script Editörünün Users (Kullanıcılar) sekmesindedir. Oradan da manuel ekleme silme düzenleme yapabilirsin.

Örnek Görüntü:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


Ayrıntılı Bilgi ve Örnekler için Link:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


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

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