turkce mırc Türkçe mIRC indir - Resmi mIRC indirme Sitesi

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

Whois Uyarısı

03 Aralık 2015 • 18:42 OxiGeN Hazır Kodlar

Türkçe Mirc Whois Uyarısı

on *:snotice:*/whois*on*you*:{
echo -a 6 $2 5 Whoisiniz Kontrol Ediliyor…
notice $2 14 4Dikkat: Başkalarının Özelini Karıştırmamalısın.6 $2
}
on ^*:snotice:*: {
if whois on you isin $1- {
inc -u10 %whois. [ $+ [ $1 ] ] 1
if %whois. [ $+ [ $1 ] ] >= 2 {
kill $2 0,4 .Whoisci .
}
}
}

on *:snotice:*/whois*on*you*:{

echo -a 6 $2 5 Whoisiniz Kontrol Ediliyor…

notice $2 14 4Dikkat: Başkalarının Özelini Karıştırmamalısın.6 $2

}

on ^*:snotice:*: {

if whois on you isin $1- {

inc -u10 %whois. [ $+ [ $1 ] ] 1

if %whois. [ $+ [ $1 ] ] >= 2 {

kill $2 0,4 .Whoisci .

}

» Devamını Oku

Yorum yaz addon, alias, mirc, remote, script, turkce mırc, turkirc, variable, whois, whois uyarısı

Nick Değişim

03 Aralık 2015 • 18:39 OxiGeN Hazır Kodlar

Türkçe Mirc Nick Değişim On 1:input:*:{ if ($1 == !degis) { msg $chan 0,18H9e7m11e13n 8D7e8g9i7ş9i7yo8ru11m .. .nick Test halt } }

» Devamını Oku

Yorum yaz addon, alias, mirc, nick değiştirme, remote, script, turkce mırc, turkirc, variable

Nick Takip

02 Aralık 2015 • 14:20 OxiGeN Hazır Kodlar

Türkçe Mirc Nick Takip

on 1:connect:{ .IAL On | takip + 300 }
alias takip {
if $1 == + { $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) }
else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı ! }
}
#Takip on
on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,3 2),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) + $nick,$nick)) }
on !^*:JOIN:#:{
if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 4Takip Raporu:12 $nick 5nickinin %cSj saniye içinde kullandığı nickler:14 $hget(Takip,$address($nick,2)) }
if $gettok($hget(Takip,$address($nick,2)).data,0,43) > 3 { ban -k $chan $nick 2 Nick Change }
}
#Takip end

on 1:connect:{ .IAL On | takip + 300 }

alias takip {

if $1 == + { $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) }

else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı ! }

}

#Takip on

on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,3 2),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) + $nick,$nick)) }

on !^*:JOIN:#:{

if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 4Takip Raporu:12 $nick 5nickinin %cSj saniye içinde kullandığı nickler:14 $hget(Takip,$address($nick,2)) }

if $gettok($hget(Takip,$address($nick,2)).data,0,43) > 3 { ban -k $chan $nick 2 Nick Change }

}

#Takip end

» Devamını Oku

Yorum yaz addon, alias, mirc, nick takip, remote, script, turkce mırc, turkirc, variable

mIRC /sread Remote Okuma

02 Aralık 2015 • 11:50 OxiGeN Hazır Kodlar

Bilgi: /sread komutu ile mIRC’inizde yüklü remotelerin listelendiği bir combo açılır ve listeden seçtiğiniz remote dosyası ile aynı isimde bir pencere oluşur ve remote sayfası olduğu gibi o pencereye yansır. Kullanımı:

/sread

sread {
%remotes = $input(List, oem, Remotes, [ $left($regsubex($str(.,$script(0)),/./g,$nopath($script(\n)) $+ $chr(44)),-1) ] )
%win = @ $+ %remotes
window -en %win
loadbuf -r %win $shortfn($findfile($mircdir,%remotes,1) )
}

/sread

sread {

%remotes = $input(List, oem, Remotes, [ $left($regsubex($str(.,$script(0)),/./g,$nopath($script(\n)) $+ $chr(44)),-1) ] )

%win = @ $+ %remotes

window -en %win

loadbuf -r %win $shortfn($findfile($mircdir,%remotes,1) )

}

» Devamını Oku

Yorum yaz hazır kodlar, mirc, okuma, remote, scripting, turkce mırc

Türkçe Mirc Clone KorumaSı

01 Aralık 2015 • 13:08 OxiGeN Hazır Kodlar

Türkçe Mirc Clone KorumaSı

menu status,menubar, {
.-
.• © Turkirc Koruma !
..• Açık !:.enable #sericlone | .echo -a 0,4 Clone Saldirisi Korumasi AÇıldi. %logo
..• Kapalı !:.disable #sericlone | .echo -a 0,4 Clone Saldirisi Korumasi Kapatildi.. %logo
.-
}

#sericlone on
on *:snotice:*:{
if *Client*connecting*on* iswm $1- {
.timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 2 {
.gzline $+(*@,$gettok($gettok($10,2,64),1,41)) 30d :
unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
}
}
}

#sericlone end

menu status,menubar, {

..• Açık !:.enable #sericlone | .echo -a 0,4 Clone Saldirisi Korumasi AÇıldi. %logo

..• Kapalı !:.disable #sericlone | .echo -a 0,4 Clone Saldirisi Korumasi Kapatildi.. %logo

}

#sericlone on

on *:snotice:*:{

if *Client*connecting*on* iswm $1- {

.timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]

inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]

if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 2 {

.gzline $+(*@,$gettok($gettok($10,2,64),1,41)) 30d :

unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]

}

#sericlone end

» Devamını Oku

Yorum yaz addon, alias, clone, clone koruma, mirc, remote, script, turkce mırc, turkirc, variable

« 1 … 6 7 8 9 10 … 68 »