Собственно, сабж. Для тех, кто не знает, в этом режиме возможен вывод только с помощью процедур line, linerel, lineto, rectangle и drawpoly. Требуется написать процедуру, для рисования окружностей и дуг.

Заранее спасибо!