![]() |
#91
| ||||
| ||||
![]() Tarih: 18-07-2009, 03:59 Bu kod herhangi bir kanalda "@,&,%,~" prefixlerine sahip olan kişilerin !banla <rumuz> <sebeb> şeklindeki komutu kullanarak belirtilen kullanıcıyı tüm kanallardan banlamanıza olanak sağlar. Kod: on *:text:!banla &:#:{ if ($2 ison # && $regex($nick(#,$nick).pnick,[@&~%])) { var %1 = 1,%v1 while ($comchan($2,%1)) { %v1 = $v1 if ($regex($nick(%v1,$me).pnick,[@&~%])) { ban -k %v1 $2 2 BAN SEBEBİ. } inc %1 } } }
__________________ C/co/cod/code^man. |
Sponsored Links |
#92
| ||||
| ||||
![]() Tarih: 20-12-2009, 16:10 Bu kod kanala giren kullanıcının rumuzunda dosya.txt içerisindeki kelimelerden tarama yaparak badnick olup olmadığını kontrol eder. Sonuç doğru dönerse kişi kanaldan uzaklaştırılır ve banlanan kaçıncı kişi olduğu mesajda gösterilir. Kod: on !*:join:#:{ var %1 = 1 while ($read(dosya.txt,%1)) { if ($v1 isin $nick) { inc %_bnick ban -k # $nick 2 badnick tespiti yapılan: %_bnick $+ . kişisin. break } inc %1 } }
__________________ C/co/cod/code^man. |
#93
| ||||
| ||||
![]() Tarih: 25-12-2009, 02:29 Bu kod kanala giren kullanıcıya kanala giren kaçıncı kişi olduğu bilgisini notice olarak sizin tarafınızdan bildirir. Kod: on !*:join:#:{ inc $+(%,#,join) notice $nick kanala giren $+($(,,$+(%,#,join)),.) kişisin vs. }
__________________ C/co/cod/code^man. |
#94
| ||||
| ||||
![]() Tarih: 27-05-2011, 21:21 Bu kod mIRC-de gönderdiğiniz text-lerin baş harflerini büyük yapmak için kullanılır. Yani bir nevi düzenli cümle gibi. Kod: on *:input:*:{ if ($1 != $target && $1 !ison $target && $left($1,1) != /) { say $regsubex($1-,(^.),$upper($replace(\1,i,İ,ı,I))) haltdef } }
__________________ C/co/cod/code^man. |
#95
| ||||
| ||||
![]() Tarih: 28-06-2011, 22:32 Bu kod herhangi bir kanalda rumuzunuzu yazan kullanıcıya sozler.txt -den bir texti/satırı notice olarak göndermenize olanak sağlar. Aynı nick için 10 saniye tekrar süresi vardır ve bu süreyi -mu10 kısmından bu süreyi değiştirebilirsiniz. Kod: on *:text:$($+(*,$me,*)):#: { hinc -mu10 _sz $nick 1 $iif(!$fopen(_sz),.fopen _sz sozler.txt) $iif($feof,.fseek -l _sz 1) if ($hget(_sz,$nick) < 2) notice $nick $fread(_sz) }
__________________ C/co/cod/code^man. |
#96
| ||||
| ||||
![]()
Bu kodlar, farklı platformlarda mIRC Scripting bölümlerinde verdiğim yardımlardan size lazım olabilecek hazır kod/snippet niteliği taşıyan kodlardır. Not: Tüm kodlar ilgili kişiler(yardım isteyen kişiler) tarafından denenmiş ve onaylanmıştır. Not 2: Bu kodlar daha kısa ve işlevsel yazılabilir di, lakin gereksinime uygun ve anlayabileceğiniz açıklıkta yazılmıştır.
__________________ C/co/cod/code^man. |
#97
| ||||
| ||||
![]() Alıntı:
HTML-Kodu: alias -l fld { hinc $+(-mu,$1) fld $+($3,½,$4) 1 if ($hget(fld,$+($3,½,$4)) >= $2) return $true else return $false } on @*:text:*:#: { if $nick isreg # && $fld(2,8,#,$nick,$1-) { ban -k # $nick 4TXT Flood!10 Yaptığınız için kanaldan uzaklaştırıldınız. mode # +M .temizle # msg # 10Kanal da4 Txt flood10 tespit edildiği için4 Güvenlik amaçlı 1 dk Şifresiz nicklere10 kapatılmıştır. if !$timer($+(#,½,fld)) { $+(.timer,½,#) 1 60 mode # -M .timer 1 11 msg # 10Kanal geneli4 Şifresiz10 nicklere açılmıştır.4 İyi sohbetler } } } |
![]() |
Etiketler |
tüm, yaptığım, yardımlar or kodlar |
Seçenekler | |
| |