notices window

By CodeProphet on Mar 29, 2007

this will help yew keep your notices in one place so yew wont miss a notice and its easy to reply via notice to the people who noticed yew by clicking on their nickname and typing your notice msg in the editbox in the same window :=D

on ^*:notice:*:?:{
  if (!$window(@notices)) { window -mel20 @notices }
  if (. !isin $nick) && (????serv !iswm $nick) && ($network != $nick) {
    echo -m @Notices $+(5-,$nick,-) $1- | .linesep @notices | notices $nick
    halt
  }
}
alias ln return $line(@notices,$1,1)
alias notices {
  if ($ln(0) = 0) { aline -l @notices $1 | sline -l @notices 1 | halt }
  unset %notices2 
  set %notices $ln(0)
  while (%notices) {
    if ($1 != $ln(%notices)) { inc %notices2 }
    if ($1 = $ln(%notices)) { sline -l @notices %notices | halt }    
    dec %notices
  }
  if (%notices2 = $ln(0)) { aline -l @notices $1   }
}
on *:input:@notices:{
  if ($left($1,1) != /) {
.notice $sline(@notices,1) $1- | echo -a 2* notice sent to $+(",$sline(@notices,1),") ->12 $1- | .linesep @notices 
  }
}

Comments

Sign in to comment.
DaDealer   -  Nov 23, 2008

I modified yours some, But gave you credit for the real work.
http://www.hawkee.com/snippet/5376/

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.