Code:

putmsg $chan "Time is up!"  if {$totacro > 2} {    set fs [open $acrovotes w+]

Code:

proc acroendround {chan} {  global acrovotes acrocurrent acropeople acrorunning botnick acrotimerid  set fo [open $acropeople r]  set totacro -1  while {![eof $fo]} {    gets $fo _temp    incr totacro  }  putmsg $chan "Time is up!"  if {$totacro > 2} {    set fs [open $acrovotes w+]    close $fs    set fa [open $acrocurrent w+]    close $fa    putmsg $chan "\002Current Acros:\002"    set fs [open $acropeople r]    set acnt 1    while {![eof $fs]} {      set acro(line) [lrange [split [gets $fs] " "] 1 end]      if {$acro(line) != ""} {        set numbah "\002\[$acnt\]\002 \0039,1"        putmsg $chan "$numbah $acro(line) "      }      incr acnt 1    }    set totalacros -1    set fs [open $acropeople r]    while {![eof $fs]} {      gets $fs temp_      incr totalacros 1    }    close $fs    set votesecs [expr ((30 + (($totalacros -3) * 5)) + ($totalacros * 2)) + 4]    putmsg $chan "Start voting !! You have \002[expr ($votesecs - ($totalacros * 2)) -4]\002 seconds. Use the form \037/MSG $botnick NUMBER\037 to submit a vote."    bind msgm -|- * acro:msg    set acrotimerid [utimer [expr $votesecs -10] "acrowarningvote $chan"]  } else {    putmsg $chan "Sorry, not enough players this round! New round starts in 15 seconds."    unbind msgm -|- * acro:msg    set fp [open $acrocurrent w+]    close $fp    set acrotimerid [utimer 15 "startacro ooga ooga ooga $chan newround"]    set acrorunning 0  }}