#wolfgame play snippet

alias wg { msg ##werewolf !join }
alias ws { msg ##werewolf !stats }
alias ll { .msg lykos $1- | .notice $me 14<7lykos14>14 $1- }


on ^*:text:*:##werewolf:{
  if ($nick == lykos) && ($2-7 == has started a game of Werewolf) { 
    ;if ($active == ##werewolf) { return }
    echo -at 4***14[7##werewolf14]14 Game initiated! Type /wg to "join game"
  }
  if ($nick == lykos) && ($2-5 == has joined the game) && ($1 == $me) {  
    ;if ($active == ##werewolf) { return }
    echo -at 4***14[7##werewolf14]14 Game joined! 
  }
  else { 
    if ($nick != lykos) { return }
    if ($nick == lykos) { 
      echo $chan $timestamp 14<7#wolfgame14>14 $1- 
      halt 
    } 
  }
}

menu channel {
  [#wolfgame]
  .!start:msg # !start
  .!join:msg # !join
  .!stats:msg # !stats
  .!retract:msg # !retract
  .!votes:msg # !votes
  .!ping:msg # !ping
  .!wait:msg #e !wait
  .!simple:msg #e !simple
  .!quit
  ..Really Quit:msg # !quit
}
menu nicklist {
  [#wolfgame $$1]
  .!lynch:msg ##werewolf !lynch $$1
  .See:msg lykos see $$1
  .Id:msg lykos see $$1
  .Kill:msg lykos kill $$1
}