Kline 2gunluk atma addonu

ZindaN — Sat, 24 Mar 2012 17:17:59 +0000

bu addon ile sunucudan 2 gun kullanıcıyı uzaklaştırabilirsiniz

irc kodu
/F2 /kline $$1 2d 7¤ 13Server kurallarına uymadığınız için uzaklaştırıldınız

küfür edeni gösteren kod

ZindaN — Sat, 24 Mar 2012 17:15:03 +0000

c kodu:
on *:input:*:if $regex($1-,/(küfür1|küfür2|küfür3)/i) { .msg #Kanal Ben, $target penceresinde eşeklik yapıyorum. Beni atın, uslandırın. Aksi takdirde rahat durmayacağım! Tşkkkkkkkkkkkkk. | halt }

Uyarılı Ban

ZindaN — Sat, 24 Mar 2012 17:14:05 +0000

Uyarılı Ban addonu
#uyarılı on
on *:text:*:#:{
if ($nick isreg $chan) {
if $istok($1-,it,32) || $istok($1-,lan,32) || $istok($1-,maymun,32) || $istok($1-,Ayı,32) || $istok($1-,köpek,32) || $istok($1-,mal,32) || $istok($1-,salak,32) || $istok($1-,aptal,32) || $istok($1-,enayi,32) || $istok($1-,?küz,32) || $istok($1-,angut,32) || $istok($1-,oğlum,32) || $istok($1-,ger?zekal?,32) || $istok($1-,sie,32) || $istok($1-,sia,32) || $istok($1-,hıyar,32) || $istok($1-,?nek,32) || $istok($1-,si@,32) || $istok($1-,uza,32) || $istok($1-,lahn,32) || $istok($1-,lanh,32) || $istok($1-,saxo,32) || $istok($1-,manyak,32) || $istok($1-,salak,32) || $istok($1-,uzaa,32) || $istok($1-,kro,32) {
if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) | msg $chan [ U y a r ı ] : $nick : Lü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 ] ] $+ < Kelimesinden Dolayi Uyarı Aldınız 2. Olarak > $+ $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

Kick Sayacı Ana Menüde

ZindaN — Sat, 24 Mar 2012 17:11:56 +0000

bu kod ile kick sayacı ana menude göreceksiniz.

irc kod:
#kicksayac on
alias kick {
if ( %kick.numara == $null ) {
set %kick.numara 1
}
kick $1- 12«( $+ 4 %kick.numara 12)»
inc %kick.numara
}

;Sayacı Sıfırlamak için /ksifir
alias ksifir {
set %kick.numara 1
}
#kicksayac end

menu channel,nicklist,menubar,chat,query {

Kick Sayacı
.Aç:.enable #kicksayac | /echo -a 12Kick Sayacı4 Açıldı.
.Kapat:.disable #kicksayac | /echo -a 12Kick Sayacı4 Kapatıldı.
.Sifirla:.ksifir | /echo -a 12Kick Sayacı4 Sıfırlandı.
}

Nick Register Addonu

ZindaN — Sat, 24 Mar 2012 17:09:58 +0000

alias regnick dialog -m regn regn
dialog regn {
title Nick Register
size -1 -1 125 205
icon $mircexe

text Şifre:,4,10 10 100 15,
edit ,5,10 30 100 20,autohs

text Email: ,6,10 60 190 15,
edit ,7,10 75 100 20,autohs

;box
box ,8,1 1 120 55
box ,9,1 49 120 55
box ,10,1 97 120 57

; button
button \”&Kayıt Et\”,11,10 160 100 20,flat ok
button \”&Kapat\”,12,10 180 100 20,flat

;text
text \”şu andaki nickiniz registerlenecektir\”,13,20 115 150 40,

}

