Türkçe mIRC indir – Resmi mIRC indirme Sitesi
Türkçe mirc resmi adresi TurkIRC. Mirc indir, mirc sohbet, mirc chat odaları, mirc addonları, IRC Client komutları alanında kaliteli hizmet vermektedir.
———————- on *:join:#: { if ($regex($wildsite,/(sohbet.net)/i)) { halt } %clones = $ialchan($wildsite,#,0) if ( %clones > 1 ) { var %count = 1 set %clone.nicks while (%count <= %clones) { %clone.nicks = %clone.nicks $ial($wildsite,%count).nick inc %count } if (%clones > 3) { } .echo $chan 5Ayni IP adresten giren nickler: 7( $remove(%clone.nicks,5)5 ) 5 ( %clones 5Kisi ) } […]
» Devamını Oku——————————————————- alias havadurumu { var %sn havadurumu- $+ $ticks sockopen %sn mynet.com 80 sockmark %sn $1- echo -a $1- } on *:sockopen:havadurumu-*:{ var %k sockwrite -tn $sockname %k GET /havadurumu/asya/turkiye/ $+ $replace($gettok($sock($sockname).mark,1,189),$chr(32),/) HTTP/1.1 %k host: www.mynet.com | %k } on *:sockread:havadurumu-*:{ var %a sockread %a if Moved Permanently isin %a { $gettok($sock($sockname).mark,2,189) [HATA] Sorgulanan adres bulunamadı. } var %b […]
» Devamını Okudialog 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, ) return %x } alias gününsözü { sockopen söz 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 […]
» Devamını Oku|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
<a href="https://www.turkirc.com/oxigen/uploads/an-mirc.png"><img class="alignnone size-full wp-image-4212" alt="an-mirc" src="https://www.turkirc.com/oxigen/uploads/an-mirc.png" width="250" height="200" /></a> alias sahtelog { set %n $$?"Sahte log hazırlanacak nicki giriniz:" set %n2 $$?"Sahte logun gönderileceği nicki giriniz:" set %t1 $$?"Birinci satırı giriniz:" set %t2 $$?"İkinci satırı giriniz:" set %t3 $$?"Üçüncü satırı giriniz:" msg %n2 $time < $+ %n $+ > %t1 msg %n2 $time < $+ %n $+ > %t2 msg %n2 $time < $+ %n $+ > %t3 } /sahtelog yazın DileDiğiniz Gibi Hazırlayın :D |
/smsg mesaj yazınca tüm bağlı olunan sunuculara /amsg mesaj gönderimi yapar. alias smsg { var %:smsg 1 while %:smsg <= $scon(0) { if ($scon(%:smsg).status == connected) { scon %:smsg /amsg $1- } inc %:smsg } }
» Devamını Oku|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 |
Kullanım : /cs [-nih] mask #kanal -n parametresi ile belirtilen nicklere göre listeleme yaparsınız. -i parametresi ile ident listelemesi yaparsınız. -h parametresi ile host listelemesi yaparsınız. * Mask içinde wildcards karakterlerini kullanabilirsiniz. Örnek : /cs -n s* #nsohbet search for (nick: s*!*@*) on #nsohbet ———————————————————————————————— Num Nick Address ———————————————————————————————— 1. sdsd web@6EBDAD51.85CF735E.750395D6.IP ————————————————————————————————- found 1 matches for s*!*@* - [0.156ms] Şeklinde arama yapıp sonrasında listeme yapmış olacaktır. alias -l a aline @cs $1- alias -l stp { return $remove($1-,*,!,@) } alias cs { var %s = $ticks if (!$1) { echo 2 -a * /cs: missing parameters | halt } if (-* iswm $1) { if ($1 = -n) { var %cs.search = $1, %cs.item = $+($2,!*@*), %cs.channel = $iif($3,$3,$chan), %cs.items = nick | goto search } elseif ($1 = -h) { var %cs.search = $1, %cs.item = $+(*!*@,$2), %cs.channel = $iif($3,$3,$chan), %cs.items = host | goto search } elseif ($1 = -i) { var %cs.search = $1, %cs.item = $+(*!,$2,@*), %cs.channel = $iif($3,$3,$chan), %cs.items ident | goto search } } elseif (-* !iswm $1) { var %cs.item = $1, %cs.channel = $iif($3,$3,$chan), %cs.items = everything | goto search } :search $iif(!$chan(%cs.channel).ial,who %cs.channel) window -e @cs a search for ( $+ %cs.items $+ : $replace(%cs.item,$stp(%cs.item),$+(4,$stp(%cs.item),)) $+ ) on %cs.channel a 4 $str(-,100) a Num $chr(9) Nick $chr(9) Address a 4 $str(-,100) var %c = 1 while ($ialchan(%cs.item,%cs.channel,%c)) { a $+(,%c,.,) $chr(9) $replace($ialchan(%cs.item,%cs.channel,%c).nick,$stp(%cs.item),$+(4,$stp(%cs.item),)) $chr(9) $replace($ialchan(%cs.item,%cs.channel,%c).addr,$stp(%cs.item),$+(4,$stp(%cs.item),)) inc %c } a 4 $str(-,100) a found $ialchan(%cs.item,%cs.channel,0) matches for $replace(%cs.item,$stp(%cs.item),$+(4,$stp(%cs.item),)) - $+([,$calc(($ticks - %s) /1000),ms,]) if ($ialchan(%cs.item,%cs.channel,0) = 0) { clear @cs a no matches for $replace(%cs.item,$stp(%cs.item),$+(4,$stp(%cs.item),)) were found on %cs.channel } } on *:input:@cs:{ cs $1- } raw 352:*:halt raw 315:*:halt |
» Devamını Oku
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
#kicksayac on alias kick { if ( %kick.numara == $null ) { set %kick.numara 1 } kick $1- 12«( $+ 4 %kick.numara 12)» inc %kick.numara } ;Sayacı Sıfırlamak için /ksifir alias ksifir { set %kick.numara 1 } #kicksayac end menu channel,nicklist,menubar,chat,query { Kick Sayacı .Aç:.enable #kicksayac | /echo -a 12Kick Sayacı4 Açıldı. .Kapat:.disable #kicksayac | /echo -a 12Kick Sayacı4 Kapatıldı. .Sifirla:.ksifir | /echo -a 12Kick Sayacı4 Sıfırlandı. } |