Bu konuyu aslında mirc script k?sm?na yazacakt?m ama bu kod normal mirc scriptlerde de?ilde sadece oper adminlerin Unreal ircdde sald?r?dan korunma amaçl? oldu?u için buraya yazmay? uygun gördüm size önce kodun ne i?e yarad???n? söliyim sonra kodu yaz?y?m.. A??a??da verilen codeyi mirc ailases ve remote lara ekledi?iniz zaman servera her yeni kullan?c? ba?land???nda servera ba?lananlar? status de göstermekten size özel pencere aç?p orda gösteriyor ve birden trojan veya proxy sald?r? oldu?u taktirde tüm girenler ayn? anda o pencerede gösteriyor ve nickin üstüne iki kere t?klayarak direk gline atabiliyorsunuz yani mant?k ?u sald?r? oldu?u zaman tek tek nickleri /gline nick sebeb ?eklinde zline atmaya ura??p sald?r?y? uzun bir sürede atlatmaktansa direk nicklere iki kere t?klayarak hemen atlatabiliyorsunuz
Bu code mirc in aliaseslar?na eklenecektir
spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline say?s?: %klinecount
unset %klinecount
window -c @ConnExit
}
}
Bu kodede mircin remote lerine eklenecektir
menu @ConnExit {
dclick: {
%satir = $line(@ConnExit, $1)
%glineho = $pos(%satir,@,1) + 1
%hede = $pos(%satir,[,1) - 2
%bukadar = %hede - %glineho
%glinehoo = $mid(%satir, %glineho, %bukadar)
aline -c4 @ConnExit G-Line %glinehoo
dline @ConnExit $1
gline *@ $+ %glinehoo +90d : Spam
unset %satir
unset %hede
unset %bukadar
unset %glineho*
}
}
On ^1:SNOTICE:*connecting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c7 @ConnExit $4-
if ($len($9) >= 9) {
%a = $left($9,4)
%i = 0
%bukadar = 0
while (%i < 4) {
inc %i
%b = $mid(%a, %i,1)
if (%b isin qwrtypsdfghjklzxcvbnm) {
inc %bukadar
}
}
if (%bukadar == 4) {
%glineho = $pos($10,@,1) + 1
%glinehos = $mid($10, %glineho, $len($10) - 1)
%uzun = $len(%glinehos) - 1
%glinehost = $left(%glinehos, %uzun)
aline -c4 @ConnExit G-line $9 %glinehost
gline *@ $+ %glinehost +365d : Spam
unset %glineho
unset %glinehos
unset %uzun
unset %glinehost
inc %glinecount
}
unset %bukadar
}
}
haltdef
}
On ^1:SNOTICE:*exiting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c12 @ConnExit $4-
haltdef
}
}
Bu codeleri ekledikten sonra mircde önce /remote on sonrada /spam yaz?yorsunuz e?er ba?ar?l? bir ?ekilde uygulayabildiyseniz anti spam online diye bir msg ç?k?yor kar??n?za ve sistem haz?r olmu? oluyor bu saniyeden sonra girenler için yeni bir pencere aç?lacak ve bu size gösterilecektir
Bu code mirc in aliaseslar?na eklenecektir
spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline say?s?: %klinecount
unset %klinecount
window -c @ConnExit
}
}
Bu kodede mircin remote lerine eklenecektir
menu @ConnExit {
dclick: {
%satir = $line(@ConnExit, $1)
%glineho = $pos(%satir,@,1) + 1
%hede = $pos(%satir,[,1) - 2
%bukadar = %hede - %glineho
%glinehoo = $mid(%satir, %glineho, %bukadar)
aline -c4 @ConnExit G-Line %glinehoo
dline @ConnExit $1
gline *@ $+ %glinehoo +90d : Spam
unset %satir
unset %hede
unset %bukadar
unset %glineho*
}
}
On ^1:SNOTICE:*connecting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c7 @ConnExit $4-
if ($len($9) >= 9) {
%a = $left($9,4)
%i = 0
%bukadar = 0
while (%i < 4) {
inc %i
%b = $mid(%a, %i,1)
if (%b isin qwrtypsdfghjklzxcvbnm) {
inc %bukadar
}
}
if (%bukadar == 4) {
%glineho = $pos($10,@,1) + 1
%glinehos = $mid($10, %glineho, $len($10) - 1)
%uzun = $len(%glinehos) - 1
%glinehost = $left(%glinehos, %uzun)
aline -c4 @ConnExit G-line $9 %glinehost
gline *@ $+ %glinehost +365d : Spam
unset %glineho
unset %glinehos
unset %uzun
unset %glinehost
inc %glinecount
}
unset %bukadar
}
}
haltdef
}
On ^1:SNOTICE:*exiting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c12 @ConnExit $4-
haltdef
}
}
Bu codeleri ekledikten sonra mircde önce /remote on sonrada /spam yaz?yorsunuz e?er ba?ar?l? bir ?ekilde uygulayabildiyseniz anti spam online diye bir msg ç?k?yor kar??n?za ve sistem haz?r olmu? oluyor bu saniyeden sonra girenler için yeni bir pencere aç?lacak ve bu size gösterilecektir
» AtakaN_05 Daha neolsun
» Server de ki Gorevkilerin hakkın da
» Nohutlu Gurcu Çorbası
» din büyüklerimizden güzel sözler
» salatı tefriciye'nin hukmu nedir?
» ibâdet nedir
» PEYGAMBERİ ANLAMAK SÜNNETULLAH'IN ÇEMBERİNDEN GEÇER.
» Tevbe - islami şiir - Dini video klip