Anonymous

ON *:INVITE:#:{
  set %nick. [ $+ [ $chan ] ] $nick
  join $chan
}
on *:JOIN:#:{
  if ($nick == $me && $($+(%,nick.,$chan),2)) {
    .timer 1 1 /check.op $($+(%,nick.,$chan),2) $chan
    unset %nick. [ $+ [ $chan ] ]
  }
}
alias /check.op {
  if ($1 isop $2 || $1 ishop $2 || $isadmin($1) || $isowner($1)) && ($nick($2,0) > 3) { msg $2 Hi, I'm $me $+ . I was invited by $1 $+ . To part me, use my !part command, with $me in the command. }
  else { part $2 Sorry, but $1 is not an Operator (@) or a Half-Operator ( $+ $chr(37) $+ ) on this channel; it is required that you are one to invite $me $+ . }
}