Mine

on *:TEXT:!Help *:?:{
  /set %HRChan $readini(HelpReq.ini,!,Support)
  if ( $istok( %HRChan , $2 , 46) ) { 
    if ( $nick ison $2 ) {
      /set %HR.Queue $readini(HelpReq.ini,!, $2 )
      /set %HR.Queue $addtok( %HR.Queue , $nick ,46)
      /writeini HelpReq.ini ! $2 %HR.Queue
      if ( $readini(HelpReq.ini, $2 , $nick ) != $null ) /notice $nick Replacing your question for $2
      if ( $readini(HelpReq.ini, $2 , $nick ) == $null ) {
        /notice $nick Adding your question to the queue for $2 (you are position $numtok( %HR.Queue , 46 )
        /msg $2 $nick has been added to the queue for $2 (Now $numtok( %HR.Queue , 46 ) people waiting)
      }
      /writeini HelpReq.ini $2 $nick $3-
      /halt
    }
    /halt
  }
  /notice $nick Sorry, I'm not working for $2
}
on *:TEXT:!next:#:{
  if ( $istok( $readini(HelpReq.ini,!,Support) , $chan ,46) ) { 
    if ( ( $nick isvoice $chan ) || ( $nick isreg $chan ) ) {
      /notice $nick Sorry, you arent allowed to do this
      /kick $chan $nick You is EBIL!!!
      /halt
    }
    if ( ( $readini(HelpReq.ini,+, $chan ) != $null ) && ( $readini(HelpReq.ini,+, $chan ) ison $chan ) ) /kick $chan $readini(HelpReq.ini,+, $chan ) Help complete, come again soon!
    /set %HR.Queue $readini(HelpReq.ini,!, $chan )
    /set %HR.Nick $gettok( %HR.Queue ,1,46)
    /mode $chan +v %HR.Nick
    /set %HR.Q $readini(HelpReq.ini , $chan , %HR.Nick )
    /msg $chan Next question: < $+ %HR.Nick $+ > %HR.Q
    /set %HR.Queue $deltok( %HR.Queue ,1,46)
    if ( $numtok( %HR.Queue ,46) == 0 ) /msg $chan End of queue reached, good job!
    /writeini HelpReq.ini ! $chan %HR.Queue
    /writeini HelpReq.ini + $chan %HR.Nick
  }
}
on *:NICK: {
  if ( $readini(HelpReq.ini, $chan , $nick ) != $null ) {
    /writeini HelpReq.ini $chan $newnick $readini(HelpReq.ini, $chan , $nick )
    /remini HelpReq.ini $chan $nick
    /set %HR.Queue $readini(HelpReq.ini,!, $chan )
    /set %HR.Queue $reptok( %HR.Queue , $nick , $newnick ,1,46)
    /writeini HelpReq.ini ! $chan %HR.Queue
    /notice $chan $nick changed their nick, but their queue slot was saved!
  }
}
on *:PART:#: {
  if ( $istok( $readini(HelpReq.ini,!,Support) , $chan ,46) ) { 
    /remini HelpReq.ini $chan $nick
    /set %HR.Queue $readini(HelpReq.ini,!, $chan )
    /set %HR.Queue $remtok( %HR.Queue , $nick ,46)
    /writeini HelpReq.ini ! $chan %HR.Queue
  }
}
on *:KICK:#: {
  if ( $istok( $readini(HelpReq.ini,!,Support) , $chan ,46) ) { 
    /remini HelpReq.ini $chan $knick
    /set %HR.Queue $readini(HelpReq.ini,!, $chan )
    /set %HR.Queue $remtok( %HR.Queue , $knick ,46)
    /writeini HelpReq.ini ! $chan %HR.Queue
  }
}
on *:QUIT: {
  if ( $istok( $readini(HelpReq.ini,!,Support) , $chan ,46) ) { 
    /remini HelpReq.ini $chan $nick
    /set %HR.Queue $readini(HelpReq.ini,!, $chan )
    /set %HR.Queue $remtok( %HR.Queue , $nick ,46)
    /writeini HelpReq.ini ! $chan %HR.Queue
  }
}