yaRdım Edın - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

insane · 31 Mayıs 2009, 17:37

ON *:START: {
Kod
}

Kod yazan yere kodu yazarsın girer girmez açılır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

KraL`` · 31 Mayıs 2009, 17:46

tSq edeRm aRkadaSIm.Cok saOLS.

KraL`` · 31 Mayıs 2009, 17:53

aRkadaSIm dedıqın qıßı yaptım Senın yoLLadıqın KOdu yazdım ama Scrıpt uCtu

[17:51] 0,4Random Nick Koruması Acılmışdır.
[17:51] 0,4Random Nick Koruması Kapatılmışdır.
4***12 MENU Yalnış komut.
4***12 RANDOM Yalnış komut.
4***12 .Aç Yalnış komut.
4***12 .KAPAT:.DISABLE Yalnış komut.
4***12 #RANDOM Yalnış komut.
4***12 ON Yalnış komut.
4***12 #RANDOM Yalnış komut.

Lucifer · 31 Mayıs 2009, 17:59

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

 
ON *:START: {
  echo -at 0,4Random Nick Koruması Acılmışdır.
  alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
  alias randn2 {
    if $1- isalpha && $1- islower {
      if (($count($1,a,e,i,o,u) >= 4)) { return $false }
      if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
      if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
        if ($regex($1,/^[^aeiou]{3}/)) { return $true }
        elseif ($regex($1,/([a-z])\1{2}/)) { return $true }
        elseif ($regex($1,/[aeiou]{3/)) { return $true }
        elseif ($regex($1,q[^u])) { return $true }
        elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
        else { return $false }
      }
    }
  }
  alias randn {
    if $1- isalpha && $1- islower {
      if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
      if ($len($1) == 7) {
        var %son = $mid($1,$len($1),1)
        var %son2 = $mid($1,$calc($len($1) - 1),1)
        if (%son == %son2) { return $false }
        if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
        else { return $false }
      }
      elseif ($len($1) == 8) {
        var %son = $mid($1,$len($1),1)
        var %son2 = $mid($1,$calc($len($1) - 1),1)
        if (%son == %son2) { return $false }
        if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
        else { return $false }
      }
      elseif ($len($1) == 9) {
        var %son = $mid($1,$len($1),1)
        var %son2 = $mid($1,$calc($len($1) - 1),1)
        if (%son == %son2) { return $false }
        if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
        else { return $false }
      }
      elseif ($len($1) == 10) {
        var %son = $mid($1,$len($1),1)
        var %son2 = $mid($1,$calc($len($1) - 1),1)
        if (%son == %son2) { return $false }
        if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
        elseif $regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
        else { return $false }
      }
      if ($regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
      elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) { 
        var %son = $mid($1,$len($1),1)
        var %son2 = $mid($1,$calc($len($1) - 1),1)
        if (%son == %son2) { return $false }
        else { return $true }
      }
      elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) { 
        var %son = $mid($1,$len($1),1)
        var %son2 = $mid($1,$calc($len($1) - 1),1)
        if (%son == %son2) { return $false }
        else { return $true }
      }
      elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
      elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
      else { return $false }
    }
  }
  #random on
  on !*:join:#:if ($randomnick($nick)) { gzline $nick +1h random nick kullanmayın! }
  #random end
}

KraL`` · 31 Mayıs 2009, 18:04

AcıLdıqına Daır ßr Sey yazmadı Komut da Hata vermedı ama acıLmıSmıdır ? ArkadaSIm ?

0,4Random Nick Koruması Acılmıştır. ßyle ßr yazı qeLmedı . teSekkuru ßır ßoRc ßlırım yardımLarınız ıCIn..

Thief · 31 Mayıs 2009, 18:08

arkadaşım özel mesajınızı yeni aldım chartal 'ın sorunuyla ilgileniyorum, ondan sonra seninkinede bir el göz gezdiririm.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
KENDİ MOTİVASYONUNUZ İLE BAŞKALARINI MOTİVE EDİN	Sarya	Kişisel Gelişim	0	02 Ocak 2023 22:41
ArkadaŞlar yardim edİn....	EmirCan	mIRC Scripting Sorunları	1	28 Nisan 2010 21:48
arkadaSLar aLLah RızaSI ıCIn yaRdım eDın Kafayı yıCem :(	KraL``	mIRC Scripting Sorunları	11	10 Ağustos 2009 16:56
Mirc dosyasıyla ılgılı lutfen yardım edın arkadaslar	BySpy	mIRC Scripting Sorunları	5	14 Nisan 2009 12:56
Kendınızı Tarıf Edın Robot Resmınız Cıksın:)	Kan	Komedi ve Mizah	9	30 Haziran 2008 19:53

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 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.