rendered paste body;;;;;;;;;;;;;;;;;;;
; Custom Commands ;
;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;
; Command/Trigger Binds ;
;;;;;;;;;;;;;;;;;;;;;;;;;
on 200:TEXT:*unbind*:#: {
if ($1 == %trig $+ unbind) {
unset % $+ $2 | notice $nick $2 $+ , ubinded successfully.
}
}
on 200:TEXT:*bind*:#:{
if ($1 == %trig $+ bind) {
if ($2 == $null) { notice $nick [BIND] Syntax, %trig $+ bind [^B][COMMAND] [INFO][^B] | halt }
if ($3 == $null) { notice $nick [BIND] Syntax, %trig $+ bind [COMMAND] [^B][INFO][^B] | halt }
if ($2 == trigger) { set %trig $3 | notice $nick Trigger is now set to $3 | halt }
set % $+ $2 $3-
notice $nick Command $2 is now binded as $3-
}
}
;;;;;;;;;;;;;;;;;;;;
; General Commands ;
;;;;;;;;;;;;;;;;;;;;
on 200:TEXT:*spam*:#: {
if ($1 == %trig $+ spam) {
msg $chan $2-
msg $chan $2-
msg $chan $2-
msg $chan $2-
msg $chan $2-
}
}
on 200:TEXT:*set*:#: {
if ($1 == %trig $+ set) {
set % $+ $2-
}
if ($3 == *) {
unset % $+ $2
notice $nick $2 has been unset.
}
}
on 200:TEXT:*say*:#: {
if ($1 == %trig $+ say) {
msg $chan $2-
}
}
on 200:TEXT:*action*:#: {
if ($1 == %trig $+ action) {
/describe $chan $2-
}
}
on 200:TEXT:?trigger:#: {
notice $nick The trigger is currently: %trig
}
on 200:TEXT:*auser*:#: {
if ($1 == %trig $+ auser) {
/auser $2-
}
}
on 200:TEXT:*ruser*:#: {
if ($1 == %trig $+ ruser) {
/ruser $2-
}
}
on 200:TEXT:*down*:#: {
if ($1 == %trig $+ down) {
/cs $chan down
}
}
on 200:TEXT:*up*:#: {
if ($1 == %trig $+ up) {
/cs $chan up
}
}
on 200:TEXT:*topic*:#: {
if ($1 == %trig $+ topic) {
/cs $chan topic $2-
}
}
on 200:TEXT:*greeting*:#: {
if ($1 == %trig $+ greeting) {
/cs $chan set greeting $2-
}
}
on 200:TEXT:*nick*:#: {
if ($1 == %trig $+ nick) {
/nick $2-
}
}
on 200:TEXT:*join*:#: {
if ($1 == %trig $+ join) {
/join $2-
}
}
on 200:TEXT:*part*:#: {
if ($1 == %trig $+ part) {
/part $2-
}
}
;;;;;;;;;;;;;;;;;;;;
; Channel Commands ;
;;;;;;;;;;;;;;;;;;;;
on 200:TEXT:*kick*:#: {
if ($1 == %trig $+ kick) {
/cs $chan kick $2-
}
}
on 200:TEXT:*kb*:#: {
if ($1 == %trig $+ kb) {
/cs $chan kb $2-
}
}
on 200:TEXT:*resync*:#: {
if ($1 == %trig $+ resync) {
/cs $chan resync
}
}
on 200:TEXT:*addcoowner*:#: {
if ($1 == %trig $+ addcoowner) {
/cs $chan addcoowner $2-
/cs $chan resync
}
}
on 200:TEXT:*delcoowner*:#: {
if ($1 == %trig $+ delcoowner) {
/cs $chan delcoowner $2-
/cs $chan resync
}
}
on 200:TEXT:*addmaster*:#: {
if ($1 == %trig $+ addmaster) {
/cs $chan addmaster $2-
/cs $chan resync
}
}
on 200:TEXT:*delmaster*:#: {
if ($1 == %trig $+ delmaster) {
/cs $chan delmaster $2-
/cs $chan resync
}
}
on 200:TEXT:*addop*:#: {
if ($1 == %trig $+ addop) {
/cs $chan addop $2-
/cs $chan resync
}
}
on 200:TEXT:*delop*:#: {
if ($1 == %trig $+ delop) {
/cs $chan delop $2-
/cs $chan resync
}
}
on 200:TEXT:*addpeon*:#: {
if ($1 == %trig $+ addpeon) {
/cs $chan addpeon $2-
/cs $chan resync
}
}
on 200:TEXT:*delpeon*:#: {
if ($1 == %trig $+ delpeon) {
/cs $chan delpeon $2-
/cs $chan resync
}
}
on 200:TEXT:*clvl*:#: {
if ($1 == %trig $+ clvl) {
/cs $chan clvl $2-
/cs $chan resync
}
}
on 200:TEXT:*adduser*:#: {
if ($1 == %trig $+ adduser) {
/cs $chan adduser $2-
/cs $chan resync
}
}
on 200:TEXT:*deluser*:#: {
if ($1 == %trig $+ deluser) {
/cs $chan deluser $2-
/cs $chan resync
}
}
on 200:TEXT:*deop*:#: {
if ($1 == %trig $+ deop) {
/cs $chan deop $2-
}
}
on 200:TEXT:*op*:#: {
if ($1 == %trig $+ op) {
/cs $chan op $2-
}
}
on 200:TEXT:*devoice*:#: {
if ($1 == %trig $+ devoice) {
/cs $chan devoice $2-
}
}
on 200:TEXT:*voice*:#: {
if ($1 == %trig $+ voice) {
/cs $chan voice $2-
}
}
on 200:TEXT:*unsuspend*:#: {
if ($1 == %trig $+ unsuspend) {
/cs $chan unsuspend $2-
}
}
on 200:TEXT:*suspend*:#: {
if ($1 == %trig $+ suspend) {
/cs $chan suspend $2-
}
}
on 200:TEXT:*trim*:#: {
if ($1 == %trig $+ trim) {
/cs $chan trim $2-
}
}
on 200:TEXT:*delban*:#: {
if ($1 == %trig $+ delban) {
/cs $chan delban $2-
}
}
on 200:TEXT:*ban*:#: {
if ($1 == %trig $+ ban) {
/cs $chan addban $2-
}
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Output of Binded Commands ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:TEXT:*:#: {
if ($remove($1,%trig) == % [ $+ [ $right($1,-1) ] ] || $1 == %trig $+ $remove($1,%trig)) {
set %skin 4[1 $remove($1,%trig) 4] 1- % [ $+ [ $remove($1,%trig) ] ]
msg $chan %skin
}
}