Something

bind pub - !repeat ShowQuestionAndHint
set repeater ""
global repeat
set variables repeat repeater

## Show Question And Initial Hint
proc ShowQuestionAndHint {nick uhost hand chan args} {
global dedication  ScrambleRoundChosen pointdropcounter knowncolor unknowncolor gradhinttitletextcolor gradhinttitlebgcolor gradhinttitlebold gradhintbold qnumbold qbold answertitlebold answerbold QNText QNBackground qtotal HText HBackground antifloodenable triviavalue displayenable usercounter commandusers alreadygoing qafile question AnyonePlaying wonbefore wontimes hintalreadygiven hint answer triviastoppedflag score qafilelength qnumber alreadyguessed triviaowner triviachannel validbanks  nextenable nonopsnumber opsnumber hintenable minhintletters maxhintletters showserver autojoin joinmsg autoquit quitmsg EnableAds AdDelay AdsToUse adcounter TipEnable TipsToUse tipcounter TrivDelay HintCharacter botsleep hecklerenable HecklesToUse hecklecounter repeater repeaternumber triviavalue nontriviapiracy nontriviapiracyvariable

if {[string tolower $chan] != [string tolower $triviachannel]} {return}
if {$antifloodenable == 1} {
 foreach usercounter [array names commandusers] {
   if {[lindex $commandusers($usercounter) 1] == $uhost} {
    return
   }
 }
 set commandusers($usercounter) "$nick $uhost"
}
if {$triviastoppedflag == 1} {
	putquick "privmsg $triviachannel :Trivia's not even running, $nick: Type !trivia to start it first! 8)"
	return
}
if {$alreadyguessed == 1} {return 1}
if {$displayenable == 1} {
 if {$ScrambleRoundChosen == 1} {
  set qnumboldcode ""
  if {$qnumbold == 1} {set qnumboldcode ""}
  set qboldcode ""
  if {$qbold == 1} {set qboldcode ""}
  if {$pointdropcounter == 0 } {
   putquick "privmsg $triviachannel :$QNText,$QNBackground $qnumboldcode Question currently worth $triviavalue points:$qnumboldcode $qboldcode No clue has been given yet! $qboldcode"
  }
  if {$pointdropcounter != 0 } {
   putquick "privmsg $triviachannel :$QNText,$QNBackground $qnumboldcode Question currently worth $triviavalue points:$qnumboldcode $qboldcode $question? $qboldcode"
  }
 } {
  set qnumboldcode ""
  if {$qnumbold == 1} {set qnumboldcode ""}
  set qboldcode ""
  if {$qbold == 1} {set qboldcode ""}
  if {$pointdropcounter == 0 } {
   putquick "privmsg $triviachannel :$QNText,$QNBackground $qnumboldcode Question currently worth $triviavalue points:$qnumboldcode $qboldcode $question? $qboldcode"
  }
  if {$pointdropcounter != 0 } {
   putquick "privmsg $triviachannel :$QNText,$QNBackground $qnumboldcode Question currently worth $triviavalue points:$qnumboldcode $qboldcode $question? $qboldcode"
  }
 }
}

set ohint $hint
set gradtitleboldcode ""
if {$gradhinttitlebold == 1} {set gradtitleboldcode ""}
set gradboldcode ""
if {$gradhintbold == 1} {set gradboldcode ""}
putquick "privmsg $triviachannel :$gradhinttitletextcolor,$gradhinttitlebgcolor $gradtitleboldcode Answer: $gradtitleboldcode $gradboldcode [apc] $gradboldcode"
set hint $ohint
return 1
}

## Get player guess...compare to answer and update hint accordingly!
proc CheckPlayerGuess {nick uhost hand chan args} {
global dedication IndividualTeamPoints colorteamnamestouse TeamNamesToUse alreadygoing maxteams maxteamplayers maxteampoints teamduration teammode triviachannel antifloodenable usercounter commandusers teamenable TeamNames CurrentTeamPlayerTotals TeamPlayers TeamPoints IndividualTeamPoints orig_knowncolor orig_unknowncolor orig_QText orig_QBackground orig_AText orig_ABackground orig_HText orig_HBackground scrpdpv gamemode gamemodepercent scramblebanks sbankpercents scramblepvmethod scramblepresetvalue scrletters scrvalues scrdrops scrptdrops scrptdropseconds scrcluedisplay scrhintptdrop scrminhintletters scrmaxhintletters scrmaxhints scrpercenthintenable scrhintpercent scrhintprocess scrknown scrunknown scrqtc scrqbc scratc scrabc scrhtc scrhbc knowncolor unknowncolor QText QBackground AText ABackground HText HBackground orig_knowncolor orig_unknowncolor orig_QText orig_QBackground orig_AText orig_ABackground orig_HText orig_HBackground ScrambleRoundChosen orig_validbanks orig_frequency orig_trivvalue orig_bonuslengths orig_bonusvalues orig_bonusdrops orig_pointdrops orig_pointdropdelay orig_pointdropdecrease orig_minhintletters orig_maxhintletters orig_hinttimes orig_percentagehintenable orig_hintpercentage orig_hintmethods validanswer rankupdisplay pointsleftdisplay playeraheaddisplay multipleenable fuzzyenable streakbonusenable streakinterval streakbonus nickforrank knowncolor unknowncolor lastwinner nickyearmarker nickmonthmarker nickweekmarker nickdaymarker nickyearranks nickmonthranks nickweekranks nickdayranks initialtriviadisplaydelay AText ABackground answertitletextcolor answertitlebgcolor answertitlebold answerbold gradhinttitletextcolor gradhinttitlebgcolor gradhinttitlebold gradhintbold pointdropcounter FillInLettersEnable HBackground HText ABackground AText LastAnswer antifloodenable minstart autovoicesynch autovoicescore autovoiceenable origtrivvalue fastanswerqty streakscore streakfilename streakhtmlfilename fastanswerscore fastanswerfilename fastanswerhtmlfilename alreadygoing qafile question AnyonePlaying wonbefore wontimes hintalreadygiven hint answer triviastoppedflag score qafilelength qnumber alreadyguessed nameofbot nextorder nextquestioncounter triviavalue dayscore dayfilename weekscore weekfilename yearscore yearfilename triviaowner triviachannel validbanks  nextenable nonopsnumber opsnumber hintenable minhintletters maxhintletters showserver autojoin joinmsg autoquit quitmsg EnableAds AdDelay AdsToUse adcounter TipEnable TipsToUse tipcounter TrivDelay HintCharacter botsleep hecklerenable HecklesToUse hecklecounter repeater repeaternumber triviavalue nontriviapiracy nontriviapiracyvariable secondstart validbanks frequency triviavalue bonuslengths bonusvalues bonusdrops pointdrops pointdropdelay pointdropdecrease minhintletters maxhintletters hinttimes percentagehintenable hintpercentage hintmethods knowncolor unknowncolor QText QBackground AText ABackground HText HBackground
if {[string tolower $chan] != [string tolower $triviachannel]} {return}
	if {$nick == $nameofbot} {return}
	set AnyonePlaying 0
	if {$triviastoppedflag == 1} {
		return 1
	}

	if {$alreadyguessed == 1} {
		return
	}

foreach nextquestioncounter [array names nextorder] {
 if {[lindex $nextorder($nextquestioncounter) 1] == $uhost} {
  if {[lindex $nextorder($nextquestioncounter) 2] == "0"} {
   putquick "NOTICE $nick :Sorry $nick, but you forfeited all guesses and use of the !hint command for this round when you typed !next..."
   
   set nextorder($nextquestioncounter) "$nick $uhost 1"
  }
 return
 }
}