Bu Kodların Socku Lazım - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

KiLL · 18 Aralık 2007, 23:00

Selam. Elimde İki tane kod var. Bu kodların socku lazım. Fakat yapamadım.. Sockta yetersizim.

Kodlar Şunlar ;

Benim Yazmış Oldugum Kod ;

on *:join:#:{
var %lol $lines(badnick.mercy)
while (%lol >= 1) {
if ($remove($read(badnick.mercy,%lol),$chr(32),*,/,\,.,$chr(44),-,_,!,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm $nick) { /set %nomercysıralama %lol | /ban -k $chan $nick %nomercysıralama | //echo -a %nomercysıralama }
/dec %lol
}
}

SouL'un yazmış Oldugu bir kod ;

alias grr { if (($regex($1,/[^aeiou]{4}/i)) || ($regex($1,/[aeiou]{3}/i))) { return $true } | else { return $false } }
on *!*:join:#:{ if ($grr($nick)) { /kick $chan $nick Random Nick Yasaktır Nickinizde 3 Sesli Veya 4 Sessiz Harf Yan Yana Tespit Edildi! } }

Bu iki kodun SOCK u lazım. yardımcı olursanız sevınırım..

KiLL · 19 Aralık 2007, 01:32

fikri olan yokmu :S

detay · 19 Aralık 2007, 15:24

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

on *:join:#:{
  var %lol $lines(badnick.mercy)
  while (%lol >= 1) {
    if ($remove($read(badnick.mercy,%lol),$chr(32),*,/,\, .,$chr(44),-,_,!, iswm $nick) { /set %nomercysıralama %lol | /ban -k $chan $nick %nomercysıralama | //echo -a %nomercysıralama }
    /dec %lol
  }
}

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

if $2 == JOIN {
  var %nick = $remove($gettok($1,1,33),:),%chan = $right($3,-1) 
  var %lol $lines(badnick.mercy)
  while (%lol >= 1) {
    if ($remove($read(badnick.mercy,%lol),$chr(32),*,/,\, .,$chr(44),-,_,!, iswm %nick) { 
      /set %nomercysıralama %lol | sockwrite -nt $sockname mode %chan +b %nick | sockwrite -nt $sockname kick %chan %nick %nomercysıralama | //echo -a %nomercysıralama 
    }
    /dec %lol
  }
}

socread eventine verdigim kodu koyarsan yukaridakinin islevini görür o diger koduda ayni mantıkla yapabilirsin.. $nick yerine %nick $chan yerine %chan
birde "sockwrite socketadi komut" komutuyla sockete emir veriyoruz o kadar

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
GEN ÖZEL: Genetik Kodların Başlangıç ve Son Kodonu Nedir?	Kalemzede	Bilim Dünyasından Son Haberler	0	16 Nisan 2020 18:13
GEN ÖZEL: Genetik Kodların Genel Özellikleri Nedir, Ne Değildir?	Kalemzede	Bilim Dünyasından Son Haberler	0	16 Nisan 2020 18:13
Kodların saklanmasına önlem geliştirme	kup{a}pazl	Projeler	45	03 Şubat 2014 15:01
unreal için m_spy lazım ama win32 de çalışması lazım	bendeniz00	Unreal IRCd	3	15 Aralık 2007 22:00
Kodların Çalınması hakkında.	XxxxX	mIRC Scripting Sorunları	20	02 Aralık 2005 21:49

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.