Neler yeni
MEGAForum - Teknoloji Forumu

Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı yada giriş yapmalısınız. Forum üye olmak tamamen ücretsizdir.

GerekLi Hazir Kodlar

diShy

~ یơυℓℓεss ..
Onursal Üye
  • Üyelik Tarihi
    27 Kas 2009
  • Mesajlar
    24,120
  • MFC Puanı
    79
Statüs penceresine yansıtma.



Kod:



on *:text:*:#: { if ($me isin $1-) { .echo -s $nick size sesleniyor: \\\\" $+ $1- $+ \\\\" .echo -s Seslendi?i kanal: $chan Sunucu: $network .echo -s Saat: $asctime(hh:nn:ss) $+ . } }



Aktif oldunuz Pencereye yans?tma:



Kod:



on *:text:*:#: { if ($me isin $1-) { .echo -a $nick size sesleniyor: \\\\" $+ $1- $+ \\\\" .echo -a Seslendi?i kanal: $chan Sunucu: $network .echo -a Saat: $asctime(hh:nn:ss) $+ . } }

Belirlediginiz kanala yans?tma:

Kod:

on *:text:*:#: { if ($me isin $1-) { .msg #kanal $nick size sesleniyor: \\\\" $+ $1- $+ \\\\" .msg #kanal Seslendi?i kanal: $chan Sunucu: $network .msg #kanal Saat: $asctime(hh:nn:ss) $+ . } }





-------------------------------------------------------------------------------------------------



Kick-Kline Sayacı



Kod



alias kick { kick $1- %kicksayac | kicksayac }



alias kicksayac {

if (%kicksayac == $null) {

set %kicksayac 1



}

%kicksayac = %kicksayac + 1

halt

}







alias kline { kline $1- %klinesayac | klinesayac }



alias klinesayac {

if (%klinesayac == $null) {

set %klinesayac 1

}

%klinesayac = %klinesayac + 1

halt

}



--------------------------------------------------------------------------------------------------



Flood Koruması



Kod:



on @1:text:*:#:{

if $me !isop $chan { halt } | if $nick isop $chan { halt } var %bflood $strip($1-)

var %mflood $strip($$1)

if ($len(%bflood) >= 250 ) || ($len($1) >= 200 ) {

/mode $chan +b $address($2,2) | /kick $chan $nick 7¤ 13Flood Yasaktir2 [14!2] 7¤

}

}



----------------------------------------------------------------------------------------------------



Uyarılı Remote



Kod:



#uyar?l? on

on *:text:*:#:{

if ($nick isreg $chan) { if $istok($1-,it,32) || $istok($1-,len,32) || $istok($1-,maymun,32) || $istok($1-,MAL,32) || $istok($1-,köpek,32) || $istok($1-,mal,32) || $istok($1-,salak,32) || $istok($1-,aptal,32) || $istok($1-,enayi,32) || $istok($1-,okuz,32) || $istok($1-,Len,32) || $istok($1-,oglum,32) || $istok($1-,gerizekali,32) || $istok($1-,sie,32) || $istok($1-,sia,32) || $istok($1-,h?yar,32) || $istok($1-,t?nn,32) || $istok($1-,si@,32) || $istok($1-,uza,32) || $istok($1-,olum,32) || $istok($1-,lanh,32) || $istok($1-,saxo,32) || $istok($1-,manyak,32) || $istok($1-,salak,32) || $istok($1-,Lan,32) || $istok($1-,kro,32) {

if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) | msg $chan 4[ U y a r ? ]1 : $nick : 4Lütfen Seviyeyi Dü?ürmeyiniz Aksi Taktirde Kanaldan Uzakla?t?r?l?caks?n?z !. }

else { if (%say [ $+ [ $nick ] ] >= 1) { mode $chan +b $nick | kick $chan $nick 11,1Daha Onceden > $+ %kelime [ $+ [ $nick ] ] $+ $+ $strip($1-) $+ < Olan Yasak ve Kötü Unsur Içeren Sözcü?ü Kulland?g?n?z Için Kanaldan Uzakla?t?r?ld?n?z.. | unset %say [ $+ [ $nick ] ] | unset %kelime [ $+ [ $nick ] ] }

}

}

}

}

#uyarılı end



---------------------------------------------------------------------------------------------------------------



Tüm Kanallardan Banlama



Kod:



alias AllKick {

var %dark = 1, %dark1 = $comchan($$1,0) while (%dark
 
Üst Alt