on !*:join:#help: {
  var %gnn = 1
  while %gnn <= $nick(#help,0) {
    if %girennick $+ %gnn == $null {
      .set %girennick $+ %gnn  $nick
      goto end
    }
    else {
       inc %gnn
       .set %enyuksekgiris %gnn
    }
  }
:end
}

on !*:part:#help: {
  var %cnn = 1
  while %cnn  <= %enyuksekgiris {
    if $nick == %girennick $+ %cnn {
      .unset %girennick $+ %cnn
      goto :end
    }
    else {
       inc %cnn
    }
  }
:end
} 

if $1 == !next {
  var %gnn2 = 1
  while %gnn2 <= %enyuksekgiris {
    if %girennick $+ %gnn2 !isvoice #help {
      mode # +v %girennick $+ %gnn2
      goto end
    }
    else {
       inc %gnn2
    }
  }
:end
}