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)

Aytac 23 Ocak 2018 00:40

mIRC Geoip - ULKE Bulma eklentisi
 
mIRC Geoip - ULKE Bulma eklenti dosyasi.

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

c00 23 Ocak 2018 02:51

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
spamfilter listesini görme ve silme kodu arıyorum resimdeki gibi.Tüm spamlari listele - Kendi aldıgım spamlari listele - Baskasının aldıgı spamlari listele şeklinde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]filter alanında görmek istiyorum hate scriptte görmüştüm bunu yardımcı olcak var mı.

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

Fredyyy 23 Ocak 2018 19:09

Cevap: mIRC Geoip - ULKE Bulma eklentisi
 
Alıntı:

Aytac Nickli Üyeden Alıntı (Mesaj 1041900235)
mIRC Geoip - ULKE Bulma eklenti dosyasi.

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

Çok teşekkür ederim, dosyayı alias kısmına ekledim ama bir sonuç alamadım. Whois çektiğimde ip sonucu gözükmüyor. Kodu eklerken bir eksiklik mi yaptım ?

Alias olarak kullanimi: //echo -ea $geoip(IP).ulke bu kısımı nereye eklemem gerekiyor, sizleri rahatsızlık verdim. Teşekkürler.

Alper 23 Ocak 2018 19:56

Cevap: mIRC Geoip - ULKE Bulma eklentisi
 
Alıntı:

Fredyyy Nickli Üyeden Alıntı (Mesaj 1041900547)
Çok teşekkür ederim, dosyayı alias kısmına ekledim ama bir sonuç alamadım. Whois çektiğimde ip sonucu gözükmüyor. Kodu eklerken bir eksiklik mi yaptım ?

Alias olarak kullanimi: //echo -ea $geoip(IP).ulke bu kısımı nereye eklemem gerekiyor, sizleri rahatsızlık verdim. Teşekkürler.

Kod:

raw 378:*:{
  haltdef
  echo -a  Bağlantı Kurduğu Host/IP: $6-
  echo -a  Bağlantı Kurduğu Ülke: $iif($token($geoip($7).ulke,2,45) != $null,$token($geoip($7).ulke,2,45),Gösterilemiyor)
}

Whois raw kodları kullanıyor musun bilmiyorum ama bendeki bu şekilde seninkine göre değişip kullanabilirsin

Alıntı:

Bağlantı Kurduğu Host/IP: *@78.16x.xx.xx 78.16x.xx.xx
Bağlantı Kurduğu Ülke: Turkey

MaviSakaL 02 Şubat 2018 03:36

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Merhaba, Absolut'un yazmış olduğu kelime tamamlama kodunu kullanıyorum. Cümlenin ilk harfini büyük yazan kod eklediğimde haliyle çakışıp çift yazıyor. Forumda bir çok kod var fakat o kadar bilgim olmadığı için ayarlayamadım. Aşağıdaki koda istediğim kodu ekleyen olursa sevinirim. Artı olarak nasıl ekleneceğinide tarif ederse ilerde renkli yazma vb. ekleme yapılmak istendiğinde hepimize yardımcı olur.

Kelime tamamlama kodu aşağıdadır.

Kod:

