|
CoCoRiCo Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |
Buda benden olsun..
Custom Window ile yapıldı..
Windows genel uygulamaların arama tuşu olan F3 ile çalışır dileyen başla bir tuş yada komutla degiştirebilir..
- Bulundugunuz kanalda (F3 e basın) açılır..
- Nick listesinin sağ alt kösesine konumlanır.
- Gezindiğiniz kanalda da o kanal için arama kutusu olarak görünür..
- Diğer pencere ve mIRC dışındaki pencerelerde kapanır.
- Filtre edilen nick'e tıklarsanız da özel açarsınız..
vs. vs.
Şöyle görünür.. Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod: Kodu kopyalamak için üzerine çift tıklayın! alias f3 {
if $window($active) ischan {
set %fc $chan
if !$window(@🔎) { .mwin | .fnn | .timerfnn -m 0 1000 .fnn }
}
}
alias -l mwin { window -aDdHle0oDk0vz +ltfb @🔎 $calc($window(%fc).dx + $window(%fc).dw - 180) $calc($window(%fc).dy + $window(%fc).dh - 145 ) 200 200 }
alias fnn {
var %r` = $editbox(@🔎) | .clear @🔎
if $chan(%fc) {
var %i = 1
while ($nick(%fc,%i)) {
if (!%r` || $+(*,%r`,*) iswm $nick(%fc,%i)) {
;.titlebar @🔎 $iif(%r`,%fc $qt(%r`),%fc kanalında ara)
.aline @🔎 $nick(%fc,%i) }
inc %i
}
}
;pos update..
if $window(@🔎) {
window -d @🔎 $calc($window(%fc).dx + $window(%fc).dw - 180) $calc($window(%fc).dy + $window(%fc).dh - 145 ) 200 200
}
}
alias -l cfn { .timerfnn off | window -c @🔎 | unset %fc }
menu @🔎 {
dclick: /!query -n $gettok($line(@🔎,$1-,1),-1,32)
}
on *:CLOSE:@🔎: cfn
on *:ACTIVE:*: {
if $window(@🔎) && %fc != $chan && $lactive != $window(@🔎) && $active != $window(@🔎) {
if $window($active) !ischan && !$window($acitve(@🔎)) { cfn | return }
set %fc $chan | mwin | fnn
}
}
on *:APPACTIVE: if !$appactive { cfn } |
Bun kodda ise şöyledir..
koda ilave edip kendinize göre düzenleyebilirsiniz..
Kod: Kodu kopyalamak için üzerine çift tıklayın!
menu @🔎 {
/*
Kanal : %fc
Nick : $gettok($line(@🔎,$1-,1),-1,32) & $1
*/
$iif($me isop %fc,$style(1),$style(2)) Opeator
.🗨 Voice $1 : /!mode %fc +v $1
.⚒️Op $1 :/!mode %fc +o $1
-
$iif($me isop %fc,$style(1),$style(2)) 🚫Kick
.Kick $1 : /kick %fc $1 Kurallara uyun!
.Kick Neden?:/!kick %fc $1 $$?="Neden Atıyoruz!:"
-
$iif($me isop %fc,$style(1),$style(2)) 🔫 Ban
.Ban $1 : /!ban %fc $address($1),5)
.Kick Ban Neden?:/!ban -ku600 %fc $1 $$?="Neden Atıyoruz!:"
-
$iif(o isin $usermode,$style(1),$style(2)) 🔫 Servers bans
.⚠️Kill $1 : /!kill $1 Kurallara uyun!
.🚷Gline $1 :/!gzline $1 Kurallara uyun!
}
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.