proc tgcorrectanswer {nick} {
......
...
....
....
....

tgshowscores $nick
...
....
...
...

}

#reminds channel how to report errors in questions/answers

proc tgerrremind {} {

    global tgerrremindtimer tgerrremindtime botnick tgcmderror

    tggamemsg "[tgcolerr]Remember: to report errors in questions/answers, type /msg $botnick $tgcmderror <number> \[description\]"

    set tgerrremindtimer [timer $tgerrremindtime tgerrremind]

} 

#reminds channel how to report errors in questions/answers
proc tgerrremind {} {
	global tgerrremindtimer tgerrremindtime botnick tgcmderror
	tggamemsg "[tgcolerr]Remember: to report errors in questions/answers, type /msg $botnick $tgcmderror <number> \[description\]"
	set tgerrremindtimer [timer $tgerrremindtime tgerrremind]
	tgshowscores $nick
}