|
on *:Text:!not*:?: { if $away { write $+($shortfn($mircdiraway),\,away,.,$date(dd.mm.yy) ,.txt) $nick mesaj bıraktı. Mesaj: $2- $time | msg $nick Mesajınız kaydedilmiştir. } }
on *:text:!oku:?: { if $away { var %a = $+($shortfn($mircdiraway),\,away,.,$date(dd.mm.yy) ,.txt) | var %x = $lines(%a) | var %t = $len($nick) | while %x { if $left($read(%a,%x),%t) == $nick { msg $nick $right($read(%a,%x),$+(-,$calc(%x + 22))) } | dec %x } } }
Dene bakalım. Gerçi ben denedim ama
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|