Я с подсистемой Plot не знаком. Поэтому приведу пример, как построить график функции y=d*x^2+f с помощью подсистемы Canvas.

1. В новом модуле SternObx1 создал процедуру Draw* (см. ниже исходный текст модуля).
2. Открыл пустую форму и в меню выбрал Stern, Вставить холст. Отображение холста появилось на форме.
3. В свойстве link отображения указал SternObx1.Draw и нажал OK.

Всё.

Исходный текст модуля:
## Код:
```
MODULE SternObx1;

   IMPORT SternCanvas;

   (* y=d*x^2+f  *)
   (* начало координат располагается в левом верхнем углу *)
   
   CONST 
      d = 1; f = 1; 
      scale = 500; (* масштабный коэффициент для ординаты *)
   
   PROCEDURE Y (x: INTEGER) : INTEGER;
   BEGIN
      RETURN d*(x*x)+f
   END Y;

   PROCEDURE SetPoint(VAR ap: ARRAY OF SternCanvas.Point; x: INTEGER; n: INTEGER);
   BEGIN
         ap[n].x := x; ap[n].y := Y(x) DIV scale;
   END SetPoint;

   PROCEDURE Draw*;
   VAR p: ARRAY 10 OF SternCanvas.Point;
   BEGIN
       SternCanvas.SetBgColor(200,200,200);
      (*подготовка массива точек*)
      SetPoint(p, 20, 0);
      SetPoint(p, 40, 1);
      SetPoint(p, 60, 2);
      SetPoint(p, 80, 3);
      SetPoint(p, 100, 4);
      SetPoint(p, 120, 5);
      SetPoint(p, 140, 6);
      SetPoint(p, 160, 7);
      SetPoint(p, 180, 8);
      SetPoint(p, 200, 9);
      SternCanvas.Path(p, 0, SternCanvas.blue, SternCanvas.openPoly);
   END Draw;

END SternObx1.
```


P.S. Подсистема Canvas требует наличие подсистемы Abf. Привожу ссылки для скачивания.

Подсистема Abf:http://store.oberoncore.ru/BlackBox/com ... 0070730.7z
Подсистема Canvas:download/file.php?id=178