rendered paste bodyBotadmin + channel
on *:text:*:#: {
if ($1 == !status || $1 == !statusall || $1 == .status) {
if ($readini(status.ini,$network,$chan) == off) { notice $nick 7 $me 14is Disabled }
else { notice $nick 7 $me 14 is enabled }
}
if ($1- == !leave $me || $1- == !gtfo || $1- == !leave ) && ($nick isop $chan || $nick == Staton) {
if ($chan == #staton) { echo I can't leave #staton }
else { part $chan Requested by $nick }
}
if ($1- == !achan $me) && ($nick isop $chan) { writeini status.ini $network $chan on | msg %monitor 7 $me 14Has been Enabled in 7 $chan by 7 $nick 14(7 $address($nick,2) 14 ) | msg $chan 7 $me 14Has been Enabled }
if ($1- == !rchan $me) && ($nick isop $chan) { writeini status.ini $network $chan off | msg %monitor 7 $me 14Has been Disabled in 7 $chan by 7 $nick 14(7 $address($nick,2) 14 ) | msg $chan 7 $me 14Has been Disabled }
if ($readini(status.ini,$network,$chan) == off) { halt }
else {
if ($1 == !pv || $1 == .pv) && ($nick isop $chan) { cs access $chan add $2 3 }
if ($1 == !po || $1 == .po) && ($nick isop $chan) { cs access $chan add $2 5 }
if ($1 == !pa || $1 == .pa) && ($nick isop $chan) { cs access $chan add $2 10 }
if ($1- == !leave $me || $1- == !gtfo || $1- == !leave ) && ($nick isop $chan || $nick == Staton) {
if ($chan == #staton) { echo I can't leave #staton }
else { part $chan Requested by $nick }
}
if ($1 == !half || $1 == .half) && ($nick isop $chan) {
mode $chan +h $2 }
if ($1 == !dehalf || $1 == .dehalf) && ($nick isop $chan) {
mode $chan -h $2 }
if ($1 == !del || $1 == .del) && ($nick isop $chan) {
cs access $chan del $2 }
if ($1 == !invite || $1 == .invite) && ($nick isop $chan) {
invite $2 $chan }
if ($1 == !commands || $1 == .commands) {
msg $nick These must be followed by a nickname !voice !devoice !op !deop !half !dehalf !k !kb !ban <must be in format of nick!user@host. < all of these commands can also be triggered by . >
msg $nick !top shows the current topic. !colours show the colours list.
msg $nick All channel commands triggered by !mode +/- <mode here>
msg $nick !pv , !po, !pa set perm operator, perm voice and perm Protect on a nickname. The bot must be +q/+a to do this. !del , deletes the nick from access.
msg $nick !cycle . makes the bot rejoin the channel. !bsay text , makes the bot say whatever u want. !invite nick, allows u to invite a nick.
msg $nick !rchan [-STbot-] !achan [-STbot-] , turns the bot on and off. !leave [-STBot-] Makes the bot Leave. !Status tells you the current status
msg $nick !ucount , counts the amount of people in the channel it's triggered in.
msg $nick !calc , calculates. !time gives the time in GMT. !ftb starts a 5 minute timer for TB.
}
if (!k * iswm $1- && $nick isop $chan) && ($2 !isop $chan) { kick $chan $2- }
if (!ban * iswm $1- && $nick isop $chan) { mode $chan +b $2- | writeini bans.ini $chan $2- $2- }
if (!kb * iswm $1- && $nick isop $chan) && ($2 !isop $chan) { ban -k $chan $2- }
if (!voice * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan +v $2- }
if (!devoice * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan -v $2- }
if (!op * iswm $1- && $nick isop $chan) { mode $chan +o $2- }
if (!deop * iswm $1- && $nick isop $chan) { mode $chan -o $2- }
if (!protect * iswm $1- && $nick isop $chan) { mode $chan +a $2- }
if (!deprotect * iswm $1- && $nick isop $chan) { mode $chan -a $2- }
if (.k * iswm $1- && $nick isop $chan) && ($2 !isop $chan) { kick $chan $2- }
if (.ban * iswm $1- && $nick isop $chan) { mode $chan +b $2- | writeini bans.ini $chan $2- $2- }
if (.kb * iswm $1- && $nick isop $chan) && ($2 !isop $chan) { ban -k $chan $2- }
if (.voice * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan +v $2- }
if (.devoice * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan -v $2- }
if (.op * iswm $1- && $nick isop $chan) { mode $chan +o $2- }
if (.deop * iswm $1- && $nick isop $chan) { mode $chan -o $2- }
if (!top iswm $1- || .top iswm $1-) { notice $nick $chan(#).topic }
if (!cycle iswm $1- && $nick isop $chan) { hop $chan Rejoining. Requested by $nick }
if (.cycle iswm $1- && $nick isop $chan) { hop $chan Rejoining. Requested by $nick }
if (!colours iswm $1- || .colours iswm $1-) { notice $nick 01 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 10 10 11 11 12 12 13 13 14 14 15 15 }
if (!mode * iswm $1- && $nick isop $chan) { mode $chan $2- }
if ($1 == !bsay) { msg $chan $2- }
if (!calc * iswm $1- || .calc * iswm $1-) { notice $nick 14 $2- = 7 $calc($2-) }
if ($1 == !ucount || $1 == .ucount) && ($nick isop $chan) { notice $nick 14 There are Currently7 $nick($chan,0) 14 users in $+ 7 $chan $+ . }
if (!time iswm $1- || .time iswm $1-) {
set %time $asctime(hh:nn tt)
set %date $asctime(dddd doo mmmm yyyy)
{ Notice $nick 7 GMT : 14 %time 7and the date is:14 %date }
}
if ($1 == !ftb || $1 == .ftb) {
//set % $+ $nick $chan {
msg $chan 7 $nick 14Has Started a TB Timer of 5 Minutes. To end this type !endtb }
$+(timer,$nick,$chan) 1 150 { notice $nick 7 $nick 14 2Minutes 50 Seconds have passed you have 2Minutes 50 Seconds left! }
$+(timer,$nick,$chan,2) 1 300 { notice $nick 7 $nick 14 5 Minutes is over! }
}
if ($1 == !endtb || $1 == .endtb) {
$+(timer,$nick,$chan) off
$+(timer,$nick,$chan,2) off
{
notice $nick 7 $nick 14 Has Ended thier timer. }
}
if ($1 == !unban || $1 == .unban ) {
if ($readini(bans.ini,$chan,$2)) { mode $chan -b $v1 }
}
if ($ulevel <= 1000) { HALT }
if ($1 == !addowner) {
if ($readini(acc-list.ini,owner,$address($2,2)) == yes) { halt }
else {
writeini acc-list.ini owner $address($2,2) yes
msg %monitor 7 $2 14Has Been Added to Auto Owner
}
}
if ($1 == !addprotect) {
if ($readini(acc-list.ini,protect,$address($2,2)) == yes) { halt }
else {
writeini acc-list.ini protect $address($2,2) yes
msg %monitor 7 $2 14Has Been Added to Auto Protect
}
}
if ($1 == !addop) {
if ($readini(acc-list.ini,op,$address($2,2)) == yes) { halt }
else {
writeini acc-list.ini op $address($2,2) yes
msg %monitor 7 $2 14Has Been Added to Auto Op
}
}
if ($1 == !testing ) { writeini protect.ini $chan $address($2,2) yes | msg $chan test }
if ($1 == !addhalfop) {
if ($readini(acc-list.ini,halfop,$address($2,2)) == yes) { halt }
else {
writeini acc-list.ini halfop $address($2,2) yes
msg %monitor 7 $2 14Has Been Added to Auto Halfop
}
}
if ($1 == !addvoice) {
if ($readini(acc-list.ini,voice,$address($2,2)) == yes) { halt }
else {
writeini acc-list.ini voice $address($2,2) yes
msg %monitor 7 $2 14Has Been Added to Auto Voice
}
}
if ($1 == !botadmin) { guser 1001 $2 ) | msg %monitor 7 $2 14Has Been 7Added 14to Botadmin Status By 7 $nick 14(7 $address($nick,2) 14) }
if ($1 == !rbotadmin) { ruser 1001 $2! | msg %monitor 7 $2 14Has Been 7Deleted 14From Botadmin Status By 7 $nick 14(7 $address($nick,2) 14) }
if ($1 == !perform) { $2-1000 | msg %monitor 14[7Perform Command14] ' $2-1000 ' 14Used on4 $chan 14By $nick 14(7 $address($nick,2) 14 ) }
if ($1 == !join) && ($nick == Staton) { join $2 }
if ($1 == !part) && ($nick == Staton) { part $2 $3-100 }
if ($1- == !rchan $me) { writeini status.ini $network $chan off | msg %monitor 7 $me 14Has been Disabled in 7 $chan by 7 $nick 14(7 $address($nick,2) 14 ) | msg $chan 7 $me 14Has been Disabled }
if ($1 == !count) {
if ($nick isop $chan) || ($nick ishop $chan) {
msg $chan 14 There are Currently7 $nick($2-,0) 14 users in $+ 7 $2- $+ .
}
}
if ($1 == !chans) {
%i = 1
%chan =
while ( %i <= $chan(0) ) {
%chan = %chan - $chan(%i)
inc %i
}
/notice $nick 14 I'm on 7 %chan 14on 7 $network . 14 This is 7 $chan(*) 14 Channels altogether.
unset %chan
}
if ($1 == !disableall ) {
remote off | msg %monitor 7 $me 14 Has been disabled completely on all channels by 7 $nick 14(7 $address($nick,2) 14 ) . }
if ($1 == !enableall ) {
remote on | msg %monitor 7 $me 14 Has been Enabled completely on all channels by 7 $nick 14(7 $address($nick,2) 14 ) . }
if ($1 == !global) { amsg 14[7GLOBAL14] $2- | msg %monitor 14[7GlobalCommand14]14 ' 7 $2- 14' Used by $nick 14(7 $address($nick,2) 14 ) }
}
on 1000:text:*:#: {
if (!set * iswm $1- ) { mode $chan $2- | msg %monitor 14[7Set command14] ' $2-1000 ' 14Used on4 $chan 14By $nick 14(7 $address($nick,2) 14 ) }
}
joins and parts
on *:JOIN:*:{
if ($nick == $me ) { msg %monitor 4[3Join4] I've Joined 4 $chan on 14 $network }
if ($nick == $me) { msg $chan 7[-STbot-] 14Scripted by Staton. For a Full list of Commands type !commands }
if ($chan == #) {
if ($readini(acc-list.ini,owner,$address($nick,2)) == yes) { mode #Staton +q $nick }
if ($readini(founder.ini,$chan,$address($nick,2)) == yes) { mode $chan +q $nick }
if ($readini(protect.ini,$chan,$address($nick,2)) == yes) { mode $chan +ao $nick $nick }
if ($readini(op.ini,$chan,$address($nick,2)) == yes) { mode $chan +o $nick }
if ($readini(halfop.ini,$chan,$address($nick,2)) == yes) { mode $chan +h $nick }
if ($readini(voice.ini,$chan,$address($nick,2)) == yes) { mode $chan +v $nick }
if ($readini(acc-list.ini,protect,$address($nick,2)) == yes) { mode #Staton +ao $nick $nick }
if ($readini(acc-list.ini,op,$address($nick,2)) == yes) { mode #Staton +o $nick }
if ($readini(acc-list.ini,halfop,$address($nick,2)) == yes) { mode #Staton +h $nick }
if ($readini(acc-list.ini,voice,$address($nick,2)) == yes) { mode #Staton +v $nick }
}
}
On *:JOIN:*{
if ($chan == #staton)
{ msg $chan 13!5!13!14 4This 7channel 6has 13been 9joined %Jointcount Times! 13!5!13!14 | Inc %jointcount 1 }
on *:part:*:{
if ($nick == $me) { msg %monitor 4[3Part4] I've parted 4 $chan on 14 $network }
}
on *:INVITE:#:{
Msg %monitor 4[3Invite4] 14Invited to 7 $chan 14by 7 $nick 14(7 $address($nick,2) 14 ) }
PROTECTS
on *:KICK:#: {
if ($knick == $me) && ($nick != $me) {
/cs Invite $chan
timer 1 1 /join $chan
timer 1 2 /cs unban $chan
timer 1 3 { msg %monitor 4Kicked: 14on $chan by $nick 14( 7 $address($nick,2) 14) }
timer 1 4 msg $chan 14 To make me leave type !leave 7 $me , 14You must be an Op to do this.
}
}
on *:BAN:#: {
if ($bnick == $me ) { cs unban $chan | msg %monitor 4Banned: 14 Banned on 7 $chan 14by 7 $nick 14(7 $address($nick,2) 14 ) . }
if ($me isop $chan ) {
writeini bans.ini $chan $bnick $banmask }
}