יוצר: לא ידוע
גרסה: 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