bot mode shit :P
!topic
!op
!deop
!ban
!kick
!hop
!dehop
!voice
!devoice
!-m
!+m
!censor-off
!censor-on
;;;;;;;;;;;;;;;;;;;;;;;;;;;
; ;
; Bot Commands ;
; By Dj 801 ;
; ;
; irc.wubnet.org:6667 ;
; #dj801,#bots ;
; ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:LOAD: {
/set %bot-chan $$?="Bot Command Channels:"
}
Menu Channel {
Bot
.Channel
..Show Channel:echo -a %bot-chan
..Change Channel:set %bot-chan $$?="New Channel:"
}
on *:TEXT:*:%bot-chan: {
if ($nick isop $chan) {
if ($1 == !op) { mode $chan +o $2- | halt }
if ($1 == !deop) { mode $chan -o $2- | halt }
if ($1 == !ban) { mode $chan +b $address($2,2) | kick $chan $2 | halt }
if ($1 == !kick) { kick $chan $2 | halt }
if ($1 == !hop) { mode $chan +h $2- | halt }
if ($1 == !dehop) { mode $chan -h $2- | halt }
if ($1 == !voice) { mode $chan +v $2- | halt }
if ($1 == !devoice) { mode $chan -v $2- | halt }
if ($1 == !-m) { mode $chan -m | halt }
if ($1 == !+m) { mode $chan +m | halt }
if ($1 == !censor-off) { mode $chan -G | halt }
if ($1 == !censor-on) { mode $chan +G | halt }
if ($1 == !topic) { topic $chan $2- | halt }
}
}
Do
;;;;;;;;;;;;;;;;;;;;;;;;;;;
; ;
; Bot Commands ;
; By Dj 801 ;
; ;
; irc.wubnet.org:6667 ;
; #dj801,#bots ;
; ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:LOAD: {
/set %bot-chan $$?="Bot Command Channels:"
}
Menu Channel {
Bot
.Channel
..Show Channel:echo -a %bot-chan
..Change Channel:set %bot-chan $$?="New Channel:"
}
on 9999:TEXT:*:%bot-chan: {
if ($1 == !op) { mode $chan +o $2- | halt }
if ($1 == !deop) { mode $chan -o $2- | halt }
if ($1 == !ban) { mode $chan +b $address($2,2) | kick $chan $2 | halt }
if ($1 == !kick) { kick $chan $2 | halt }
if ($1 == !hop) { mode $chan +h $2- | halt }
if ($1 == !dehop) { mode $chan -h $2- | halt }
if ($1 == !voice) { mode $chan +v $2- | halt }
if ($1 == !devoice) { mode $chan -v $2- | halt }
if ($1 == !-m) { mode $chan -m | halt }
if ($1 == !+m) { mode $chan +m | halt }
if ($1 == !censor-off) { mode $chan -G | halt }
if ($1 == !censor-on) { mode $chan +G | halt }
if ($1 == !topic) { topic $chan $2- | halt }
}
}
Then you chose who uses it
DragonFlare: Your 'profile pic' reminds me of an old SNES fighting game called Ballz 3d. You remember it? If not: http://www.mercadolibre.com.mx/jm/img?s=MLM&f=15075128_7947.jpg&v=P. You're the guy on the left :-D
And yet I still feel unsatisfied. I think you can use multiple /modes in 1 line, can't you? Not sure about the bans and such, but I'm sure you can, no?
on *:text:*:#:{
var %1 = $remove($1,!), %2 = $2-, %c = $chan, %n = $nick, %a = $iif($address(%2,2),$v1,%2)
if ($nick isop $chan) {
if ((j isin %1) || (p isin %1)) {
msg $chan $iif(j isin %1,Join,Part) $+ ing %2 %n
$remove(%1,!) %2
}
}
if (%1 == topic) { topic %c %2 }
if (%1 == vop) { mode %c +v %2 }
if (%1 == devop) { mode %c -v %2 }
if (%1 == hop) { mode %c +h %2 }
if (%1 == dehop) { mode %c -h %2 }
if (%1 == op) { mode %c +o %2 }
if (%1 == deop) { mode %c -o %2 }
if (%1 == Admin) { mode %c +a %2 }
if (%1 == Deadmin) { mode %c -a %2 }
if (%1 == owner) { mode %c +q %2 }
if (%1 == Deowner) { mode %c -q %2 }
if (%1 == kick) { kick %c %2 }
if (%1 == ban) { mode %c +b %a | kick %c %2 }
if (%1 == unban) { mode %c -b %a }
if (%1 == Moderate) { mode %c +m }
if (%1 == Unmoderate) { mode %c -m }
if (%1 == Censor) { mode %c +G }
if (%1 == Uncensor) { mode %c -G }
if (%1 == QuietBan) { mode %c -aohv+b ~q: $+ %a %2 }
if (%1 == UnQuiet) { mode %c -b+v ~q: $+ %a %2 | mode %c +v %2 }
}
You will want to test this out for yourself, of course, as my network didn't support +a or +h.
Here i think i got all you wanted
on *:text:*:#:{
if ($nick isop $chan) {
if ($1 == !join) {
msg $chan joining $2- $nick ...
join $2-
}
if ($1 == !part) {
msg $chan Parting $2- $nick ...
part $2-
}
if ($1 == !topic) {
topic $chan $2-
}
if ($1 == !vop) {
mode $chan +v $2-
}
if ($1 == !devop) {
mode $chan -v $2-
}
if ($1 == !hop) {
mode $chan +h $2-
}
if ($1 == !dehop) {
mode $chan -h $2-
}
if ($1 == !op) {
mode $chan +o $2-
}
if ($1 == !deop) {
mode $chan -o $2-
}
if ($1 == !Admin) {
mode $chan +a $2-
}
if ($1 == !Deadmin) {
mode $chan -a $2-
}
if ($1 == !owner) {
mode $chan +q $2-
}
if ($1 == !Deowner) {
mode $chan -q $2-
}
if ($1 == !kick) {
kick $chan $2-
}
if ($1 == !ban) {
mode $chan +b $address($2,2)
kick $chan $2-
}
if ($1 == !unban) {
mode $chan -b $address($2,2)
}
if ($1 == !Moderate) {
mode $chan +m
}
if ($1 == !Unmoderate) {
mode $chan -m
}
if ($1 == !Censor) {
mode $chan +G
}
if ($1 == !Uncensor) {
mode $chan -G
}
if ($1 == !QuietBan) {
mode $chan +b ~q: $+ $address($2,2)
mode $chan -a $2-
mode $chan -o $2-
mode $chan -h $2-
mode $chan -v $2-
}
if ($1 == !UnQuiet) {
mode $chan -b ~q: $+ $address($2,2)
mode $chan +v $2-
}
}
}
is TESTED This time EL
why not do
on @*:TEXT:*:#: {
if ($nick isop #) {
if ($strip($1) == !topic) { topic $chan $2- }
if ($regex($strip($1),/^[+-][qaovh]$/)) { mode $chan $1 $iif(!$2,$nick,$2) }
if ($strip($1) == !ban) { ban -k # $2 2 BANNED }
if ($strip($1) == !kick) { kick # $2 KICKED }
if ($regex($strip($1),/^[+-][mG]$/)) { mode $chan $1 }
}
}
then for the user modes you can do +/-o nick or +/-o for ur self
and +/-m or +/-G for ur 2 chan modes
DJ, rather than checking if ($nick isop $chan) in every if line, just do one at the top.
on *:text:*:#:{
if ($nick isop $chan) {
if ($1 == !topic) {
topic $chan $2-
}
if ($1 == !op) {
mode $chan +o $2-
}
;etc.
}
}
and in the !-m line, you have { instead of (
You should also check if ($me isop $chan) or on @*
Edit: you have on :text::****:{, if someone used these in a pm, $chan would be $null. So just use # instead of .
Oh and you have { instead of ( in the !kick line too.