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/)
-   -   Çözüldü Otamatik GLine (https://www.ircforumlari.net/mirc-scripting-sorunlari/236063-otamatik-gline.html)

Ebul_Alemeyn 19 Temmuz 2009 00:07

Otamatik GLine
 
S.a ArkadaşLar Mirc üzeRinden Otomatik GLine v£ ZLine , Atacağım ßir Kod Ama Su sekiLde AtaRken Hep aynı Msj`I yazıcak mesELa .. 0,2Sunucu Üzerinde Kurallara Uymadığınız İçin Uzaklastırıldınız. 0,4Afiyet Şeker oLsun ;) ßunun gißi ?

Pisadam 08 Ağustos 2009 22:05

Cevap: Otamatik GLine
 
Kod:


menu @ConnExit {
  dclick: {
    %satir = $line(@ConnExit, $1)
    %glineho = $pos(%satir,@,1) + 1
    %hede = $pos(%satir,[,1) - 2
    %bukadar = %hede - %glineho
    %glinehoo = $mid(%satir, %glineho, %bukadar)
    aline -c4 @ConnExit G-Line %glinehoo
    dline @ConnExit $1
    gline *@ $+ %glinehoo +90d : Spam Trojan Nedeniyle Banlandınız. [OnLine]
    unset %satir
    unset %hede
    unset %bukadar
    unset %glineho*
  }
}
On ^1:SNOTICE:*connecting*: {
  if (%meydeymeydey == 1) {
    if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
    aline -c7 @ConnExit $4-
    if ($len($9) >= 9) {
      %a = $left($9,4)
      %i = 0
      %bukadar = 0
      while (%i < 4) {
        inc %i
        %b = $mid(%a, %i,1)
        if (%b isin qwrtypsdfghjklzxcvbnm) {
          inc %bukadar
        }
      }
      if (%bukadar == 4) {
        %glineho = $pos($10,@,1) + 1
        %glinehos = $mid($10, %glineho, $len($10) - 1)
        %uzun = $len(%glinehos) - 1
        %glinehost = $left(%glinehos, %uzun)
        aline -c4 @ConnExit G-line $9 %glinehost
        gline *@ $+ %glinehost +365d : Spam Trojan Nedeniyle Banlandınız. [OnLine]
        unset %glineho
        unset %glinehos
        unset %uzun
        unset %glinehost
        inc %glinecount
      }
      unset %bukadar
    }
  }
  haltdef
}
On ^1:SNOTICE:*exiting*: {
  if (%meydeymeydey == 1) {
    if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
    aline -c12 @ConnExit $4-
    haltdef
  }
}

Bunu ALT+R yapıp Remoteye ekliyorsun.

Kod:

spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline sayısı: %klinecount
unset %klinecount
window -c @ConnExit
}
}

Bunuda aliases kısmına ekliyorsun.

/spam yazınca kod çalışıyor. Farklı bir pencere açarak giren ve çıkan ipleri gösteriyor.Mause ile tıklayıp ipe gline atabiliyosunuz.Sunucudan çıkmış bile olsa.

Umarım işine yarayacaktır.

High 05 Mayıs 2022 19:41

Cevap: Otamatik GLine
 
Pencere açılmıyor herhangi bir işlem yapmıyor. Sorun nerde? bilgisi olan var mı?

Subzero 06 Mayıs 2022 00:42

Cevap: Otamatik GLine
 
Alıntı:

High Nickli Üyeden Alıntı (Mesaj 1042673006)
Pencere açılmıyor herhangi bir işlem yapmıyor. Sorun nerde? bilgisi olan var mı?

sana oto zline ile alakalı bişey lazımsa eğer öncelikle scriptine zline.txt şeklinde bir text dosyası aç ve içine manuel olarak zline atmak istediğin nickleri alt alta ekle sonra kodu ekle scriptine.
Kod:

on *:join:#kanal:{ if $read(zline.txt,w,$nick) { gzline $nick -- Girişiniz Yasaklanmıstır } }

High 06 Mayıs 2022 02:13

Cevap: Otamatik GLine
 
Subzero, eyvallah hocam. Sorunu halletim sağ ol yinede alakan için

delikalpsiz 10 Haziran 2023 02:22

Cevap: Otamatik GLine
 
bu kodu pencereye yansıtmak istemiyorum direk sohbette önüme düşsün notice olarak bunun için ne yapabilir

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 02:22 -->-> Daha önceki mesaj 02:19 --

Alıntı:

Pisadam Nickli Üyeden Alıntı (Mesaj 777525)
Kod:


menu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit {
  dclick: {
    %satir = $line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit, $1)
    %glineho = $pos(%satir,@,1) + 1
    %hede = $pos(%satir,[,1) - 2
    %bukadar = %hede - %glineho
    %glinehoo = $mid(%satir, %glineho, %bukadar)
    aline -c4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit G-Line %glinehoo
    dline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit $1
    gline *@ $+ %glinehoo +90d : Spam Trojan Nedeniyle Banlandınız. [OnLine]
    unset %satir
    unset %hede
    unset %bukadar
    unset %glineho*
  }
}
On ^1:SNOTICE:*connecting*: {
  if (%meydeymeydey == 1) {
    if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit, wid) == 0) { window -dChk[0]l +ftl @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit }
    aline -c7 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit $4-
    if ($len($9) >= 9) {
      %a = $left($9,4)
      %i = 0
      %bukadar = 0
      while (%i < 4) {
        inc %i
        %b = $mid(%a, %i,1)
        if (%b isin qwrtypsdfghjklzxcvbnm) {
          inc %bukadar
        }
      }
      if (%bukadar == 4) {
        %glineho = $pos($10,@,1) + 1
        %glinehos = $mid($10, %glineho, $len($10) - 1)
        %uzun = $len(%glinehos) - 1
        %glinehost = $left(%glinehos, %uzun)
        aline -c4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit G-line $9 %glinehost
        gline *@ $+ %glinehost +365d : Spam Trojan Nedeniyle Banlandınız. [OnLine]
        unset %glineho
        unset %glinehos
        unset %uzun
        unset %glinehost
        inc %glinecount
      }
      unset %bukadar
    }
  }
  haltdef
}
On ^1:SNOTICE:*exiting*: {
  if (%meydeymeydey == 1) {
    if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit, wid) == 0) { window -dChk[0]l +ftl @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit }
    aline -c12 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit $4-
    haltdef
  }
}

Bunu ALT+R yapıp Remoteye ekliyorsun.

Kod:

spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline sayısı: %klinecount
unset %klinecount
window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Exit
}
}

Bunuda aliases kısmına ekliyorsun.

/spam yazınca kod çalışıyor. Farklı bir pencere açarak giren ve çıkan ipleri gösteriyor.Mause ile tıklayıp ipe gline atabiliyosunuz.Sunucudan çıkmış bile olsa.

Umarım işine yarayacaktır.








bu kodu pencereye yansıtmak istemiyorum direk sohbette önüme düşsün notice olarak bunun için ne yapabilir


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

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