Pasted

alias note.add { 
  if ($hget(jnotes) != jnotes) { hmake jnotes } 
  hadd jnotes $1 $2- 
  echo -at Note Added for $1  $+ $2- $+ . 
} 
 
alias note.del { 
  var %i = 1 
  while (%i <= $hget(jnotes,0).item) { 
    if ($hget(jnotes,%i).item == $1) { 
      hdel jnotes $1 
      echo -at Note Deleted for $1 
    } 
    inc %i 
  } 
} 
 
alias notes { 
  echo $color(notice) -at Note System help 
  echo $color(notice) -at /note.list               :: Show the notes added to the database. 
  echo $color(notice) -at /note.del <nick>         :: Delete a note from the database. 
  echo $color(notice) -at /note.add <nick> <info>  :: Add some infos to the database 
  echo $color(notice) -at /note.credits            :: Informations about the author. 
  echo $color(notice) -a Example /note.add $me I am really hot, and you know it!  
} 
 
alias note.credits { 
  echo -at This script was written by xplorer@live.ca 
  echo -at You can find me on /server -m irc.undernet.org -j #mircscripting 
  echo -at Feel free to modify it as you wish, but it would be nice to send me your copy, so i could get another version out. 
  echo -at Improvements are allways welcomed. 
} 
 
alias note.list { 
  window -k0 @Notes 10 10 
  aline @Notes [Listing Join notes Database] 
  .timer 1 3 aline @Notes 4Double-Click in this window to close it. 
  var %i = 1 
  if ($hget(jnotes)) { 
    while (%i <= $hget(jnotes,0).item) { 
      aline @Notes 4,1[ $+ $hget(jnotes,%i).item $+ 4]: $hget(jnotes,$hget(jnotes,%i).item) 
      inc %i 
    } 
  } 
} 
 
on *:EXIT:{ hsave jnotes jnotesystem.txt } 
on *:DISCONNECT:{ hsave jnotes jnotesystem.txt } 
on *:START:{ hmake jnotes | hload jnotes jnotesystem.txt } 
 
on ^*:JOIN:#:{ 
  var %i = 1 
  while (%i <= $hget(jnotes,0).item) { 
    if ($nick == $hget(jnotes,%i).item) { 
      echo $color(join) $chan $timestamp * Joins: $nick ( $+ $gettok($address($nick,5),2,33) $+ )
      echo $color(notice) $chan ### [Note] $+([,$nick,]) - $hget(jnotes,$nick) 
      haltdef
    } 
    inc %i 
  } 
} 
menu @notes { 
  dclick: window -c @notes 
}