Sohbet2013
Sohbet 201З
  miRC Hazir Kodlari
 

IRC‘de Proxy saldırıları en başa bela saldırı tiplerinin başında gelmektedir,Proxy‘de IP bulmak daha kolaydır ve binlerce saldırı tipleri bulunmaktadır. Bu saldırıları engellemek için birçok kod yazılmıştır. İşte o kodlardan birisi;

alias tor_ { if ($1) { inc %xx | sockopen $+(tor*,%xx) tor.efnet.org 80 | sockmark $+(tor*,%xx) $1 } }
on *:sockopen:tor*:{
  var %s sockwrite -n $sockname
  %s GET /?i= $+ $sock($sockname).mark HTTP/1.1
  %s Host: tor.efnet.org
  %s $crlf
}
on *:sockread:tor*:{ 
  var %x [ $+ [ $sockname ] ]
  sockread %x [ $+ [ $sockname ] ]
  if (*was found* iswm %x [ $+ [ $sockname ] ]) {
    gzline $+(*@,$gettok($gettok(%x [ $+ [ $sockname ] ],-2,$asc(:)),-1,32)) 1h 1IP adresinizde 4PROXY ( $+ $gettok($gettok(%x [ $+ [ $sockname ] ],1,41),2,40) $+ ) 1girişi tespit edilmiştir.
    sockclose $sockname
  }
}
raw 352:*:{
  tor_ $4
}
on *:snotice:*Client connecting*: {
  .who +I $9
}


!Clear Kodu 
Oper , Adminlerin ve kanal oparatörleri ek olarak kullanabiliceği bir !Clear komutudur.
Serverinizde koruma botu yoksa veya aksaklık yaratıyorsa ek olarak kullanabilir.
@Aop olamayanlar !Clear komutunu kullanamazlar.

 

Kod:

on *:text:*:#:{ if !clear isin $1 {
if $nick !isop $chan {
.msg $chan $nick $+ : ?uanda kanal operatörlü?ü ile alakan?z olmad??? için; bu komutu kullanamazs?n?z!
}
else {
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 0,0.
.msg $chan 12!Clear komutunu kullanan yetkili; 4 $nick
}
}

Otomotik olarak Nick Şifremi girilsin istiyorsanız Aşagıdakı KoduMirc’inizin Remotesine Ekleyiniz.

 

on *:CONNECT: {
.ns ghost Nickiniz nickpass
.nick kullandiginizrumuz
.msg NickServ IDENTIFY nickpass
}


Aşagıdaki mIRC hazır kod ile istediginiz bir kanaldan topluca tüm userleri istediginiz başka bir kanala taşıyabilirsiniz.

 

mIRC Toplu Sajoin Kodu

