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

- - İdent korumaSi (https://www.ircforumlari.net/mirc-scripting-sorunlari/218455-ident-korumasi.html)

mys_35

06 Haziran 2009 12:37

İdent korumaSi

Selam arkaDaslar Sizden ident korumaSi istiyorum Ama soyle birşey ornek Mynet mynet yani ilk harfi buyuk olani ekledimde Sadece onu atsin ilk harFi kucuk olan mynet identileRi ellemeSin..birDe Ekledim identileRi sil ve lisTele gibi Bir diolog olurSa cok sevinirim şimDiden Elinize saglık yardimlariniz için Tşk

Regex

06 Haziran 2009 14:41

Cevap: İdent korumaSi

Dialog'u kendin yazmalısın, bunun için "Dialog Studio" programı var. İndir ve forumdaki anlatımdan yararlanarak bir şeyler yapmayı dene.

Kod:

on !*:join:#:var %* = 1 | while ($read(identd.txt,%*)) { if ($istokcs($gettok($gettok($address($nick,5),1,64),2,33),$v1,32)) { ban -k # $nick 5 Kick nedeni. | break } | inc %* }

Biçiminde yapabilirsin.

mIRC'nin ana dizinine, identd.txt adında bir dosya aç ve bu dosyaya, alt alta olmak kaydıyla identdleri ekle. Büyük-küçük harfe duyarlı biçimde işlem yapacaktır.

mys_35

07 Haziran 2009 15:45

Cevap: İdent korumaSi

Kod:

#ident on

on @*:join:#: { 

  var %i = $remove($gettok($gettok($address($nick,5),2,33),1, 64),~) 

  if ($istok(%reklamlar,%i,33)) { ban $chan $nick 2 | kick # $nick Sana yasaK KanaLa Girmek.. }

}

#ident end

menu channel {

  -

  İdent Scan

  .Ac Kapat

  ..İdent Scanı Ac:/enable #ident

  ..İdent Scanı Kapat:/disable #ident

  .Bad İdent Ekle:/var %ekle = $$?="Bad ident" | set %reklamlar $addtok(%reklamlar,%ekle,33)

  .Listeden İdent Cıkar:/var %cıkar = $$?="ident" | set %reklamlar $remtok(%reklamlar,%cıkar,33)

  -

}

hocam Dedim seyi bunun uzeRinde DeğiştireBilirmisiniz acaba Tşk

Regex

07 Haziran 2009 15:56

Cevap: İdent korumaSi

Kod:

#identd on

on !*:join:#:var %* = 1 | while ($read(identd.txt,%*)) { if ($istokcs($gettok($gettok($address($nick,5),1,64),2,33),$v1,32)) { ban -k # $nick 5 Kick nedeni. | break } | inc %* }

#identd end

menu channel {

  -

  Identd Koruması

    .$iif($group(#identd) == off,Aç,Kapat):$iif($group(#identd) == off,.disable,.enable) #identd

    .Identd ekle:write identd.txt $?="Eklenecek identdi girinic."

    .Identd sil:write $+(-dL,$?="Silinecek identdi giriniz.") identd.txt

  -

}

mys_35

07 Haziran 2009 16:42

Cevap: İdent korumaSi

Tşk EdeRim DeneDim cok Guzel Eline Saglık Saol...

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