График функции, приведение координат

[OmegaBerkut]

Доброго времени суток.
В моём задании нужно нарисовать график функции на каком нибудь Graphics (C#).
Моя проблема состоит в следующем:
у меня есть математическая шкала (абсцисса, X), например от -10 до 10, есть ширина изображения, на котором я рисую.
Вопрос: как привести позицию на шкале к координате на изображении ?
Сначала я подумал примерно так:
width - ширина изображения
count - количество делений шкалы
position - выбранная позиция на шкале
тогда конечная точка по x = width/count*position.

В этом случае для position=-10 я получаю отрицательное число (смещение относительно позиции ординаты Y на изображении).
У меня есть позиция этой ординаты, тогда я к полученному значению прибавляю смещение.
Но в результате получается отрицательное число, а как известно - на изображении нет отрицательных координат.
Где я ошибаюсь и что мне делать/исправлять ? Помогите пожалуйста.

[tsar_]

Приведи пример функции.

[OmegaBerkut]

Сообщение от tsar_

Приведи пример функции.

Сама функция не имеет значения. На входе начало и конец шкалы, позиции абсциссы и ординаты, размер изображения и количество делений шкалы.
Но если вам сильно нужно - пример функции: sin(X). Или я вас не правильно понял ?

[tsar_]

Вроде этого?
Прога в архиве.

[OmegaBerkut]

Сообщение от tsar_

Вроде этого?
Прога в архиве.

Вроде как да, но мне бы глянуть на код ... Заранее благодарен.

[tsar_]

С# не знаю, прогу делал на delphi.
Основной код (рисование графика) в обработчике нажатия на кнопку:

//функция для построения графика
function F(x: single):single;
begin
  Result:=sin(x);
end;

procedure TForm1.Button1Click(Sender: TObject);
const Y_SCALE = 100;     //масштаб по оси ординат
var Xmin, Xmax: single;  //min и max значение абсциссы
    X,Y: single;         //текущие абсцисса и ордината
    PX,PY: integer;      //координаты текущего пикселя холста
begin
  //Оставляем только котэ
  PaintBox1.Repaint;

  //задаем min и max значение абсциссы
  Xmin:=SpinEdit1.Value;
  Xmax:=SpinEdit2.Value;

  //вычисляем текущую абсциссу и ординату
  X:=Xmin;
  Y:=Y_SCALE*F(X);

  //по горизонтали начинаем с нуля
  PX:=0;
  //вычисляем количество пикселей холста по вертикали
  PY:=trunc((PaintBox1.height div 2) - Y);

  //перемещаемся в начальную точку
  PaintBox1.Canvas.MoveTo(PX,PY);
  PaintBox1.Canvas.Pen.Width:=3;

  //перебираем пиксели холста по горизонтали
  for PX:=0 to PaintBox1.Width do
    begin
    //вычисляем текущую абсциссу и ординату
    X:=Xmin+PX*(Xmax-Xmin)/PaintBox1.Width;
    Y:=Y_SCALE*F(X);

    //вычисляем количество пикселей холста по вертикали
    PY:=trunc((PaintBox1.height div 2) - Y);

    //рисуем отрезок
    PaintBox1.Canvas.LineTo(PX,PY);
    end;
end;

Красным выделил выражение для подгонки математической шкалы к ширине холста.
По ординате ограничился заданием масштаба (константа Y_SCALE = 100), т.к. sin(x) не может быть больше единицы.
Если надо весь проект, пиши.

[OmegaBerkut]

tsar_, спасибо, по абсциссе всё заработало правильно. По ординате проблема осталась ... Вы показали мне пример со статическим масштабом, а у меня масштаб изменяется (шкала Y тоже имеет определённый пользователем диапазон). И вот я не могу рассчитать координату по Y.
Как рассчитывать масштаб ? Попытался так же, как и масштаб по X - но не почему то результат всегда вне пределов высоты изображения ...

[tsar_]

Можно вот так подкрутить

procedure TForm1.Button1Click(Sender: TObject);
var Xmin, Xmax: single;  //min и max значение абсциссы
    Ymin, Ymax: single;  //min и max значение ординаты
    X,Y: single;         //текущие абсцисса и ордината
    PX,PY: integer;      //координаты текущего пикселя холста
begin
  //Оставляем только котэ
  PaintBox1.Repaint;

  //задаем min и max значение абсциссы
  Xmin:=SpinEdit1.Value;
  Xmax:=SpinEdit2.Value;

  //задаем min и max значение ординаты
  Ymin:=SpinEdit3.Value;
  Ymax:=SpinEdit4.Value;

  //вычисляем текущую абсциссу и ординату
  X:=Xmin;
  Y:=F(X);

  //по горизонтали начинаем с нуля
  PX:=0;
  //вычисляем количество пикселей холста по вертикали
  PY:=PaintBox1.Height-trunc((Y-Ymin)/(Ymax-Ymin)*PaintBox1.Height);

  //перемещаемся в начальную точку
  PaintBox1.Canvas.MoveTo(PX,PY);
  //толщина линии пусть будет 3px
  PaintBox1.Canvas.Pen.Width:=3;

  //перебираем пиксели холста по горизонтали
  for PX:=0 to PaintBox1.Width do
    begin
    //вычисляем текущую абсциссу и ординату
    X:=Xmin+PX*(Xmax-Xmin)/PaintBox1.Width;
    Y:=F(X);

    //вычисляем количество пикселей холста по вертикали
    PY:=PaintBox1.Height-trunc((Y-Ymin)/(Ymax-Ymin)*PaintBox1.Height);

    //рисуем отрезок
    PaintBox1.Canvas.LineTo(PX,PY);
    end;
end;

[OmegaBerkut]

tsar_, премного благодарен за помощь !!

[OmegaBerkut]

Как в этом методе отрисовки графика избавиться от соединяющихся разрывов графиков функций ? Например, tg(x), у которого на графике наблюдаются разрывы с периодом в PI ...
Собственно, на следующем изображении отображён правильный график функции tg(x)


На моём же изображении разрывы соединяются.
Как от этого избавиться ?