menu channel {
$iif($active != status,$xu($chan) ))
.$xu($chan) $+ 's Kullan?labilir $xb($xa($chan)): echo -a $xa
.-
..Özel
...CTCP( +f [5c#M3]=7 ):/mode # +f [5c#M3]:7
...Flood GiriÅŸ( +f [6j#R3]=4 ):/mode # +f [6j#R3]:4
...KNOCK( +f [4k]=8 ):/mode # +f [4k]:8
...Mesaj Flood Genel( +f [10m#m5]=6 ):/mode # +f [10m#m5]:6
...Nick DeÄŸiÅŸtirme( +f [3n#N1]=10 ):/mode # +f [3n#N1]:10
...Mesaj Flood 1 kullancı( +f [5t#b]=5):/mode #kanaladı +f [5t#b]:10
.-
..$iif(n isincs $chan(#).mode,$style(1)) +n (Kanalda bulunmayan birinden gelecek mesajlarin bloklandigi kanal): if (n isincs $chan(#).mode) { mode # -n } | else { mode # +n }
..$iif(t isincs $chan(#).mode,$style(1)) +t (Sadece +hoaq kiplerini almis kullanicilarin /topic komutunu kullanabilecegi kanal): if (t isincs $chan(#).mode) { mode # -t } | else { mode # +t }
..$iif(s isincs $chan(#).mode,$style(1)) +s (Gizli bir kanal): if (s isincs $chan(#).mode) { mode # -s } | else { mode # +s }
..$iif(p isincs $chan(#).mode,$style(1)) +p (Ozel bir kanal): if (p isincs $chan(#).mode) { mode # -p } | else { mode # +p }
..$iif(i isincs $chan(#).mode,$style(1)) +i (Sadece davetle girilebilen kanal): if (i isincs $chan(#).mode) { mode # -i } | else { mode # +i }
..$iif(m isincs $chan(#).mode,$style(1)) +m (Sadece +vhoaq kiplerini almis kullanicilarin konusabilecegi kanal ): if (m isincs $chan(#).mode) { mode # -m } | else { mode # +m }
..$iif(l isincs $chan(#).mode,$style(1)) +l (Kanala girebilicek olan maximum kullanici sayisini belirler $chr(8) $chan(#).limit ): if (l isincs $chan(#).mode) { mode # -l } | else { mode # +l $$?=" $m(237) " }
..$iif(k isincs $chan(#).mode,$style(1)) +k (<anahtar> = Kanala giris icin gereken anahtar $chr(8) $chan(#).key ): if (k isincs $chan(#).mode) { mode # -k $chan(#).key } | else { mode # +k $$?=" $m(238) " }
..$iif(R isincs $chan(#).mode,$style(1)) +R (Sadece kayitli (+r) kullanicilarin girebilecegi kanal.): if (R isincs $chan(#).mode) { mode # -R } | else { mode # +R }
..$iif(Q isincs $chan(#).mode,$style(1)) +Q (Kick atilmayan kanal.): if (Q isincs $chan(#).mode) { mode # -Q } | else { mode # +Q }
..$iif(N isincs $chan(#).mode,$style(1)) +N (Nick degisikligi yapilamayan kanal): if (N isincs $chan(#).mode) { mode # -N } | else { mode # +N }
..$iif(M isincs $chan(#).mode,$style(1)) +M (Sadece kayitli (+r) veya voice'i olan (+v) kullanicilarin konusabilecegi kanal): if (M isincs $chan(#).mode) { mode # -M } | else { mode # +M }
..$iif(Y isincs $chan(#).mode,$style(1)) +Y (Yasak kelimelerin sansurlenecegi kanal): if (Y isincs $chan(#).mode) { mode # -Y } | else { mode # +Y }
..$iif(g isincs $chan(#).mode,$style(1)) +g (Yasak kelimelerin sansurlenecegi kanal): if (g isincs $chan(#).mode) { mode # -g } | else { mode # +g }
..$iif(C isincs $chan(#).mode,$style(1)) +C (CTCp metinlerini engeller): if (C isincs $chan(#).mode) { mode # -C } | else { mode # +C }
..$iif(L isincs $chan(#).mode,$style(1)) +L #kanal2 (Kanal linkleme. (kanal dolu ise, sonraki kullanici otomatik olarak <kanal2> girer.)): if (L isincs $chan(#).mode) { mode # -L } | else { mode # +L $$?="Yönlendirilecek Kanal" }
..$iif(f isincs $chan(#).mode,$style(1)) +f ([*]<satir>:<saniye> = Flood korumasi.): if (f isincs $chan(#).mode) { mode # -f } | else { mode # +f $$?=" satır:saniye 3:5 " }
..$iif(u isincs $chan(#).mode,$style(1)) +u (Kanal yonetici kiplerinin gizli oldugu kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }
..$iif(D isincs $chan(#).mode,$style(1)) +D (/me veya /ame mesajlarinin kanala gonderilmesini engeller): if (D isincs $chan(#).mode) { mode # -D } | else { mode # +D }
..$iif(c isincs $chan(#).mode,$style(1)) +c (Kanal icerisinde renk kullanimini engeller): if (c isincs $chan(#).mode) { mode # -c } | else { mode # +c }
..$iif(A isincs $chan(#).mode,$style(1)) +A (Sadece Sunucu/Ag yoneticilerinin girebilecegi kanal. (Yoneticiler icin.)): if (A isincs $chan(#).mode) { mode # -A } | else { mode # +A }
..$iif(z isincs $chan(#).mode,$style(1)) +z (Sadece Guvenli Baglanti (SSL) kullananlarin girebilecegi kanal): if (z isincs $chan(#).mode) { mode # -z } | else { mode # +z }
..$iif(K isincs $chan(#).mode,$style(1)) +K (KNOCK komutuna izin verilmeyen kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }
..$iif(O isincs $chan(#).mode,$style(1)) +O (Sadece IRCoplarin girebilecegi kanal (Yoneticiler icin.) ): if (K isincs $chan(#).mode) { mode # -K } | else { mode # +K }
..$iif(S isincs $chan(#).mode,$style(1)) +S (Renkli yazilarin, renkli kodlardan arindirilip kanala gonderilmesini saglar): if (S isincs $chan(#).mode) { mode # -S } | else { mode # +S }
..$iif(V isincs $chan(#).mode,$style(1)) +V (INVITE 'in kapali oldugu kanal): if (V isincs $chan(#).mode) { mode # -V } | else { mode # +V }
..$iif(T isincs $chan(#).mode,$style(1)) +T (Noticenin komutunun kullanilamayacagi kanal): if (T isincs $chan(#).mode) { mode # -T } | else { mode # +T }
..$iif(u isincs $chan(#).mode,$style(1)) +u (Kanal yonetici kiplerinin gizli oldugu kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }
..$iif(V isincs $chan(#).mode,$style(1)) +V (Kanalda /invite komutunun kullanımını engeller.): if (V isincs $chan(#).mode) { mode # -V } | else { mode # +V }
-
}
alias -l xc return $chan($chan).mode
alias -l xa return $chanmodes
alias -l xs return $style($iif($1 isincs $xc,5,4))
alias -l xm return mode $chan $+($iif($1 isincs $xc,-,+),$1)
alias -l xu return $replace($1,$left($1,2),$upper($left($1,2)))
alias -l xb return $+($chr(91),$1,$chr(93))
alias -l xl return $replace($remove($nick($chan,$1).pnick,$1),+,v,%,h,@,o,&,a,~,q)
alias -l xr return
alias -l xi {
if (!$1) { return }
var %a = $left($nick($chan,$1).pnick,1), %b = $replace(%a,~,Owner,&,Admin,@,Operator,%,Half Operator,+,Voiced), %c
if ($prop == l) { %c = $xb($+(%a,$chr(32),%b)) }
if ($prop == h) { %c = $xb($phost($1)) }
if ($prop == n) { %c = $xb($pident($1)) }
if ($prop == i) { %c = $xb($pidle($1)) }
if ($prop == c) { %c = $xb($replace($comchans($1),$chr(32),$chr(44))) }
if ($prop == a) { %c = $xb($address($1,5)) }
return %c
}
