Autobot Player Balancer 1.0

"++" = [$arg1 = (+ (getalias $arg1) 1)]

autobot = [
    _on = $arg1 ; _bol = 0 ; _pol = 0
    _mba = (? (isconnected) (? (ismaster (getclientnum)) (? (isadmin (getclientnum)) 32 8) 0) 32)
    looplist l (listclients 1) [
        cond (> $l 127) [++ _bol] (&& (< $l 128) (! (isspectator $l))) [++ _pol]
    ]
    if (&& (> $arg1 0) $_mba) [
        _num = (+ $_bol $_pol)
        cond (&& (< $_bol $_mba) (< $_num $_on)) [
            loop i (min (- $_on $_num) $_mba) addbot
        ] (&& (< $_on $_num) (> $_bol 0)) [
            loop i (- $_num $_on) delbot
        ]
        sleep 500 [autobot $_on]
    ] [loop i $_bol delbot]
]