[pascal] rysowanie wykresu funkcji

Witam :)
Napisałem w Pascalu taki kodzik:

program funkcje;
uses graph, crt;
var k,t,i:integer;

begin
initgraph(k,t,'D:\Programy\Free Pascal IDE\units\i386-win32\graph\');

{rysowanie ukladu}
setbkcolor(white);
line(0, getmaxy div 2, getmaxx,getmaxy div 2);
line(getmaxx div 2, 0, getmaxx div 2, getmaxy);
outtextxy(getmaxx - 5, getmaxy div 2 - 3 ,'>');
outtextxy(getmaxx div 2 - 3, 0,'^');


setbkcolor(blue);
{sinus - wykres}
for i:=0 to getmaxx do
        begin
        putpixel(i,Trunc(getmaxy div 2 - 15 * sin(i/10)),14);
        delay(0);
        end;

readln;

closegraph;
end.

Program wykreśla funkcję sinus, i wszystko ładnie, ale pojawiają się problemy i pytania:

• jak nanieść jednostki na osie układu?
• jak rysować, aby wykres zawsze zgadzał się z rzeczywistością? (spójrzcie na wykres, będzie wiadomo o co mi chodzi :) )