on *:TEXT:!vd*:#:{ 
  if (%vd == 1) {
    if (!$4) { notice $nick Specify the points | halt }
    if ($calc($2 + ($3*2) + ($4*4)) >= 20000) { notice $nick You have spent too many points. Please see !vdrules to see how much you can spend. | halt }
    if (%play == 1) { notice $nick A game is already being played. | halt }
    if (%vd == 0) { notice $nick Violent Diplomacy is not currently on. Please contact Jcfc so he can turn it on. | halt }
    if ($calc($2 + ($3*2) + ($4*4)) <= 20000) {
      msg $chan $nick wants to play Violent Diplomacy! Type !vd2 to play with him.
      set %vdplay 1
      set %p1inf $2
      set %p1drag $3
      set %p1cav $4
      set %play 1
    }
  }
  else { notice $nick Violent Diplomacy is not currently on. Please contact Jcfc so he can turn it on. | halt }
}
on *:TEXT:!vd2*:#:{
  if (%vdplay == 1) {
    if (!$4) { notice $nick Specify the points | halt }
    if ($calc($2 + ($3*2) + ($4*4)) >= 20000) { notice $nick You have spent too many points. Please make your point below 20000. But hurry, soomeone else might play before you! | halt }
    if ($calc($2 + ($3*2) + ($4*4)) <= 20000) {
      set %p2inf $2
      set %p2cav $s3
      msg $chan The game is on!
    }
  }
}