############################################################################
# Niinuska Help
############################################################################
set nn_message "Niinuska Help v0.1 by ccr/TNSP"
set nn_preferredmsg "PRIVMSG"

putlog "$nn_message"
bind pub - !help nn_pubmsg
bind pub - !apua nn_pubmsg

# -------------------------------------------------------------------------
proc nn_smsg {udest umsg} {
  global nn_preferredmsg

  putserv "$nn_preferredmsg $udest :$umsg"
}


# -------------------------------------------------------------------------  
proc nn_pubmsg {nick uhost hand chan args} {
  if {$args == "{}" || $args == ""} { set args $hand }

  nn_smsg $chan "Lisätietoja: http://tnsp.org/irc/readme.php"
  nn_smsg $chan "!sää \[paikka|minmax\] ; !urlfind <+sana|-sana|%käyttäjä> ; !tj \[käyttäjä\] ; !tjaamut \[-\]vuorokaudet \[\[-\]tunnit\]"
  nn_smsg $chan "!laske <kaava> (\002HUOM! Pyöristää vakiona lähimpään kokonaislukuun, käytä yhtä desimaalikua vaihtaaksesi tarkkuuden\002)"
  nn_smsg $chan "!spede \[nro\] ; !spedefind <+sana|-sana|%käyttäjä> ; !mn \[nro\] ; !mnfind <+sana|-sana|%käyttäjä>"
  return 1
}

# -------------------------------------------------------------------------