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

Aytac · 23 Ocak 2018, 00:40

mIRC Geoip - ULKE Bulma eklenti dosyasi.

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

c00 · 23 Ocak 2018, 02:51

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ı.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Fredyyy · 23 Ocak 2018, 19:09

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

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

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

Ç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: Kodu kopyalamak için üzerine çift tıklayın!

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

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: Kodu kopyalamak için üzerine çift tıklayın!

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

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

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: Kodu kopyalamak için üzerine çift tıklayın!

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: Kodu kopyalamak için üzerine çift tıklayın!

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 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

Selamlar. Konuyu hortlatmak istemezdim ama, başka benzer konuya denk gelmedim. Bu kodu şöyle yapabilirmiyiz: /ban ~T
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
lock:*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

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) $+ .
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

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

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: Kodu kopyalamak için üzerine çift tıklayın!

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
}

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

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.