on *:input:*: {
  if (/* !iswm $1-) {
    var %i 1,%q $1-
    while %i <= $lines(kelimeler.txt) {
      %q = $replace(%q,$gettok($read(kelimeler.txt,%i),1,$asc(=)),$gettok($read(kelimeler.txt,%i),2,$asc(=)))
      inc %i
    }
    say %q
    halt
  }
}


Alper 02 Şubat 2018 16:45

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:

MaviSakaL Nickli Üyeden Alıntı (Mesaj 1041904676)
Merhaba, Absolut'un yazmış olduğu kelime tamamlama kodunu kullanıyorum. Cümlenin ilk harfini büyük yazan kod eklediğimde haliyle çakışıp çift yazıyor. Forumda bir çok kod var fakat o kadar bilgim olmadığı için ayarlayamadım. Aşağıdaki koda istediğim kodu ekleyen olursa sevinirim. Artı olarak nasıl ekleneceğinide tarif ederse ilerde renkli yazma vb. ekleme yapılmak istendiğinde hepimize yardımcı olur.

Kelime tamamlama kodu aşağıdadır.

Kod:

on *:input:*: {
  if (/* !iswm $1-) {
    var %i 1,%q $1-
    while %i <= $lines(kelimeler.txt) {
      %q = $replace(%q,$gettok($read(kelimeler.txt,%i),1,$asc(=)),$gettok($read(kelimeler.txt,%i),2,$asc(=)))
      inc %i
    }
    say %q
    halt
  }
}


Kod:

on *:input:*: {
  if (/* !iswm $1-) {
    var %i 1, %q $1-
    while %i <= $lines(kelimeler.txt) {
      %q = $replace(%q,$gettok($read(kelimeler.txt,%i),1,$asc(=)),$+($chr(3),2,$upper($mid($gettok($read(kelimeler.txt,%i),2,$asc(=)),1,1)),$right($gettok($read(kelimeler.txt,%i),2,$asc(=)),-1)))
      inc %i
    }
    say %q
    halt
  }
}

Kırmızı renk olan yer rengi temsil eder ordaki 2 renk karakter kodu olan laciverti temsil eder. Mesela bende kelime.txt de ekli olan kelimeler.

s.a=selamun aleyküm
a.s=aleyküm selam

Sonuç:
[ 16:44:05 ] <Alp> 2Selamun aleyküm
[ 16:44:09 ] <Alp> 2Aleyküm selam

eklediğin ifadelerin ilk harfini büyük yazacak şekilde ayarladım.

GQKHAN 03 Mart 2018 23:26

TROJANSIZ BİR MİRC ARIYORUM BU MEVCUT MU
 
TROJANSIZ BİR MİRC ARIYORUM BU MEVCUT MU HEPSININ ICINE TROJAN GÖMÜLMÜŞ

VE SİTEDE KAYITLIYIM R_Pires adım olması lazım Davil miydi kullanıcı adım mail adresimi göremiyorum

Bilecikli 18 Mart 2018 16:52

Cevap: YetkiLi BuLundugum Tum KanaLLardan Ban
 
Selamlar. Konuyu hortlatmak istemezdim ama, başka benzer konuya denk gelmedim. Bu kodu şöyle yapabilirmiyiz: /ban ~T:Block:*kelime* gibi işleyişlerde ayarlayabilirmiyiz. Yani ben /ban diyip sonuna hangi şekli uygularsam onu atabilecek bütün kanallarda?

By eRhaN 19 Mart 2018 19:15

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:

on *:text:*:#: {
if $regex($1,/([.!]bomba)/Si) {
if %bombaci_nick {
msg $chan $chr(3) $+ 4 $+ Bomba Şuanda Aktif Durumda.
return
}
set %bomba_renkler altin gri mavi siyah yesil kirmizi
set %bomba_renk $token(%bomba_renkler,$rand(1,6),32)
if $istok($me $nick,$2,32) {
msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
return
}
if !$2 {
msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
return
}
if $2 !ison $chan {
msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
}
elseif $2 ison $chan {
msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul.
msg $chan $chr(3) $+ 5 $+ Bomba Aktif. Son $+ $chr(3) $+ 4 30 $chr(3) $+ 5 $+ Saniye. $chr(3) $+ 4 $+ Zaman İşLiyor... Tik Tak Tik Tak...
msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41)
msg $chan -
msg $chan $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
.set %dinchan $chan
.timerbomba 1 30 patlat
set %bomba_nick $2
set %bombaci_nick $nick
set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
}
}
if $regex($1,/([.!]at)/Si) {
if ($nick == %bomba_nick) {
if $istok($me $nick,$2,32) {
msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
return
}
if !$2 {
msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
return
}
if $2 !ison $chan {
msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
}
elseif $2 ison $chan {
if ($2 isin %bombaci_nick) {
msg $chan $chr(2) $+ $2 $+ $chr(2) $chr(3) $+ 4 $+ Daha Önce Bombadan Kurtulmuş. Başkasına Doğru At $chr(2) $+ $nick $+ $chr(2)
return
}
msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul.
msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41)
msg $chan -
msg $chan $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
set %bomba_nick $2
set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
}
}
else {
msg $chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil.
}
}
if $regex($1,/([.!]kes)/Si) {
if ($nick == %bomba_nick) {
if ($2 == %bomba_renk) {
.timerbomba off
msg $chan -
msg $chan $chr(3) $+ 5 $+ Kanalın Kahramanı $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . $chr(3) $+ 5 $+ Kendini Bombadan Kurtardı. Tebrikler, $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . :)
msg $chan -
unset %bomba_*
unset %bombaci_*
unset %dinchan
}
elseif $istok($remtok(%bomba_renkler,%bomba_renk,32),$2,3 2) {
msg $chan $chr(2) $+ $nick $+ $chr(2) $+ . $chr(3) $+ 4 $+ Yanlış Renk!
msg $chan $chr(3) $+ 5 $+ Bombanın PatLamasına Saniyeler Kaldı.!
}
}
else {
msg $chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil.
}
}
}
alias -l patlat {
.kick %dinchan %bomba_nick Seni Uyardım, Bomba Elinde PatLadı. $chr(2) $+ BOOOOM!
.unset %bomba_*
.unset %bombaci_*
.unset %dinchan
}
Buna !sıfırla Gıbı Bırsey yapılabılırmı . Kullanıcı sunucudan cıktıgı zaman !bomba yazdıgımızda Bomba suan aktıf dıyor Ne kesılıyor ne baska bırsey yapılıyor !sıfırla yazdıgımızda Oyunu tekrar baslatsa !bomba yazarak devam etsek Kanaldakı Op Sop tarafından kullanılabılen Mumkundur Sımdıden tesekkurler yardımınız ıcın .

Alper 19 Mart 2018 20:45

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:

By eRhaN Nickli Üyeden Alıntı (Mesaj 1041924651)
Buna !sıfırla Gıbı Bırsey yapılabılırmı . Kullanıcı sunucudan cıktıgı zaman !bomba yazdıgımızda Bomba suan aktıf dıyor Ne kesılıyor ne baska bırsey yapılıyor !sıfırla yazdıgımızda Oyunu tekrar baslatsa !bomba yazarak devam etsek Kanaldakı Op Sop tarafından kullanılabılen Mumkundur Sımdıden tesekkurler yardımınız ıcın .


Kod:

on *:text:*:#: {
  if ($nick isop $chan) {
    if ($1 == !sıfırla) { .unset %bomba* | .msg $chan Bomba Oyunu Sıfırlanmıştır...  }
  }

  if $regex($1,/([.!]bomba)/Si) {
    if %bombaci_nick {
      msg $chan $chr(3) $+ 4 $+ Bomba Şuanda Aktif Durumda.
      return
    }
    set %bomba_renkler altin gri mavi siyah yesil kirmizi
    set %bomba_renk $token(%bomba_renkler,$rand(1,6),32)
    if $istok($me $nick,$2,32) {
      msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
      return
    }
    if !$2 {
      msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
      return
    }
    if $2 !ison $chan {
      msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
    }
    elseif $2 ison $chan {
      msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul.
      msg $chan $chr(3) $+ 5 $+ Bomba Aktif. Son $+ $chr(3) $+ 4 30 $chr(3) $+ 5 $+ Saniye. $chr(3) $+ 4 $+ Zaman İşLiyor... Tik Tak Tik Tak...
      msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41)
      msg $chan -
      msg $chan $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
      .set %dinchan $chan
      .timerbomba 1 30 patlat
      set %bomba_nick $2
      set %bombaci_nick $nick
      set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
    }
  }
  if $regex($1,/([.!]at)/Si) {
    if ($nick == %bomba_nick) {
      if $istok($me $nick,$2,32) {
        msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
        return
      }
      if !$2 {
        msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
        return
      }
      if $2 !ison $chan {
        msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
      }
      elseif $2 ison $chan {
        if ($2 isin %bombaci_nick) {
          msg $chan $chr(2) $+ $2 $+ $chr(2) $chr(3) $+ 4 $+ Daha Önce Bombadan Kurtulmuş. Başkasına Doğru At $chr(2) $+ $nick $+ $chr(2)
          return
        }
        msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul.
        msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41)
        msg $chan -
        msg $chan $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
        set %bomba_nick $2
        set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
      }
    }
    else {
      msg $chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil.
    }
  }
  if $regex($1,/([.!]kes)/Si) {
    if ($nick == %bomba_nick) {
      if ($2 == %bomba_renk) {
        .timerbomba off
        msg $chan -
        msg $chan $chr(3) $+ 5 $+ Kanalın Kahramanı $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . $chr(3) $+ 5 $+ Kendini Bombadan Kurtardı. Tebrikler, $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ .
        msg $chan -
        unset %bomba_*
        unset %bombaci_*
        unset %dinchan
      }
      elseif $istok($remtok(%bomba_renkler,%bomba_renk,32),$2,3 2) {
        msg $chan $chr(2) $+ $nick $+ $chr(2) $+ . $chr(3) $+ 4 $+ Yanlış Renk!
        msg $chan $chr(3) $+ 5 $+ Bombanın PatLamasına Saniyeler Kaldı.!
      }
    }
    else {
      msg $chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil.
    }
  }
}
alias -l patlat {
  .kick %dinchan %bomba_nick Seni Uyardım, Bomba Elinde PatLadı. $chr(2) $+ BOOOOM!
  .unset %bomba_*
  .unset %bombaci_*
  .unset %dinchan
}



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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk