Try to testing this code:
Code
alias quest {
  var %file QA.txt | var %chan #channel | var %hintp1 2.5 | var %hintp2 1.5
  var %str $read(%file) | set %question $gettok(%str,1,124) | set %answer $gettok(%str,2,124)
  var %len $len(%answer) | var %words $numtok(%answer,32)
  var %par $+(05,$chr(40),03,%len 05letters,$chr(44)) $+(03,%words 05words,$chr(41))
  var %t | var %i 1 | while (%i <= %words) {
    var %s $gettok(%answer,%i,32) | var %w1 $floor($calc($len(%s) / %hintp1))
    var %w2 $mid(%s,1,%w1) | var %w3 $calc($len(%s) - %w1) | %t = %t $+(03,%w2,05,$str(*,%w3)) | inc %i
  } | var %hint1 %t
  var %t | var %i 1 | while (%i <= %words) {
    var %s $gettok(%answer,%i,32) | var %w1 $floor($calc($len(%s) / %hintp2))
    var %w2 $mid(%s,1,%w1) | var %w3 $calc($len(%s) - %w1) | %t = %t $+(03,%w2,05,$str(*,%w3)) | inc %i
  } | var %hint2 %t
  .timerQA1 1 0 msg %chan 05Question:03 %question %par
  .timerQA2 1 2 msg %chan 05Hint1:03 %hint1
  .timerQA3 1 4 msg %chan 05Hint2:03 %hint2
  .timerQA4 1 6 msg %chan 05Nobody answered the question. Correct answer: $+(03,%answer,05.)
}

Specify your channel in the %chan variable. To setting the display of the tooltip, use integers with a decimal separator in the variables %hintp1 and %hintp2.

To start, enter the command: "/quest".


🌐 https://forum.epicnet.ru 📜 irc.epicnet.ru 6667 #Code | mIRC scripts, help, discuss, examples