public function Circle($x1, $y1, $r)
    {
        list($x1, $y1) = $this->scale->Translate($x1, $y1);
        if ($r >= 0) {
            $r = $this->scale->TranslateX($r);