Tarih: 28/05/2013 / 20:53:59 , Kod sahibi: Available
on *:text:*:#kanal-adı: {
if $regex($1,/^[!.]ekle/i) {
var %numara $iif($hget(not,0).data,$v1,1)
hadd -m not %numara $+($2-,$chr(32),$chr(24),Ekleyen:,$chr(32),$nick,$chr(24),$chr(32),Tarih/Saat:,[,$date,-,$time,])
msg # * Not'unuz listeye eklenmistir.
msg # [NOT] Numara: %numara - Mesaj: $2-
msg # -
hsave not not.ksc
}
if $regex($1,/^[!.]sirala/i) {
if $hget(not,0).data && !$hget(not) { msg # Listede suan not bulunmuyor! | return }
msg # * Not listesi listeleniyor..
var %_ 1
while $hget(not,%_).data {
msg # $+(%_,:) $token($v1,2,24) nick'inden bulunmakta -Komut: $+(Not,%_)
inc %_
}
msg # -
msg # * Not listesi sonu-
}
if $regex($1,/^[!.]not/i) {
var %numara $remove($1,!not)
if !$hget(not,%numara).data { msg # %numara ile ilgili not bulunmamakta! | return }
msg # [NOT] Numara: %numara -
msg # Not: $token($hget(not,%numara).data,1,24)
msg # - $token($hget(not,%numara).data,2,24)
msg # - $token($hget(not,%numara).data,3,24)
msg # -
msg # * Not sonu..
}
}
on *:start: {
hmake not
hload not not.ksc
}

;--- Ekle - Sil - Goster '' 3 '' set halinde hazırlanmıştır.
