Deop korumasi deop edeni deop eder
on 1:DEOP:#:if (($nick == $me) || ($opnick != $me)) { /halt } | else if ($nick == ChanServ) { .raw privmsg chanserv :OP $chan $me } | else { .raw privmsg chanserv :OP $chan $me | .raw privmsg chanserv :DEOP $chan $nick }

iRcDe.Com irc ircd ircde Mirc mrc program Haber sitesinde Bu yazı toplamda 3, bugün ise 0 kez görüntülenmistir

YouTuBe Video Kaydedici
Youtube’de izlediğiniz ve beğendiğiniz video varsa bu code ile izlediğiniz video’yubilgisayarınıza indirebilirsiniz.Kullanımı çok basit.Tabi izlemek içinde “FLV Player” programı gerekir.

!yootoobe http://www.youtube.com/watch?v=D1maHOSI7zI
===================================
*/
on *:INPUT:*: {
if ($1 == !yootoobe) {
if (!$2) echo -a 4İndirilecek video’nun adresi girilmedi!
elseif (www.youtube.com/watch?v= !isin $2) echo -a 4Yanlış URL adresi!
else {
echo -a Bekleyin…
set %videourl $+(url=,$2,&,site=aa&,submit)
sockclose yootoobe
sockopen yootoobe s1947.gridserver.com 80
}
halt
}
}
on *:sockopen:yootoobe: {
var %s = sockwrite -n $sockname
%s POST /keepvid.php HTTP/1.0
%s Content-Type: application/x-www-form-urlencoded; charset=”utf-8″
%s Content-Length: $len(%videourl)
%s Host: s1947.gridserver.com
%s
%s %videourl
}
on *:sockread:yootoobe: {
var %x
sockread %x
if (*Flash Video* iswm %x) echo -a 4İndirmek için: $remove($gettok(%x,6,32),›,,href=,>,”)
}

iRcDe.Com irc ircd ircde Mirc mrc program Haber sitesinde Bu yazı toplamda 2, bugün ise 0 kez görüntülenmistir

#Help`de Otomatik Cevap..
on @*:join:#help:{ $+(.timer.,$nick) 1 3 checkhelpreg $nick $chan }
alias -l checkhelpreg { if ($1 isreg $2) { mode $2 v $1 | msg $2 Merhaba $1 $+ , size nasıl yardımcı olabilirim? | inc %helped | msg #helpop Bugün toplam $+(,%helped,) kişiye help kanalında +v verildi. }

iRcDe.Com irc ircd ircde Mirc mrc program Haber sitesinde Bu yazı toplamda 3, bugün ise 0 kez görüntülenmistir

Bilinen bir clone taramasıdır. Kanalda bulunan cloneleri status penceresinde gösterir. Kullanımı /clone #kanaladı yada kanal penceresi üzerinde iken sağ tıklayıp Clone Tara demeniz yeterlidir.

Kod :

alias Clone {
var %ğ = $nick(#,0)
while %ğ {
if !$hget(host,$address($nick(#,%ğ),2)) { hadd -m host $address($nick(#,%ğ),2) 1 }
else { hinc host $address($nick(#,%ğ),2) }
dec %ğ
}
echo 4 -st # kanalı için clone taraması başlatıldı...
echo -s -
.timer 1 1 .h_al #
}
alias h_al {
var %ı = $hget(host,0).item
while %ı {
if $hget(host,%ı).data > 1 {
set %y_k yes
var %ç = $nick($1,0)
while %ç {
if $hget(host,%ı).item == $address($nick($1,%ç),2) { set %_cln $addtok(%_cln,$nick($1,%ç),32) }
dec %ç
}
echo 12 -st 2Adres: $hget(host,%ı).item --- 10Bağlı kullanıcı sayısı: $hget(host,%ı).data --- 4Bağlı rumuzlar: $gettok(%_cln,1-,32)
unset %_cln
}
dec %ı
}
echo -s -
$iif($(%y_k,2) != yes,echo 4 -st $1 kanalında clone bulunamadı.,echo 4 -st $1 kanalı için clone taraması tamamlandı.)
unset %y_k
hfree host
}

menu channel {
.-
.Clone Tara:.Clone #
}


iRcDe.Com irc ircd ircde Mirc mrc program Haber sitesinde Bu yazı toplamda 3, bugün ise 0 kez görüntülenmistir