alias mjoin {
if (!$1) || (!$2) {
}
else {
echo 12 * Userler Tasınıyor.. $1 – $2
set %i 1
set %nick $nick($1,%i)
While %nick != $null {
%nick = $nick($1,%i)
sajoin %nick $2
echo 12 * %i %nick Tasındı. $2
inc %i
}
echo 14 * Toplam %i User $2 Kanalina Tasinmistir.
}Kullanımı :/mjoin #taşınankanal #taşınacakkanal


mIRC Oto Selam verme, mIRC Oto Selam Kodu

 

Bu hazır kod ile mIRC oto selam verebilirsiniz . Sohbet kanalında herhangi bir user selam , slm veya s.a demesi halinde scriptiniz otomatik olarak aleykum selam diye cevap verebilir

on 1:text:slm*:#muhabbet:{ msg # Ãleyküm selam , hoş geldin $nick }  on 1:text:selam*:#muhabbet:{ msg # Ãleyküm selam hoş geldin $nick }  on 1:text:s.a.*:#:{ msg # Ãleyküm selam hoş geldin $nick }


mIRC scriptlerinize zline yetkisi olan tüm oper ve adminlerin kısa yol tuslarina ekleyip F1 tuşu ile sunucudan istedigi kullanici banlayıp atabilirsiniz.

 

Zline atarken hiç bir reklam yoktur. Sunucu ismine göre zLine atmaktadir. F1 tuşuna basarak sunucudan zline atabilirsiniz. Aşagidaki kodu mIRC Script’iniz açıkken yazıp entere basınız. Alias’ınız otomatik yüklenecektir.

mIRC Zline atmak Hazır Kod

/alias f1 /gzline $$1 : 4 $network 2Sunucu Kurallarina Uyunuz Banlandin. Saat : $time 5& 2Tarih : $fulldate


mIRC Kick ve Kline Sayacı ile artık mirc scriptlerinizde attıgınız kullanıcı ile ilgili istatistiki bilgilerini görebilirsiniz.

 

mIRC Kick Sayacı hazır kodu

alias kick { kick $1- %kicksayac | kicksayac }
alias kicksayac {
if (%kicksayac == $null) {
set %kicksayac 1
}
%kicksayac = %kicksayac + 1
halt
}


mIRC özel karşılama için kodlanmış olan mirc özel karşılama kodu. mIRC scripting bilgisi olanlar kodu geliştirebilirler.

 

on *:open:?:*:{
 
msg $nick 2Selam4 $nick
 
msg $nick 2Tarih4 $date 2ve Saat 4 $time(HH:nn.ss)
 
msg $nick 2Boş Olduğum Süre 4 $duration($idle)
 
msg $nick 2Açılan Özel Pencere 4Sayısı %q!
 
inc %q!
 
msg $nick 2Şu an Özelimdeki4 $+($query(0),.) 2Kişisiniz Müsait Olduğumda Cevap Verilecektir
 
msg $nick 2Lutfen 4Op2, 4Voice2, 4Oper 2istemeyiniz. İstemeniz Durumunda Direk Olarak ignore Edileceksiniz4.2IRC Servisler iLe iLgiLi Sorunlariniz için 4/join #help 2Yaziniz. 4Zline, Kline, Akill, Nick 2ve 4Kanal 2$ifre 2Sorunlariniz icin 4/join #OperHelp 2Yaziniz.. 
inc %q!
 
}


Vizyondaki son filmlerden haberdar olmak için aşağıdaki hazır kodu MircRemote bölümünüze kopyalayıp “/sinema” komutu ile mircinizde çalıştırabilirsiniz.

 

alias sinema { if $sock(sinema) { sockclose sinema } | sockopen sinema sinema.com 80 | echo 3 -st * Sinema.com: Vizyondaki filmler alınmaya çalışılıyor. | if $window(@Sinema.com) { clear @Sinema.com } } 
alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } 
alias -l sinemay { if !$window(@Sinema.com) { window -nk0 @Sinema.com } | aline -p @Sinema.com $1- } 
on *:sockopen:sinema:{ var %c = sockwrite -n $sockname | %c GET /filmler.aspx?Status=4 HTTP/1.1 | %c Host: sinema.com $+ $crlf $+ $crlf } 
on *:sockread:sinema:{ 
if ($sockerr) { echo 3 -st * Sinema.com: Vizyondaki filmleri alırken hata oluştu. Lütfen tekrar deneyiniz. | halt } 
else { var %- | sockread %- | if (*<td width=”271¨ class=”red” valign=”top”><a href=”film_ozetbilgiler.aspx* iswm %-) || (*<td width=”391¨><a href=”film_ozetbilgiler.aspx?FilmID=*”><img src=”images/but_git.gif”* iswm %-) || ($count(%-,$chr(9)) == 13) { sinemay $+($iif(*red* iswm $v1,04,03),$remove($htmlfree(%-),$chr(9),)) } 
elseif (*<img src=”images/but_os.gif”* iswm %-) { sinemay 05Devamı ve daha fazla bilgi için:12 $+(,http://www.sinema.com/,$replace($gettok(%-,2,34),sinema,zetbilgiler),) } 
elseif (*HTML*:*Erhan İDİZ* iswm %-) { if $sock(sinema) { sockclose sinema } | if $window(@Sinema.com) { window -a @Sinema.com } }
} 
} 
Hazır Code By - el33t ‘e Teşekkürler..


mIRC scriptinizde bu hazır kod ile özelde sizin nickiniz seslendigi zaman kişiye dosyadan eklediginiz mesajlari notice olarak gönderilecektir.

 

dosya.txt diye bir dosya açin mIRC ana dizine atiniz. İçine sirayLa cümleleri yaziniz. Her özelden Nickinizi yazdıklarinda yazan kişiye dosyadan yazılar otomatik gönderilir

Kanala giriş sesi;

on *:text:*Nickiniz*:?: {
notice $nick $read(dosya.txt)
}

mIRC Scriptimize aşagıdaki Hazır Kod ile belirlediginiz kanallara ame mesajlari ve amsg yazdiginiz mesajlar o kanallara iletilmicektir. Kodu Remotelere yazdıktan sonra özellikle Admin, Oper ve Helper arkadaşlar bulundukları kanalda daha rahat ediceklerdir.

 

mIRC Ame , Amsg Mesajlari Yasakla Kodu

alias ame { if $1 { var %º = 1 | while $chan(%º) { if !$istok(#Help #Operhelp #Log #Admin #Opers ,$v1,32) { !describe $chan(%º) $1- } | inc %º } } } 
alias amsg { haltdef | var %i 0 | var %t $chan(0) | while %i < %t { inc %i | if !$istok(#help #Operhelp,$chan(%i),32) { msg $chan(%i) $1- } } }

IRC ve mIRC sohbet odalarında winamp’ta dinlediğiniz şarkı gözüksün istiyorsanız aşağıdaki kodu mIRC scriptinizin aliases bölümüne ekleyiniz..

 

Winamp’ta Dinlediğin Şarkıyı IRC’de Gösterme Hazır Kod;

/song { 
set %chan $1 
if ($1 == $null) set %chan #  if ($dll(WinAmpI.dll, IsRunning, 0) == false) { 
msg %chan WinAmp isn't running!  halt  }  set %color1  set %color2  set %shf $dll(WinAmpI.dll, GetShuffle, 0)  set %state $dll(WinAmpI.dll, GetPlayState, 0)  set %vol $dll(WinAmpI.dll, GetVolume, 0)  set %song $dll(WinAmpI.dll, GetSong, 0)  set %poslen $dll(WinAmpI.dll, GetSongPosition, 0) $+ / $+ $dll(WinAmpI.dll, GetSongLength, 0)  set %track $dll(WinAmpI.dll, GetSongNumber,0) $+ / $+ $dll(WinAmpI.dll, GetSongCount,0)  set %bitrate $dll(WinAmpI.dll, GetBitRate, 0) $+ kbps  set %repeat $dll(WinAmpI.dll, GetRepeat, 0)  if (c isincs $gettok($chan(#).mode,1,32)) {  msg %chan WinAmp: %state $+ Song: %song $+ Position/Length: %poslen $+ Track: %track $+ BitRate: %bitrate $+  halt  }  if (%shf == true) {  set %shf1 Açık  }  if (%shf == false) {  set %shf1 Kapalı  }  if (%repeat == true) {  set %repeat Açık  }  if (%repeat == false) {  set %repeat Kapalı  set %emre emre  }    amsg Winamp - %song : Vol: % $+ %vol }    }


IRC sunucularınıza yapılan saldırılar, her zaman kullanıcıları ve server yöneticilerini rahatsız etmiştir. Bu saldırılardan korunmanın yollarından birisi de mIRC versiyon korumasıdır.

 

Günümüzdeki trojan saldırı botları, “ctcp version” sorgusuna yanıt vermemektedir. Dolayısıyla aşağıdaki hazır kod ile bu sorguya cevap vermeyen botlar sunucudan uzaklatırılmış olur. mIRC versiyon korumasının çalışması için aşağıdaki hazır kodu mIRC remote kısmına eklemeniz yeterlidir.

mIRC Versiyon Bot Saldırı Koruması Hazır Kod – Addon

on *:snotice:*Client connecting*: {
writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))
ctcp $9 version
.timer $+ $readini(version.ini,$9,ip) 1 30 versionban $9
}
alias versionban { gline $readini(version.ini,$1,ip) 1d :Trojan tespit edildi }
on 1:ctcpreply:* {
if ($1 == version) {
if ($regex($readini(version.ini,$nick,ip),d) == 1) {
.timer $+ $readini(version.ini,$nick,ip) off
remini version.ini $nick
}
}
}

Mirc kelime kısaltma kodları ile IRC’de sohbet ederken yazmak istediğiniz bazı kelimelere kısa yollar atayabilirsiniz. Örneğin; “hoş geldin” yazmak yerine klavyenizden “h.g” yazdığınızda kanala “hoş geldin” diye yansıyacaktır. Bunları örneklerle çoğaltabiliriz.. Aynı şekilde tek bir gülücüğü çoğaltmak istersek kodların arasına “if ($1- == :D ) { say :D :D:D:D:D | halt }” şeklinde ekleme yapıyoruz. Tek bir gülücük yaptığımızda “ :D ” şu şekilde -> “ :D :D:D:D:D” görünecektir.

 

on 1:INPUT:*: {
if ($mid($1,1,1) == /) { goto doit }
:doit
if ($1- == efem) { say Efendim? | halt }
if ($1- == h.g) { say Hoş Geldin | halt }
if ($1- == h.b) { say Hoş Bulduk | halt }
if ($1- == slm) { say Selam | halt }
if ($1- == mrb) { say Merhaba | halt }
if ($1- == nbr) { say Naber? | halt }
if ($1- == rica) { say Rica Ederim. | halt }
if ($1- == :D) { say :D:D:D:D:D | halt }
}
mIRC Spamfilter Kodu 2012 ekleyerek sunucunuzu tehlikelere karşı koruyabilirsiniz . mIRCTurkce.Com editörleri farkı ile bu Spamfilter hazır kodunu güvenle kullabilirsiniz .

 

alias spamekle {
  spamfilter add cpNna gzline - 2Â7n2t7î2c7ode4  $yildiztemizle($1-)
}
 
alias spamsil {
  spamfilter del cpNna gzline - 2Â7n2t7î2c7ode4  $yildiztemizle($1-)
}
 
alias yildiztemizle {
  var %y $+(.,?) , %yi
  if $numtok($1-,32) == 1 {
    var %1kelime 1
  }
  %yi = $replace($1-,$chr(42),%y,$chr(36),%y,$chr(91),%y,$chr(93),%y,$chr(92),%y,$chr(47),%y,$chr(43),%y,$chr(63),%y,$chr(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr(164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$chr(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$chr(44),%y,$chr(60),%y,$chr(61),%y,$chr(62),%y,$chr(34),%y,$chr(199),%y,$chr(221),%y,$chr(58),%y,$chr(45),%y,$chr(254),%y,$chr(222),%y,$chr(32),%y)
  if %1kelime {
    %yi = $+(^,%yi,$chr(36))
  }
  return $iif($len($remove(%yi,.,*)) &gt; 5,%yi,SPAMKONTROLUNDEGECERSIZ aslolan mesaj: $1- )
}
 
/spamekle Kelime. /
mIRC Günün Sözü Addon/Hazır Kod

 

mIRC üzerinden günün sözünü almak için aşağıdaki kodu kullanabilirsiniz.

dialog söz { 
title "Günün Sözü " 
size -1 -1 312 24 
option dbu 
edit "", 1, 11 6 291 10 
} 
alias htmlfree { 
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) 
return %x 
} 
alias gününsözü { sockopen söz www.gununsozu.com 80 | dialog -m söz söz } 
on *:sockopen:söz:{ 
sockwrite -n $sockname GET / HTTP/1.0 
sockwrite -n $sockname Host: gununsozu.com $+ $crlf $+ $crlf 
} 
on *:sockread:söz:{ 
if ($sockerr) { 
echo 4 -a hata var! 
} 
else { 
var %gününsözü 
sockread %gününsözü 
if <p id="text<font color=" align=center"> isin %gününsözü {  set %sözler " $deltok($htmlfree(%gününsözü),,9) $+ " )  }  }  }  on *:Dialog:söz:init:0:{  did -a söz 1 %sözler  }

mIRC Otomatik Selam Alma hazır kodu

 

dialog otos {
title "oto selam" size -1 -1 60 53 option dbu button "Açık", 1, 12 5 37 12 button "Kapalı", 2, 12 20 37 12 button "Tamam", 3, 12 35 37 12, cancel } alias otos dialog -m otos otos on *:dialog:otos:sclick:*: { if ($did == 1) { .enable #otos } if ($did == 2) { .disable #otos } } #otos on on *:text:*:?: { msg $nick selam $nick } #otos end

 
  Bugün 9 ziyaretçi (13 klik) kişi burdaydı!  
 
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol