Clone Taramasi kodu

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 […]

» Devamını Oku

Düsman Listesi addonu

» Devamını Oku

Mirc ilk harf Büyük Sonuna Nokta Yazi Tipi

» Devamını Oku

prot Kanal Koruma

TurkIRC ©   Evet aşağıdaki $prot() identiferı kanalınız için bir koruma identifierıdır. Kullanımı çok basit. İçinde olan korumalar; Tekrar koruması $prot(repeat,#kanal-adı,nick,mesaj,satır,saniye) Örnek: $prot(repeat,#turkirc,sel,selam naber,2,5) bu identifierı on TEXT eventi içinde kullandığımızda 5 saniye içinde 2 kez selam naber yazısını tekrar edersem bu identifier $true olacaktır, yani şöyle kullanabiliriz: on @*:text:*:#:if $prot(repeat,#,$nick,$1-,2,5) { kick # $nick Tekrar etme! } Flood koruması […]

» Devamını Oku

Vizyondaki Filmler Addonu

TurkIRC ©   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 […]

» Devamını Oku

Helperler için Yeni(away) sistemi.

Merhaba arkadaşlar, kodumuz şu şekilde aktifleşiyor.. #Helpers kanalında Helper !awaysüre Yazdıgında ( !away5 ) 5 dk away konuma gecer ve deop eder 5 dk sonra Helpere away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz. Şeklinde cvp gelir !evet yazıldıgında tekrar opa cıkarır ve görevine devam eder.. umarım begenirsiniz güle güle kullanın .. on *:text:*:#helpers:{ if (!evet isin $1) { .cs op #Helpers $nick | /msg # $nick hosgeldin basarilar dilerim. | .timer $+ $nick off } if (!away1 isin $1) { if !%helperaway [ $+ [ $address($nick,5) ] ] { set -u900 %helperaway [ $+ [ $address($nick,5) ] ] $addtok(%helperaway [ $+ [ $address($nick,5) ] ],$nick,32) /msg # $nick away sureniz baslamistir. .cs deop #Helpers $nick .timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 60 /msg # $nick away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz. .timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 60 .helperaway # $nick […]

» Devamını Oku
1 4 5 6