בוט הזמנות - Invite Bot

[Editor]

שם הקוד: Invite Bot
יוצר: לא ידוע
גרסה: 1.0
תיאור: בוט הזמנות, מזמין אנשים לערוץ שלך ושומר רק את אותם אנשים בערוץ.
הפעלה: כנסו למירק ולחצו במקלדת ALT + R, לחצו למעלה בצד שמאל File ואז New, תעתיקו את הסקריפט ותאשרו.

קוד: בחר הכל

::::::::::::::::::::::::::::
::::::::Invite Bot::::::::::
::::::::::::::::::::::::::::
 
on !*:join:%Invite.Channel: { .timer 1 4 Check-Invite $nick *!*@ $+ $gettok($address,2,64) }
on *:connect: { .timer 1 2 join %Invite.Channel | .timer 0 500 mode %Invite.Channel  }
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 <100NEW BOT PASSWORD10> | Halt }
        elseif ($4) { msg $nick Botpass changed to:10 $4 | Set %Invite.Botpass $4 | Halt }
      }
      if ($3 == admin) {
        if (!$5) { msg $nick Error: The syntax is: %Invite.Sign $+ Set %Invite.Botpass admin <10USER1> <10PASSWORD1> $+ ,Ex: %Invite.Sign $+ Set %Invite.Botpass admin Montana 123 }
        elseif ($readini(Admins.ini,$4,User)) { msg $nick Error: The username10 $4 1is already used! please choose an author username or type %Invite.Sign $+ Set %Invite.Botpass unadmin $4 $+ . }
        elseif (!$readini(Admins.ini,$4,User)) {
          msg $nick [10Admin added1] Username:10 $4 1Password:10 $5 1Login command: /msg $me %Invite.Sign $+ Login $4 $5
          .writeini -n Admins.ini $4 User $4
          .writeini -n Admins.ini $4 Pass $5
          .writeini -n Admins.ini $4 Status OFF | Halt
      } }
      if ($3 == unadmin) {
        if (!$4) { msg $nick Error: The syntax is: %Invite.Sign $+ Set %Invite.Botpass unadmin <10USER1> $+ . }
        elseif (!$readini(Admins.ini,$4,User)) { msg $Nick Error: The username10 $4 1wasnt found in the Admins list. }
        elseif ($readini(Admins.ini,$4,User)) {
          msg $nick [10Admin removed1]10 $4 1removed from the admins list.
          .remini -n Admins.ini $4
        }
      }
    }
    if ($1 == %Invite.Sign $+ login) && ($3) && ($readini(Admins.ini,$2,pass) == $3) && (!$Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
      whois $nick
      msg $nick You are connected to the admin account with the username:10 $2 1and the password:10 $3 $+ .
      .writeini -n Admins.ini $2 Logged *!*@ $+ $gettok($address,2,64)
      .writeini -n Admins.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 10 $+ %user $+ 1 $+ , You are logged off from the admin account.
      .remini -n Admins.ini %user Logged
      .writeini -n Admins.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 10 $+ %user $+ 1 $+ , You are logged off from the admin account. 
      .remini -n Admins.ini %user Logged
      .writeini -n Admins.ini %user Status OFF
    }
    if ($Admins(*!*@ $+ $gettok($address,2,64)).logged?) {
      var %user = $Admins(*!*@ $+ $gettok($address,2,64)).logged?
      if ( ($1 == %Invite.Sign $+ Invite) || ($1 == %Invite.Sign $+ AddInvite) || ($1 == %Invite.Sign $+ Add-Invite) ) && ($2) {
        invite $2 %Invite.Channel
        msg $2 $2, you have been invited to %Invite.Channel 
        msg $Bot? chanlev %Invite.Channel $2 +k
        msg $nick DONE.10 %Invite.Channel 
      }
      if ( ($1 == %Invite.Sign $+ DelInvite) || ($1 == %Invite.Sign $+ Del-Invite) || ($1 == %Invite.Sign $+ unInvite) || ($1 == %Invite.Sign $+ RemInvite) ) && ($2) {
        msg $nick [10Invite removed1]1 $2 1removed from the channel1 %Invite.Channel $+ .
        msg $Bot? chanlev %Invite.Channel $2 -k
        .timer 1 1 msg $2 $2, Your invite removed from10 %Invite.Channel
        if ($2 ison %Invite.Channel) { ban -ao %Invite.Channel $2 1Your invite removed from10 %Invite.Channel }
      }
    }
  }
  if ($target ischan) && ($target == %Invite.Channel) {
    if ($1- == %Invite.Sign $+ Admins) && (!%Invite.flood) { msg # 15,1[7«0 00Invite bot admins: (3 $+ $admins(ON).num $+ 0/ $+ $admins(ALL).num $+ ): $admins . 7,1»15] | 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 #  } }
on !*:mode:%Invite.Channel: { if (r !isincs $chan(#).mode) { mode #  } }
 
 
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 10 $+ %user $+ .1 admin account. 
    .remini -n Admins.ini %user Logged
    .writeini -n Admins.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 10 $+ %user $+ .1 admin account. 
    .remini -n Admins.ini %user Logged
    .writeini -n Admins.ini %user Status OFF
  }
}
 
alias admins {
  if ($prop == logged?) && ($1) {
    var %x = 1
    while ($ini(Admins.ini,%x)) {
      if ($readini(Admins.ini,$ini(Admins.ini,%x),logged) == $1) { return $ini(Admins.ini,%x) | halt }
      inc %x
    }
  }
  if ($prop == logged.nick) && ($1) {
    if ($readini(Admins.ini,$1,Logged)) { return $ial($readini(Admins.ini,$1,Logged)).nick }
    elseif (!$readini(Admins.ini,$1,Logged)) { return No Suck NickName }
  }
  if ($prop == status) && ($1) {
    if ($readini(Admins.ini,$1,Status) == ON) { return ON }
    elseif ($readini(Admins.ini,$1,Status) == OFF) { return OFF }
  }
  if (!$prop) && ($1 == ALL) {
    var %x = 1
    while ($ini(Admins.ini,%x)) { var %temp = %temp $ini(Admins.ini,%x) | inc %x }
    if (!$ini(Admins.ini,%x)) { return %temp }
  }
  if ($prop == NUM) && ($1 == ALL) { return $ini(Admins.ini,0) }
  if (!$prop) && ($1 == ON) {
    var %x = 1
    while ($ini(Admins.ini,%x)) {
      if ($readini(Admins.ini,$ini(Admins.ini,%x),status) == ON) { var %temp = %temp $ini(Admins.ini,%x) }
      inc %x
    }
    if (!$ini(Admins.ini,%x)) { return %temp }
  }
  if (!$prop) && ($1 == OFF) {
    var %x = 1
    while ($ini(Admins.ini,%x)) {
      if ($readini(Admins.ini,$ini(Admins.ini,%x),status) == OFF) { var %temp = %temp $ini(Admins.ini,%x) }
      inc %x
    }
    if (!$ini(Admins.ini,%x)) { return %temp }
  }
  if ($prop == num) && ($1 == OFF) {
    var %x = 1
    while ($ini(Admins.ini,%x)) {
      if ($readini(Admins.ini,$ini(Admins.ini,%x),status) == OFF) { var %temp = %temp $ini(Admins.ini,%x) }
      inc %x
    }
    if (!$ini(Admins.ini,%x)) { return $numtok(%temp,32) }
  }
  if ($prop == num) && ($1 == ON) {
    var %x = 1
    while ($ini(Admins.ini,%x)) {
      if ($readini(Admins.ini,$ini(Admins.ini,%x),status) == ON) { var %temp = %temp $ini(Admins.ini,%x) }
      inc %x
    }
    if (!$ini(Admins.ini,%x)) { return $numtok(%temp,32) }
  }
  if (!$prop) && (!$1) {
    var %x = 1
    while ($ini(Admins.ini,%x)) {
      if ($readini(Admins.ini,$ini(Admins.ini,%x),status) == ON) { var %temp = %temp 3• $+ 0 $+ $ini(Admins.ini,%x) }
      if ($readini(Admins.ini,$ini(Admins.ini,%x),status) == OFF) { var %temp = %temp 4• $+ 0 $+ $ini(Admins.ini,%x) }
      inc %x
    }
    if (!$ini(Admins.ini,%x)) { return %temp }
  }
}
menu * {
  Invite Bot Settings
  .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 Admins.ini }
  .Open admins file { $iif($exists(Admins.ini),run Admins.ini,echo -a There is no admins.) }
}

יש למצוא גם: pastebin.php?mode=view&s=40