IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Log Okuyucu Kodunda Sorun [Yardım Gerekli] (https://www.ircforumlari.net/mirc-scripting-sorunlari/124534-log-okuyucu-kodunda-sorun-yardim-gerekli.html)

zartanyan 20 Temmuz 2008 11:20

Log Okuyucu Kodunda Sorun [Yardım Gerekli]
 
Merhaba arkadaşlar;
Alta eklediğim log okuma kodunun 13. satırında hata veriyor. Ve logları tek tek silmiyor.
Hata mesajı şu: * /sline: invalid window (line 13, logokuyucu.mrc) 13. satırdan sline @Logs kısmının s sini kalıdırınca sorun çözülüyor. Fakat yinede silmek istediğim logu tek olarak silmiyor. Toplu olarak log sildiğimde ise herhangi bir sorun yok.
Koddaki hatayı düzeltebilirseniz çok sevinirim.
Şimdiden teşekkür ederim ;)

Kodu Aldığım Adres: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

alias loader { return $findfile($logdir,*.log,0,1,aline -l @Log $nopath($1-)) }

alias viewer {
  window -Skal15 @Log 300 150 500 300 @Log Tahoma 12 | titlebar @Log Viewer
  aline 1 @Log 0,10 Logs !  $loader Log(s) Were Found
  aline 1 @Log -
  if ($1 != $null) { seefile 0 $1- }
}

alias seefile {
  if ( $isfile($2-) ) {
    loadbuf -rp @Log $+(",$2-,")
    if ( $1 == 0 ) { sline @Logs 10 | sline @Log 10 }
    else {
      sline @Log $calc($1 + 2) | sline @Log $calc($1 + 2)
      rline @Log $1 $line(@Log,$1)
    }
    if ( $fline(@Log,$nopath($2-),1,1)  ) { sline -l @Log $ifmatch }
  }
}

alias erase { var %lvar = $sline(@Log,0)
  while ( %lvar ) { .signal removefile @Log $sline(@Logs,%lvar).ln $+($logdir,$sline(@Log,%lvar)) | dec %lvar }
}

alias eraseall {
  var %lvar = $line(@Log,0,1)
  while ( %lvar ) { .signal removefile @Log %lvar $+($logdir,$line(@Log,%lvar,1)) | dec %lvar }
}

on *:signal:removefile: { .remove $+(",$3-,") | dline -l $1 $2 }

menu @Log {
  dclick: { if ( $1 ) { seefile 0 $+($logdir,$line(@Log,$1,1)) } }
  .$iif(!$sline(@Log,0),$style(2)) Erase: { erase }
  .-
  .Erase all: { eraseall }
  -
  Update: { window -c @Log | viewer }
  -
  Close: { window -c @Log }
  -
}

menu * {
Log Viewer:viewer
}



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:18.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk