;;;;;;;;;;;;;;;;;;; ; 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 } }