Kullanım: /thelp <
kelime>
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias thelp {
set %_thelp $1
.enable #thelp
$iif($hget(thelp),hfree thelp)
var %. 1
while $chan(%.) {
.topic $v1
inc %.
}
}
#thelp off
raw *:*: {
if $numeric = 332 {
inc %_thelpinc 1
if $regex($2,$strip($3-),/\b $+ %_thelp $+ \b/gi) {
hadd -m thelp $2 $v1
}
}
if $numeric = 333 {
if %_thelpinc = $chan(0) {
unset %_thelpinc
var %1 1
while ($hget(thelp,%1).item) {
echo -aec info *** Kanal: $v1 - %_thelp kelimesi toplam: $hget(thelp,$v1)
inc %1
}
.disable #thelp
}
}
}
#thelp end
Cevap: /thelp CIO