on *:connect: { .timer 1 2 join %Invite.Channel | .timer 0 500 mode %Invite.Channel +r }
on *:text:*:*: {
  if ($target !ischan) {
    if ($1 == %Invite.Sign $+ Set) && ($2 == %Invite.Botpass) {
      if ($3 == BotPass) {
        if (!$4) { msg $nick Error: The syntax is %Invite.Sign $+ Set %Invite.Botpass Botpass <23NEW BOT PASSWORD1> | Halt }
        elseif ($4) { msg $nick Botpass changed to:3 $4 | Set %Invite.Botpass $4 | Halt }
      }
      if ($3 == invadmin) {
        if (!$5) { msg $nick Error: The syntax is: %Invite.Sign $+ Set %Invite.Botpass invadmin <3USER1> <2PASSWORD1> $+ ,Ex: %Invite.Sign $+ Set %Invite.Botpass invadmin user 23 }
        elseif ($readini(inviteu.ini,$4,User)) { msg $nick Error: The username3 $4 1is already used! please choose an author username or type %Invite.Sign $+ Set %Invite.Botpass uninvadmin $4 $+ . }
        elseif (!$readini(inviteu.ini,$4,User)) {
          msg $nick [3Admin added1] Username:3 $4 1Password:3 $5 1Login command: /msg $me %Invite.Sign $+ Login $4 $5
          .writeini -n inviteu.ini $4 User $4
          .writeini -n inviteu.ini $4 Pass $5
          .writeini -n inviteu.ini $4 Status OFF | Halt
      } }
      if ($3 == uninvadmin) {
        if (!$4) { msg $nick Error: The syntax is: %Invite.Sign $+ Set %Invite.Botpass uninvadmin <2USER1> $+ . }
        elseif (!$readini(inviteu.ini,$4,User)) { msg $Nick Error: The username2 $4 1wasnt found in the invite Admins list. }
        elseif ($readini(inviteu.ini,$4,User)) {
          msg $nick [3Admin removed1]3 $4 1removed from the invite admins list.
          .remini -n inviteu.ini $4
        }
      }
    }
    if ($1 == %Invite.Sign $+ login) && ($3) && ($readini(inviteu.ini,$2,pass) == $3) && (!$Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
      whois $nick
      msg $nick You are connected to the invite account with the username:2 $2 1and the password:2 $3 $+ .
      .writeini -n inviteu.ini $2 Logged *!*@ $+ $gettok($address,2,64)
      .writeini -n inviteu.ini $2 Status ON
    }
    if ($1- == %Invite.Sign $+ logout) && ($Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
      var %user = $Admins(*!*@ $+ $gettok($address,2,64)).logged?
      msg $nick You are logged out from the invite account. (2 $+ %user $+ 1 $+ )
      .remini -n inviteu.ini %user Logged
      .writeini -n inviteu.ini %user Status OFF
    }
    if ($1- == %Invite.Sign $+ logoff) && ($Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
      var %user = $Admins(*!*@ $+ $gettok($address,2,64)).logged?
      msg $nick You are logged off from the invite account. (2 $+ %user $+ 1 $+ )
      .remini -n inviteu.ini %user Logged
      .writeini -n inviteu.ini %user Status OFF
    }
    if ($Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
      var %user = $Admins(*!*@ $+ $gettok($address,2,64)).logged?
      if ($1 == %Invite.Sign $+ invite) && ($2) {
        .msg $nick $2 - has been invited
        .timer 1 1 mode %invite.channel -b *
        .timer 1 2 msg q chanlev %invite.channel $2 +k
        .timer 1 3 invite $2 %invite.channel
        .timer 1 4 msg $2 You have been invited to %invite.channel

      }
      if ($1 == %Invite.Sign $+ remove) && ($2) {
        .msg $nick $2 - has been removed
        .msg Q removeuser %Gather.Channel $2
        if ($2 ison %Gather.Channel) { ban -k %invite.channel $2 2 Removed. }
      }
    }
  }
  if ($target ischan) && ($target == %Invite.channel) {
    if ($1- == %Invite.Sign $+ Invite-Admins) && (!%Invite.flood) { msg %invite.channel $stl(Admins ( $+ $admins(ON).num $+ 0/ $+ $admins(ALL).num $+ ): $admins) | set -u4 %Invite.flood ON }
  }
}
alias Bot? {
  if (Q ison %Invite.Channel) { return Q }
  if (L ison %Invite.Channel) { return L }
}
on *:op:%Invite.channel: { if ($opnick == $me) { mode # +r } }
on !*:mode:%Invite.channel: { if (r !isincs $chan(#).mode) { mode # +r } }



on *:quit: {
  if ($Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
    var %user = $Admins(*!*@ $+ $gettok($address,2,64)).logged?
    .remini -n inviteu.ini %user Logged
    .writeini -n inviteu.ini %user Status OFF
  }
}
on *:part:%Invite.Channel: {
  if ($Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
    var %user = $Admins(*!*@ $+ $gettok($address,2,64)).logged?
    msg $nick You are disconnected from the invite account. (2 $+ %user $+ 1 $+ )
    .remini -n inviteu.ini %user Logged
    .writeini -n inviteu.ini %user Status OFF
  }
}
on *:kick:%Invite.Channel: {
  if ($Admins($address($knick,2)).logged?) {
    var %user = $Admins($address($knick,2)).logged?
    msg $nick You are disconnected from the invite account. (2 $+ %user $+ 1 $+ )
    .remini -n inviteu.ini %user Logged
    .writeini -n inviteu.ini %user Status OFF
  }
}

alias admins {
  if ($prop == logged?) && ($1) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) {
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),logged) == $1) { return $ini(inviteu.ini,%x) | halt }
      inc %x
    }
  }
  if ($prop == logged.nick) && ($1) {
    if ($readini(inviteu.ini,$1,Logged)) { return $ial($readini(inviteu.ini,$1,Logged)).nick }
    elseif (!$readini(inviteu.ini,$1,Logged)) { return No Suck NickName }
  }
  if ($prop == status) && ($1) {
    if ($readini(inviteu.ini,$1,Status) == ON) { return ON }
    elseif ($readini(inviteu.ini,$1,Status) == OFF) { return OFF }
  }
  if (!$prop) && ($1 == ALL) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) { var %temp = %temp $ini(inviteu.ini,%x) | inc %x }
    if (!$ini(inviteu.ini,%x)) { return %temp }
  }
  if ($prop == NUM) && ($1 == ALL) { return $ini(inviteu.ini,0) }
  if (!$prop) && ($1 == ON) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) {
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),status) == ON) { var %temp = %temp $ini(inviteu.ini,%x) }
      inc %x
    }
    if (!$ini(inviteu.ini,%x)) { return %temp }
  }
  if (!$prop) && ($1 == OFF) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) {
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),status) == OFF) { var %temp = %temp $ini(inviteu.ini,%x) }
      inc %x
    }
    if (!$ini(inviteu.ini,%x)) { return %temp }
  }
  if ($prop == num) && ($1 == OFF) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) {
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),status) == OFF) { var %temp = %temp $ini(inviteu.ini,%x) }
      inc %x
    }
    if (!$ini(inviteu.ini,%x)) { return $numtok(%temp,32) }
  }
  if ($prop == num) && ($1 == ON) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) {
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),status) == ON) { var %temp = %temp $ini(inviteu.ini,%x) }
      inc %x
    }
    if (!$ini(inviteu.ini,%x)) { return $numtok(%temp,32) }
  }
  if (!$prop) && (!$1) {
    var %x = 1
    while ($ini(inviteu.ini,%x)) {
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),status) == ON) { var %temp = %temp 3• $+ 0 $+ $ini(inviteu.ini,%x) }
      if ($readini(inviteu.ini,$ini(inviteu.ini,%x),status) == OFF) { var %temp = %temp 4• $+ 0 $+ $ini(inviteu.ini,%x) }
      inc %x
    }
    if (!$ini(inviteu.ini,%x)) { return %temp }
  }
}

menu * {
  .Invite
  ..Set Channel { set %Invite.Channel $input(Type invite channel,e,Type invite channel) }
  ..Set Sign { set %Invite.Sign $input(Type Sign (Like: !),e,Type Sign (Like: !)) }
  ..Set BotPass { set %Invite.BotPass $input(Type BotPass (MasterPass),e,BotPass (MasterPass)) }
  ..Clear Admins { .remove inviteu.ini }
  ..Open admins file { $iif($exists(inviteu.ini),run inviteu.ini,echo -a There is no admins.) }
}