Normal Mod | Çizgisel Mod

ibonun_Laneti · (En son düzenleme: 06-06-2009 10:20 AM ibonun_Laneti.)

Bu konuyu aslında mirc script kismina yazacaktım ama bu kod normal mirc scriptlerde değilde sadece oper adminlerin Unreal ircdde saldirı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 yazayım.. Aslında verilen codeyi mirc ailases ve remote lara eklediğiniz zaman servera her yeni kullanıcı banlandığında servera banlananları status de göstermekten size özel pencere açip orda gösteriyor ve birden trojan veya proxy saldiri olduğu taktirde tüm girenler aynı anda o pencerede gösteriyor ve nickin üstüne iki kere tiklayarak direk gline atabiliyorsunuz yani mantik ?u saldiri olduğu zaman tek tek nickleri /gline nick sebeb şeklinde zline atmaya uraşmayıp saldırıyı uzun bir sürede atlatmaktansa direk nicklere iki kere tiklayarak hemen atlatabiliyorsunuz Rolleyes

Kod:

spam {

if (%LanetLiLanetLi != 1) {

%meydeymeydey = 1

mode $me +s +ckeG

echo -a Anti Spam OnLine.

halt }

elseif (%LanetLiLanetLi == 1) {

unset %LanetLiLanetLi

echo -a Anti Spam offLine

echo -a Toplam Kline say?s?: %klinecount

unset %klinecount

window -c @ConnExit

}

}

Bu kodede mirc'in 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*
}
}

Kod:

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) &gt;= 9) {

%a = $left($9,4)

%i = 0

%bukadar = 0

while (%i &lt; 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 (%LanetLiLanetLi == 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 çıkiyor karniniza ve sistem hazir olmuz oluyor bu saniyeden sonra girenler için yeni bir pencere açilacak ve bu size gösterilecektir

arkadaslar konu'yu arama
yapmadan eklemis bulunmaktayım konu verilmisse affola saygı ve sükranlarımı sunarım.