Kod:

 

alias badnick {
if ($1 == ekle) {
hadd badnick $2
secho $2 veritabanina başarıyla eklendi
}
elseif ($1 == sil) {
if ($hfind(badnick,$2)) {
hdel badnick $2
secho $2 veritabanindan başarıyla silindi
}
else { secho $2 veritabaninda bulunamadi }
}
elseif ($1 == list) {
var %x = 1
while (%x = 7) { secho $replace(%hbadnick,$chr(1),$+($chr(32),-,$chr(32))) | unset %hbadnick }
inc %x
}
if ($numtok(%hbadnick,32) >= 1) { secho $replace(%hbadnick,$chr(1),$+($chr(32),-,$chr(32))) | unset %hbadnick }
}
else { secho hatali islem }
}
alias tara {
if ($hfind(badnick,$1)) {
mode # +b $ifmatch
}
}
alias secho {
if (!$window(@badnick)) { window -e @badnick }
echo @badnick $+($chr(40),$time,$chr(41),$chr(32),$1-)
}
on *:EXIT: hsave -o badnick badnick.htb
on *:start: {
hmake badnick 1000
if ($exists(badnick.htb)) { hsave -o badnick badnick.htb }
hload badnick badnick.htb
}

 

/badnick ekle nick <<< nick ekler
/badnick sil nick <<< nick siler
/badnick list <<< badnick listesine gozatar

/tara nick <<< aktif kanalda uygulandiginda o kanalda girilen nick mevcutsa atar.