PHP+DBus

#!/usr/bin/env php
<?php
print "\033]0;4-HO-MET\007";
while ("" == ($windowId = trim(`wmctrl -l | grep "4-HO-MET" | cut -f 1 -d " "`)));
system("wmctrl -ir $windowId -e 1000,-1,-80,1962,1201");
for(;;){for($i=0;$i<122;$i++)echo chr(rand(32,128));echo"\n";usleep(rand(10000,30000));}
// for(;;){for($i=0;$i<122;$i++)echo"\033[".rand(0,8).";".(rand(0,1)?rand(30,37):rand(40,47))."m".chr(rand(32,128));echo"\n";usleep(rand(10000,30000));}
// for(;;){for($i=0;$i<122;$i++)echo"\033[".rand(1,1).";".(rand(1,1)?rand(30,37):rand(40,47))."m".chr(rand(32,128));echo"\n";usleep(rand(10000,30000));}

#!/usr/bin/env php
<?php
print "\033]0;4-HO-MET\007";
while ("" == ($windowId = trim(`wmctrl -l | grep "4-HO-MET" | cut -f 1 -d " "`)));
system("wmctrl -ir $windowId -e 1000,-1,-80,1962,1201");
// for(;;){for($i=0;$i<122;$i++)echo chr(rand(32,128));echo"\n";usleep(rand(10000,30000));}
// for(;;){for($i=0;$i<122;$i++)echo"\033[".rand(0,8).";".(rand(0,1)?rand(30,37):rand(40,47))."m".chr(rand(32,128));echo"\n";usleep(rand(10000,30000));}
// for(;;){for($i=0;$i<122;$i++)echo"\033[".rand(1,1).";".(rand(1,1)?rand(30,37):rand(40,47))."m".chr(rand(32,128));echo"\n";usleep(rand(10000,30000));}


class RecreationalDrugUse
{
    static $useColor = false;
    static function toggleUseColor() { self::$useColor = !self::$useColor; return ""; }

    static $speed = 20000;
    static function increaseSpeed() { self::$speed = max(0, self::$speed - 5000); return ""; }
    static function decreaseSpeed() { self::$speed += 2500; return ""; }
}

$d = new Dbus(Dbus::BUS_SESSION, true);
$d->requestName("ru.thelogin.media");
$d->registerObject("/ru/thelogin/media", "ru.thelogin.media", "RecreationalDrugUse");

while (true)
{
    if (RecreationalDrugUse::$useColor)
    {
        for($i=0;$i<122;$i++)echo"\033[".rand(1,1).";".(rand(1,1)?rand(30,37):rand(40,47))."m".chr(rand(32,128));
    }
    else
    {
        for($i=0;$i<122;$i++)echo chr(rand(32,128));
    }
    echo"\n";
    usleep(rand(RecreationalDrugUse::$speed * 0.5, RecreationalDrugUse::$speed * 1.5));
    $d->waitLoop(1);
}

dbus-send --session --print-reply --dest=ru.thelogin.media /ru/thelogin/media ru.thelogin.media.decreaseSpeed