Autolimiter: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
m Explained, structured |
||
Line 3: | Line 3: | ||
It is a prerequisite to set the limit amount for each channel (a positive integer) using variables in the format of '''%limit.#CHANNEL''', or otherwise changing the format used in the script. | It is a prerequisite to set the limit amount for each channel (a positive integer) using variables in the format of '''%limit.#CHANNEL''', or otherwise changing the format used in the script. | ||
/* | |||
This script simply sets a limit to N users + limit amount | |||
whenever someone enters or leaves the channel. The comments | |||
laid out here should describe what is happening within the | |||
script. Made by Daveoh @ QuakeNet. | |||
*/ | |||
/* | |||
The following three events are triggered whenever someone | |||
joins, parts or is kicked from a channel. These events | |||
are all channel associated so we pass the autolimit alias | |||
the channel we want to limit. | |||
*/ | |||
on @*:JOIN:#:autolimit # | on @*:JOIN:#:autolimit # | ||
on @*:PART:#:autolimit # | on @*:PART:#:autolimit # | ||
on @*:KICK:#:autolimit # | on @*:KICK:#:autolimit # | ||
/* | |||
The on QUIT event is not channel associated, meaning we | |||
must loop through all the common channels we are on with | |||
whoever quit and pass these to the autolimit alias. | |||
*/ | |||
on *:QUIT:{ | on *:QUIT:{ | ||
var %i = 1 | var %i = 1 | ||
while ($comchan($nick,%i)) { | while ($comchan($nick,%i)) { | ||
;$comchan returns the Nth common channel which you and the specified user is on. | |||
autolimit $v1 | autolimit $v1 | ||
;$v1 will refer to $comchan($nick,%i) each time the loop is ran. | |||
inc %i | inc %i | ||
} | } | ||
} | } | ||
alias -l autolimit if ($me isop $1 && !$timer(autolimit. $+ $1)) && (%limit. [ $+ [ $1 ] ] ) .timerautolimit. $+ $1 1 10 mode $1 +l $!calc( $!nick( $1 ,0) + $v1 ) | |||
/* | |||
Here we have the alias, this will perform several checks | |||
and then use a timer to determine when the limit is set. | |||
*/ | |||
alias -l autolimit { | |||
;The -l switch means this alias can only be accessed from within this script. | |||
if ($me isop $1) && (!$timer(autolimit. $+ $1)) && (%limit. [ $+ [ $1 ] ] ) { | |||
;We check that we are op on the specified channel, that a timer isn't already active and that a limit variable is set. | |||
.timerautolimit. $+ $1 1 10 mode $1 +l $!calc( $!nick( $1 ,0) + $v1 ) | |||
;The identifiers in this timer will only be evaluated when the timer is triggered, meaning the user count can change in between starting the timer and running it. | |||
;This is achieved with $!, which leaves the identifier unevaluated, evaluating when the timer is ran. | |||
} | |||
} | |||
{{Author|Daveoh}} | {{Author|Daveoh}} | ||
[[Category:Script Archive]] | [[Category:Script Archive]] |
Latest revision as of 11:09, 26 April 2008
This is a very simple yet effective autolimiter. It can be incorporated into a larger script easily, and is recommended to be in a script of its own unless you know how to merge it.
It is a prerequisite to set the limit amount for each channel (a positive integer) using variables in the format of %limit.#CHANNEL, or otherwise changing the format used in the script.
/* This script simply sets a limit to N users + limit amount whenever someone enters or leaves the channel. The comments laid out here should describe what is happening within the script. Made by Daveoh @ QuakeNet. */ /* The following three events are triggered whenever someone joins, parts or is kicked from a channel. These events are all channel associated so we pass the autolimit alias the channel we want to limit. */ on @*:JOIN:#:autolimit # on @*:PART:#:autolimit # on @*:KICK:#:autolimit # /* The on QUIT event is not channel associated, meaning we must loop through all the common channels we are on with whoever quit and pass these to the autolimit alias. */ on *:QUIT:{ var %i = 1 while ($comchan($nick,%i)) { ;$comchan returns the Nth common channel which you and the specified user is on. autolimit $v1 ;$v1 will refer to $comchan($nick,%i) each time the loop is ran. inc %i } } /* Here we have the alias, this will perform several checks and then use a timer to determine when the limit is set. */ alias -l autolimit { ;The -l switch means this alias can only be accessed from within this script. if ($me isop $1) && (!$timer(autolimit. $+ $1)) && (%limit. [ $+ [ $1 ] ] ) { ;We check that we are op on the specified channel, that a timer isn't already active and that a limit variable is set. .timerautolimit. $+ $1 1 10 mode $1 +l $!calc( $!nick( $1 ,0) + $v1 ) ;The identifiers in this timer will only be evaluated when the timer is triggered, meaning the user count can change in between starting the timer and running it. ;This is achieved with $!, which leaves the identifier unevaluated, evaluating when the timer is ran. } }
Contributed by Daveoh |