Trivia Winner - Temporary working model

On *:text:*:#: {
  if ($nick == Trivia) {
    if ($remove($1,.) isnum) {
      if ($readini(C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini,$remove($2-,$chr(32)),answer)) {
        aline 4 @Trivia Auto Answer Used In $chan $+ ... Said: $readini(C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini,np,$remove($2-,$chr(32)),answer)
        $iif($r(1,2) == 2,timer 1 $r(0,3) msg $chan $replace($lower($readini(C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini,np,$remove($2-,$chr(32)),answer)),a,s,u,y,m,n,q,w,c,v),noop)
        .timer 1 $r(4,9) msg $chan $lower($readini(C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini,np,$remove($2-,$chr(32)),answer))
      }
      set $+(%,question,.,$chan) $2-
      writeini -n C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini $remove($($+(%,question,.,$chan),2),$chr(32)) Question on
    }
    elseif ($1 == Hint:) {
      halt
    }
    elseif ($1 == Time's) {
      writeini -n C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini $remove($($+(%,question,.,$chan),2),$chr(32)) Answer $remove($1-,Time's up! The answer was:)
    }
    elseif ($1 == Winner:) {
      tokenize 59 $1-
      writeini -n C:\Users\Adam\AppData\Roaming\mIRC\Trivia.ini $remove($($+(%,question,.,$chan),2),$chr(32)) Answer $remove($2,Answer: )
    }
  }
}