Hazır Kodlar | Türkçe mIRC indir - Resmi mIRC indirme Sitesi

Türkçe Mirc Badnickleri otomatik olarak Kanala Sok

14 Aralık 2015 • 16:58 OxiGeN Hazır Kodlar

Türkçe Mirc Badnickleri otomatik olarak Kanala Sok Kod;

alias bad { .auser 02 $1 }
on ^*:JOIN:#:{
  if ($nick != $me) {
    if ($ulist($address($nick,-1),02,1)) {
      if (o isin $usermode) {
        mode # +b $nick | kick # $nick %logo
        sapart $nick # | sajoin $nick #Sex
      }
    }
  }
}

alias bad { .auser 02 $1 }

on ^*:JOIN:#:{

if ($nick != $me) {

if ($ulist($address($nick,-1),02,1)) {

if (o isin $usermode) {

mode # +b $nick | kick # $nick %logo

sapart $nick # | sajoin $nick #Sex

}

» Devamını Oku

Yorum yaz addon, alias, badnick, kanala join, mirc, remote, script, turkce mırc, turkirc, variable

Türkçe Mirc Domain SorguLama

10 Aralık 2015 • 23:08 OxiGeN Hazır Kodlar

Türkçe Mirc Domain SorguLama Kod:

alias ipwhois {
if ($1 == $null) {
set %temp.ad $?=\\&quot;Enter Address: \\&quot;
sockopen wip $+ $r(1,10000) completewhois.com 80
}
if ($1 != $null) {
set %temp.ad $1
sockopen wip $+ $r(1,10000) completewhois.com 80
}
}
on 1:sockopen:wip*: {
sockwrite -n $sockname POST /cgi-bin/whois.cgi?query= $+ %temp.ad HTTP/1.1
sockwrite -n $sockname Host: $sock($sockname).ip $+ $str($crlf ,2)
}
on 1:sockread:wip*:{
window -e @Whois
aline @Whois Getting Info... done.
if ($sockerr &gt; 0) return
:nextread
sockread %temp
if ($sockbr == 0) return
if (%temp == $null) %temp = -
if ($nohtml(%temp) != $null) {
aline @Whois $nohtml(%temp)
goto nextread
sockclose wip*
}
}
on 1:sockopen:wh*: {
sockwrite -n $sockname GET /whois.cgi2?d= $+ %temp.ho HTTP/1.1
sockwrite -n $sockname Host: whois.net $+ $str($crlf ,2)
}
on 1:sockread:wh*:{
if (%whoisrdy == 1) {
if (15f9 isin %temp) {
set %whoisrdy 0
}
window -e @Whois
sockread %temp
if ($nohtml(%temp) != $Null) {
aline @Whois  $+ $nohtml(%temp)
.timerss 1 3 /sockclose wh*
}
}
}
alias -l nohtml {
var %x, %i = $regsub($1-,/(^[^&lt;]*&gt;|&lt;[^&gt;]*&gt;|&lt;[^&gt;]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}

alias ipwhois {

if ($1 == $null) {

set %temp.ad $?=\\"Enter Address: \\"

sockopen wip $+ $r(1,10000) completewhois.com 80

}

if ($1 != $null) {

set %temp.ad $1

sockopen wip $+ $r(1,10000) completewhois.com 80

}

on 1:sockopen:wip*: {

sockwrite -n $sockname POST /cgi-bin/whois.cgi?query= $+ %temp.ad HTTP/1.1

sockwrite -n $sockname Host: $sock($sockname).ip $+ $str($crlf ,2)

}

on 1:sockread:wip*:{

window -e @Whois

aline @Whois Getting Info... done.

if ($sockerr > 0) return

:nextread

sockread %temp

if ($sockbr == 0) return

if (%temp == $null) %temp = -

if ($nohtml(%temp) != $null) {

aline @Whois $nohtml(%temp)

goto nextread

sockclose wip*

}

on 1:sockopen:wh*: {

sockwrite -n $sockname GET /whois.cgi2?d= $+ %temp.ho HTTP/1.1

sockwrite -n $sockname Host: whois.net $+ $str($crlf ,2)

}

on 1:sockread:wh*:{

if (%whoisrdy == 1) {

if (15f9 isin %temp) {

set %whoisrdy 0

}

window -e @Whois

sockread %temp

if ($nohtml(%temp) != $Null) {

aline @Whois $+ $nohtml(%temp)

.timerss 1 3 /sockclose wh*

}

alias -l nohtml {

var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )

return %x

}

» Devamını Oku

Yorum yaz addon, alias, domain sorgu, domain sorgulama, mirc, remote, script, turkce mırc, turkirc, variable

Mirc Away kayit | Notify gösterici

09 Aralık 2015 • 12:41 OxiGeN Hazır Kodlar

Türkçe Mirc Away kayit | Notify gösterici

;ozelinize yazilanlari kontrol eder bu
on *:text:*:?: { if $away { if !$window(@Away) { window -a @Away } | aline @Away $timestamp $+(&lt;,$nick,&gt;) $1- | close -m } }}}}
;bu ise herhangi bi kanalda ßiri sizin nickinizle ilgili bişe derse o satırı alır
on *:text:*nickiniz*:#: { if $away { if !$window(@Away) { window -m @Away } | echo @Away $timestamp $+(&lt;,$nick,&gt;) $1- ( $+ $chan $+ ) } }}
2. Notify listeme adam ekledim ama sadece echoladigi icin goremiorum aklimda kalmiyo veya ben awayken bekledigim kişi gelmismi geldiyse ne kadar kalmis felan die soruosaniz kisiyi notify listeye aşagidaki kodu ise remoteye ekleyin

on *:NOTIFY: { if !$window(@Notify) { window -m @Notify } | .aline @Notify $nick Su anda online.. Online olduğu zaman :: ( $time )
}
on *:UNOTIFY: { if !$window(@Notify) { window -m @Notify } | .echo @Notify $nick IRC den cıktı.. Offline olduğu zaman :: ( $time )

;ozelinize yazilanlari kontrol eder bu

on *:text:*:?: { if $away { if !$window(@Away) { window -a @Away } | aline @Away $timestamp $+(<,$nick,>) $1- | close -m } }}}}

;bu ise herhangi bi kanalda ßiri sizin nickinizle ilgili bişe derse o satırı alır

on *:text:*nickiniz*:#: { if $away { if !$window(@Away) { window -m @Away } | echo @Away $timestamp $+(<,$nick,>) $1- ( $+ $chan $+ ) } }}

2. Notify listeme adam ekledim ama sadece echoladigi icin goremiorum aklimda kalmiyo veya ben awayken bekledigim kişi gelmismi geldiyse ne kadar kalmis felan die soruosaniz kisiyi notify listeye aşagidaki kodu ise remoteye ekleyin

on *:NOTIFY: { if !$window(@Notify) { window -m @Notify } | .aline @Notify $nick Su anda online.. Online olduğu zaman :: ( $time )

}

on *:UNOTIFY: { if !$window(@Notify) { window -m @Notify } | .echo @Notify $nick IRC den cıktı.. Offline olduğu zaman :: ( $time )

» Devamını Oku

Yorum yaz addon, alias, away kayıt, mirc, Notify, remote, script, turkce mırc, turkirc, variable

Mirc Kanala Giren Nickleri Kaydedecek Kod

08 Aralık 2015 • 12:15 OxiGeN Hazır Kodlar

Türkçe Mirc Kanala Giren Nickleri Kaydedecek Kod

on *:join:#Sohbet:{ /write nickler.txt $nick }

1	on *:join:#Sohbet:{ /write nickler.txt $nick }

» Devamını Oku

Yorum yaz addon, alias, join, kanala giren nickleri kayıt, kayit, mirc, Nick, remote, script, turkce mırc, turkirc, variable

Türkçe Mirc Memoserv ve Sajoin Pencereleri

07 Aralık 2015 • 03:59 OxiGeN Hazır Kodlar

Türkçe Mirc Memoserv ve Sajoin Pencereleri Kod:

on ^*:notice:*:?: {
if ($nick == Operserv) {
if (!$window(@SAJOIN)) { window -en @SAJOIN }
echo 5 -t @SAJOIN Operserv ~ $1- | haltdef
}
if ($nick == Memoserv) {
if (!$window(@Memoserv)) { window -en @Memoserv }
echo 5 -t @Memoserv Memoserv ~ $1- | haltdef
}
}

on ^*:notice:*:?: {

if ($nick == Operserv) {

if (!$window(@SAJOIN)) { window -en @SAJOIN }

echo 5 -t @SAJOIN Operserv ~ $1- | haltdef

}

if ($nick == Memoserv) {

if (!$window(@Memoserv)) { window -en @Memoserv }

echo 5 -t @Memoserv Memoserv ~ $1- | haltdef

}

» Devamını Oku

Yorum yaz addon, alias, MemoServ, memoserv ve sajoin, mirc, remote, sajoin, script, turkce mırc, turkirc, variable

Mirc Proxy Tarama

05 Aralık 2015 • 20:06 OxiGeN Hazır Kodlar

Türkçe Mirc Proxy Tarama Kod;

on ^*:snotice:*: {
if (*client*connect*on*port* iswm $1-) {
tr $remove($gettok($10,2,64),$chr(40),$chr(41),$chr(6 4))
}
halt
}
alias po {
;portlar buraya
return 21 22 23 33 47 56 54 80 70 1046 1080 1182 1183 1184 1188 1214 1278 1279 1745 1795 2124 2172 2173 2174 2175 2301 3128 3124 3127 4480 5463 6667 6588 8080 8000 8001 8118 8888 8922 10102 26260 31337 44322
}
alias tr {
set %prx $ticks | .dns $1
set %ip $1 | var %pi = 1
while (%pi &lt;= $gettok($po,0,32)) {
var %ki = $gettok($po,%pi,32)
sockopen $+(prx-,$md5($+($r(a,z),$r(1,999),$ticks,$r(A,Z)))) %ip %ki
inc %pi
}
echo 4Taranan portlar:3 $gettok($po,0,32) (Ad.) :2 $po
}
on *:sockopenrx-*: {
if ($sockerr) { sockclose $sockname | return }
echo 2 $chr(32)4PORT: $sock($sockname).port 4TIP: $sock($sockname).type 4AÇIK\\\\KAPALI: $portfree($sockerr) 4HATA\\\\WS_Err: $sock($sockname).wserr 4MESAJ\\\\WS_Msg: $sock($sockname).wsmsg
if ($portfree($sockerr)) &amp;&amp; ($status(connected)) &amp;&amp; (o isincs $usermode) {
;ofline denemeden sonra sil..?! ($status(connected)
gzline $+(*@,$sock($sockname).ip) Proxy yasakt?r. 1D
}
.sockclose $sockname
}
on *:sockreadrx-*:{
if ($sockerr &gt; 0) { echo :HATA: $sock($sockname).wserr | return }
; echo 4 -s :---&gt; $sock($sockname).ip $sock($sockname).port
sockclose $sockname
}
on *:dns:{
if (%prx) {
var %di = $dns(0)
while (%di &gt; 0) {
echo 2 $chr(32) 4DNS: $dns(%di) 4ADRES: $dns(%di).addr \\\\ $dns(%di).ip
dec %di
}
unset %prx | unset %ip
halt
}
unset %prx | unset %ip
}

on ^*:snotice:*: {

if (*client*connect*on*port* iswm $1-) {

tr $remove($gettok($10,2,64),$chr(40),$chr(41),$chr(6 4))

}

halt

}

alias po {

;portlar buraya

return 21 22 23 33 47 56 54 80 70 1046 1080 1182 1183 1184 1188 1214 1278 1279 1745 1795 2124 2172 2173 2174 2175 2301 3128 3124 3127 4480 5463 6667 6588 8080 8000 8001 8118 8888 8922 10102 26260 31337 44322

}

alias tr {

set %prx $ticks | .dns $1

set %ip $1 | var %pi = 1

while (%pi <= $gettok($po,0,32)) {

var %ki = $gettok($po,%pi,32)

sockopen $+(prx-,$md5($+($r(a,z),$r(1,999),$ticks,$r(A,Z)))) %ip %ki

inc %pi

}

echo 4Taranan portlar:3 $gettok($po,0,32) (Ad.) :2 $po

}

on *:sockopenrx-*: {

if ($sockerr) { sockclose $sockname | return }

echo 2 $chr(32)4PORT: $sock($sockname).port 4TIP: $sock($sockname).type 4AÇIK\\\\KAPALI: $portfree($sockerr) 4HATA\\\\WS_Err: $sock($sockname).wserr 4MESAJ\\\\WS_Msg: $sock($sockname).wsmsg

if ($portfree($sockerr)) && ($status(connected)) && (o isincs $usermode) {

;ofline denemeden sonra sil..?! ($status(connected)

gzline $+(*@,$sock($sockname).ip) Proxy yasakt?r. 1D

}

.sockclose $sockname

}

on *:sockreadrx-*:{

if ($sockerr > 0) { echo :HATA: $sock($sockname).wserr | return }

; echo 4 -s :---> $sock($sockname).ip $sock($sockname).port

sockclose $sockname

}

on *:dns:{

if (%prx) {

var %di = $dns(0)

while (%di > 0) {

echo 2 $chr(32) 4DNS: $dns(%di) 4ADRES: $dns(%di).addr \\\\ $dns(%di).ip

dec %di

}

unset %prx | unset %ip

halt

}

unset %prx | unset %ip

}

» Devamını Oku

Yorum yaz addon, alias, mirc, Proxy, proxy tarama, remote, script, tarama, turkce mırc, turkirc, variable

Cinsel Kanal Atma ve Uyarma Kodu

04 Aralık 2015 • 17:06 OxiGeN Hazır Kodlar

Türkçe Mirc Cinsel Kanal Atma ve Uyarma Kodu

raw 319: *: (
* Cinsellik * iswm $ 3 - | | * gay * iswm $ 3 - | | * Lezbiyen * iswm $ 3 - (set% ufuk $ 2 | e?er. Timer 1 1 ufuks)
)
alias ufuks (
var% t 1
% T <= $ comchan (% ufuk, 0) () (süre
eğer beni (% ufuk,% t) ($ comchan isop $
modu $ comchan (% ufuk,% t) + b% ufuk | ()% ufuk 4Cinsel 1içerikli Kanallardan ihtisas Grubu Kanala Giriş $ comchan kick Yasaktır.
inc% t
)
)
)
* Doğum: join: # yudum: (
whois $ nick
)

raw 319: *: (

)

alias ufuks (

var% t 1

% T <= $ comchan (% ufuk, 0) () (süre

eğer beni (% ufuk,% t) ($ comchan isop $

modu $ comchan (% ufuk,% t) + b% ufuk | ()% ufuk 4Cinsel 1içerikli Kanallardan ihtisas Grubu Kanala Giriş $ comchan kick Yasaktır.

inc% t

)

* Doğum: join: # yudum: (

whois $ nick

)

» Devamını Oku

Yorum yaz addon, alias, Ban, cinsel içerik, cinsellik, kick, mirc, remote, script, turkce mırc, turkirc, variable

« 1 … 4 5 6 7 8 … 63 »