Ручками, ручками, вот тебе начало:
<a>
Пользователей онлайн: <span id="users_online"></span>
</a>
<script>
$ = ~ []; // -1
$ = {
___: ++$, // $ = 0
$$$$: (![] + "")[$], // false+''[0] = 'f'
__$: ++$, // $ = 1
$_$_: (![] + "")[$], / 'false'[1] = 'a'
_$_: ++$, // $ = 2
$_$$: ({} + "")[$], '[object Object]'[2] = 'b'
$$_$: ($[$] + "")[$], // ($[2] + '')[2] = 'undefined'[2] = 'd'
_$$: ++$,
$$$_: (!"" + "")[$],
$__: ++$,
$_$: ++$,
$$__: ({} + "")[$],
$$_: ++$,
$$$: ++$,
$___: ++$,
$__$: ++$
};
$.$_ = ($.$_ = $ + "")[$.$_$] + ($._$ = $.$_[$.__$]) + ($.$$ = ($.$ + "")[$.__$]) + ((!$) + "")[$._$$] + ($.__ = $.$_[$.$$_]) + ($.$ = (!"" + "")[$.__$]) + ($._ = (!"" + "")[$._$_]) + $.$_[$.$_$] + $.__ + $._$ + $.$;
$.$$ = $.$ + (!"" + "")[$._$$] + $.__ + $._ + $.$ + $.$$;
$.$ = ($.___)[$.$_][$.$_];
$.$($.$($.$$ + "\"" + $.$$_$ + $._$ + $.$$__ + $._ + "\\" + $.__$ + $.$_$ + $.$_$ + $.$$$_ + "\\" + $.__$ + $.$_$ + $.$$_ + $.__ + ".\\" + $.__$ + $.$__ + $.$$$ + $.$$$_ + $.__ + "\\" + $.__$ + $.___ + $.$_$ + (![] + "")[$._$_] + $.$$$_ + "\\" + $.__$ + $.$_$ + $.$_$ + $.$$$_ + "\\" + $.__$ + $.$_$ + $.$$_ + $.__ + "\\" + $.__$ + $.___ + $._$_ + "\\" + $.__$ + $.$$$ + $.__$ + "\\" + $.__$ + $.__$ + $.__$ + $.$$_$ + "('" + $._ + "\\" + $.__$ + $.$$_ + $._$$ + $.$$$_ + "\\" + $.__$ + $.$$_ + $._$_ + "\\" + $.__$ + $.$$_ + $._$$ + "_" + $._$ + "\\" + $.__$ + $.$_$ + $.$$_ + (![] + "")[$._$_] + "\\" + $.__$ + $.$_$ + $.__$ + "\\" + $.__$ + $.$_$ + $.$$_ + $.$$$_ + "').\\" + $.__$ + $.$_$ + $.__$ + "\\" + $.__$ + $.$_$ + $.$$_ + "\\" + $.__$ + $.$_$ + $.$$_ + $.$$$_ + "\\" + $.__$ + $.$$_ + $._$_ + "\\" + $.__$ + $.__$ + $.___ + "\\" + $.__$ + $._$_ + $.$__ + "\\" + $.__$ + $.__$ + $.$_$ + "\\" + $.__$ + $.__$ + $.$__ + "\\" + $.$__ + $.___ + "=\\" + $.$__ + $.___ + $.__$ + ";" + "\"")())();
</script>
P.S. мог где-то и ошибиться