menu channel,status,menubar {
® KüFüR KoRuMa
.GösTeR:.dialog -m king king
.Aç:.enable #real | .enable #real2 | echo -a 9,1Korumalar Aktif Edildi Lütfen Ban Ayarlarınız Kontrol Edinizzz!!!…
.Kapat:.disable #real | .disable #real2 | echo -a 8,1 Korumalar Şuanda Pasif Konumda….
}
dialog king {
title ” . . . . . : : : : : Küfür Koruma : : : [...]
on *:open:?:*:{
msg $nick 2Selam4 $nick
msg $nick 2Bugün4 $date 2ve Saat 4 $time(HH:nn.ss)
msg $nick 2Konuşmadığım Süre 4 $duration($idle)
msg $nick 2Toplam Açılan Özel Pencerem 4Sayısı %q!
inc %q!
msg $nick 2Şu an Özelimdeki4 $+($query(0),.) 2Kişisin Müsait Olduğumda Cevap Vereceğim
msg $nick 2Lütfen 4Op2, 4Voice2, 4Oper 2istemeyiniz istemeniz Durumunda Direkt Olarak ignore Edileceksiniz4.2IRServisler iLe iLgiLi Sorunlariniz için 4#help [...]
mIRC’ınızda remote bölümüne (alt+r) ekleyiniz.
on *:input:*:if $istok(channel chat query,$window($active).type,32) && /* !iswm $1 { say $bold($1-) | halt }
alias bold return $regsubex($1-,/(?<=^| )(.)/g,$+($chr(2),\1,$chr(2)))
mIRC’ınızda Remote bölümüne (alt+r) ekledikten sonra ;
“/remote on” komutu ile remotelerin aktif durumda olduğundan emin olunuz..
on *:op:#: { if $opnick == $me { msg # $read(op.txt) } }
on *:voice:#: { if $voicenick == $me { msg # $read(voice.txt) } }
on *:halfop:#: { if $halfop == $me { msg # $read(halfop.txt) } }
alias cancalc { dialog -m cancalc cancalc }
dialog cancalc {
title “..::| Coded By BeeLze |::..”
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 [...]
alias ostat ostats #
alias -l zecho echo -a $+ $colour(info) $+ *** $1-
alias -l ostats_check_type if ($opent == null) || ($opent !isnum) || ($opent < 0) || ($opent > 1) { .disable #ostats_Open_Desktop 0 }
alias -l qtime .timerQTIME $+ $1 off | .timerQTIME $+ $1 1 0 $1-
alias -l getpercent return $round($calc($1 / [...]
raw 401:*: { msg #nerden $2 : Nick’i online degil! }
alias nerden {
set %ip $1
sockclose nerden
sockopen nerden www.ripe.net 80
}
on *:sockopen:nerden:{
sockwrite -n $sockname GET /fcgi-bin/whois?form_type=simple&full_query_string=&searchtext= $+ %ip $+ &submit.x=15&submit.y=7 HTTP/1.1
sockwrite -n $sockname Host: www.ripe.net $+ $crlf $+ $crlf
}
on *:sockread:nerden:{
sockread %ğ
if (descr: isin %ğ) && (TurkTelecom !isin %ğ) { msg #nerden 4 $+ $replace(%ğ,descr,şehir) [...]
;Günlük Fal addonı, kodlayan: ‘el33t’
;Günlük falınıza bakmak için “/günlükfal” yazınız, ya da popupslardaki Günlük Fal’a tıklayınız.
on *:LOAD:echo 12 -st > Günlük Fal addonını yüklediniz. “/günlükfal” yazarak yada popupslardaki Günlük Fal’a tıklayarak falınıza bakabilirsiniz.
menu status,menubar,channel {
-
Günlük Fal:günlükfal
}
alias günlükfal { if !$sock(muneccim) { if $dialog(sa_gunlukfal) { dialog -x sa_gunlukfal } | dialog -ma [...]
Kanala girdiği tespit edilen clone’lar @clone isimli pencerede gösterilir,
bu pencere üzerinde tek tıklama ile cloneları atabilirsiniz;
on *:join:*: {
%clones = $ialchan($wildsite,#,0)
if ( %clones > 2 ) {
var %count = 1
set %clone.nicks –>
while (%count <= %clones) {
%clone.nicks = %clone.nicks $ial($wildsite,%count).nick
inc %count
}
c.yaz 4Clone Tesbit Edildi %clones tane: Kanal: # Nickler: 3 $remove(%clone.nicks,–>) 4Ceza: K-Ban Gline }
}
alias C.yaz { if !$window(@clone) { window @clone } | aline @clone $1- }
on ^*:HOTLINK:*GLine*:@clone: [...]
Badnick Koruması;
Kodlayan: BeeLze
on *:join:#:{
if (anas isin $nick) || (anan isin $nick) || (sike isin $nick) || (soka isin $nick) || (siki isin $nick) || (evli isin $nick) || (got isin $nick) || (yarak isin $nick) || (yarrak isin $nick) || (orus isin $nick) || (oros isin $nick) || (kont isin $nick) || [...]