on 1:dialog:regn:*:*:{
if ($devent == init) {
if ($did == 5) { did -a regn 5 %reg.p }
if ($did == 7) { did -a regn 7 %reg.em }
}
if ($devent == edit) {
if ($did == 5) { set %reg.p $did(5) }
if ($did == 7) { set %reg.em $did(7) }
}
if ($devent == sclick) {
if ($did == 11) { /msg nickserv register %reg.p %reg.em | /echo -a 6(12 $+ $timestamp $+ 6) 4Nickiniz Kayıt Ediliyor. }
}

mirc Ekran temizleme

ZindaN — Thu, 22 Mar 2012 17:50:22 +0000

irc kod:
f4 /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg # 0,1• | /msg #

mIRC Hesap Makinesi

ZindaN — Thu, 22 Mar 2012 17:48:57 +0000

size -1 -1 105 108
option dbu
button \”1\”, 1, 27 31 10 10
button \”2\”, 2, 37 31 10 10
button \”3\”, 3, 47 31 10 10
button \”4\”, 4, 27 41 10 10
button \”5\”, 5, 37 41 10 10
button \”6\”, 6, 47 41 10 10
button \”7\”, 7, 27 51 10 10
button \”8\”, 8, 37 51 10 10
button \”9\”, 9, 47 51 10 10
button \”0\”, 10, 27 61 30 10
button \”+\”, 11, 62 31 10 10
button \”-\”, 12, 62 41 10 10
button \”*\”, 13, 62 51 10 10
button \”/\”, 14, 62 61 10 10
button \”=\”, 15, 27 75 46 10
edit \”\”, 222, 58 7 38 10, read autohs
box \”\”, 17, 3 0 95 30
box \”\”, 18, 25 26 35 48
box \”\”, 19, 59 26 17 48
box \”\”, 20, 25 70 51 18
edit \”\”, 111, 5 7 39 10, read autohs
edit \”\”, 16, 5 17 91 10, read autohs
edit \”\”, 333, 44 7 14 10, read
button \”SiL\”, 24, 3 30 20 60
button \”Kapat\”, 25, 78 30 20 60, cancel
}

İstediğin Kanala Ame Gitmesin

ZindaN — Thu, 22 Mar 2012 17:47:00 +0000

irc kodu:
alias ame { if $1 { var %º = 1 | while $chan(%º) { if !$istok(#kanaL1 #kanaL2 #kanaL3,$v1,32) { !describe $chan(%º) $1- } | inc %º } } }

karizma yazi tipi 2011

ZindaN — Thu, 22 Mar 2012 17:45:17 +0000

irc kod
on 1:input:*:{
if ($chr(47) == $mid($1-,1,1)) || ($inpaste) || ($ctrlenter) { goto end }
if ($1- == isnum) { goto end }
var %a 0, %b, %c, %d, %e, %f
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(·,%c,·) }
else {
if (%a == $numtok($1-,32)) {
%d = $+($right(%c,1),..)
%f = $right(%d,2)
}
%e = $regsubex(%c,/(?=^| )(.)/g,$+(12,$upper(\\1),4))
%b = %b $+(%e,%f)
}
}
if (!%b) { %b = $1- }
else { say %b }
halt
:end
}

mirc Kelime tamamlama

ZindaN — Thu, 22 Mar 2012 17:43:59 +0000

irc kodu:
Kod : On 1:input:*:{
if ($1- == slm) { say Selam | halt }
if ($1- == nbr) { say Naber | halt }
if ($1- == a.s) { say aLeykum SeLam | halt }
if ($1- == s.a) { say SeLamun aLeykum | halt }
if ($1- == ok) { say Oky | halt }
if ($1- == naber) { say Naber? | halt }
if ($1- == ehu) { say ehuheuehuheuehuheu | halt }
if ($1- == hehe) { say hehehehehehhehehehehe4h | halt }
if ($1- == kib) { say Kendine iyi Bak | halt }
if ($1- == h.b) { say HoşßuLduk | halt }
if ($1- == :D) { say =D | halt }
if ($1- == h.g) { say HoşGeLdin | halt }
if ($1- == ist) { say Istanbul | halt }
if ($1- == 2le) { say 4²1Le | halt }
if ($1- == a.q) { say **** | halt }
if ($1- == aq) { say **** | halt }
if ($1- == sikerim) { say **** | halt }
if ($1- == uza) { say **** | halt }
if ($1- == piç) { say **** | halt }
if ($1- == a.e.o) { say aLLah\’a Emanet oL.. | halt }
if ($1- == kib) { say Kendine iyi Bak | halt }
if ($1- == eyw) { say EyvaLLah.. | halt }
if ($1- == :P) { say :PpPp | halt }
if ($1- == :Pp) { say :PpPp | halt }