SHOW:
|
|
- or go back to the newest paste.
| 1 | clampval = [max $arg2 (min $arg3 $arg1)] | |
| 2 | "++" = [$arg1 = (+ (getalias $arg1) 1)] | |
| 3 | ||
| 4 | - | _on = $arg1 ; _bol = 0 ; _pol = 0 |
| 4 | + | |
| 5 | _bol = 0 ; _pol = 0 | |
| 6 | _arg1 = (min $arg1 128) | |
| 7 | _arg2 = (clampval $arg2 1 101) | |
| 8 | _arg3 = (clampval $arg3 1 $_arg2) | |
| 9 | _mba = (? (isconnected) (? (ismaster (getclientnum)) (? (isadmin (getclientnum)) 32 8) 0) 32) | |
| 10 | looplist l (listclients 1) [ | |
| 11 | - | cond (&& (< $_bol $_mba) (< $_num $_on)) [ |
| 11 | + | |
| 12 | - | loop i (min (- $_on $_num) $_mba) addbot |
| 12 | + | |
| 13 | - | ] (&& (< $_on $_num) (> $_bol 0)) [ |
| 13 | + | |
| 14 | - | loop i (- $_num $_on) delbot |
| 14 | + | |
| 15 | cond (&& (< $_bol $_mba) (< $_num $_arg1)) [ | |
| 16 | - | sleep 500 [autobot $_on] |
| 16 | + | loop i (min (- $_arg1 $_num) $_mba) [ |
| 17 | if (> $numargs 1) [ | |
| 18 | addbot (rnd $_arg2 (? (> $numargs 2) $_arg3 $_arg2)) | |
| 19 | ] addbot | |
| 20 | ] | |
| 21 | ] (&& (< $_arg1 $_num) (> $_bol 0)) [ | |
| 22 | loop i (- $_num $_arg1) delbot | |
| 23 | ] | |
| 24 | sleep 500 [autobot $_arg1 $_arg2 $_arg3] | |
| 25 | ] [loop i $_bol delbot] | |
| 26 | ] |