ассемблерная вставка в Delphi, макросы Опции

[marwell]

доброго дня
необходимо вычислить интеграл методом прямоугольников (ассемблерная вставка в Delphi или в паскаль)
сам метод мне понятен
но, на каждом шаге мне нужно будет вычислять значение функции в определенной точке. хотел было использовать макросы
но не тут то было, ни паскаль ни Delphi макросы не принимают
может я неправильно описываю эти макросы?

var n,a,b: integer;
    res, h, x: real;
begin
readln(n);
a:=0;
b:=1;
asm
 fild b
 fisub a
 fidiv n
 call funct
 funct proc
...

[Error] Project1.dpr(18): Undeclared identifier: 'funct'
думал что макросы описываются след образом:
<имя> macro парам1, парам2... парам N
...
...набор команд
...
endm

[IUnknown]

FPC не ругается, в Дельфи сейчас посмотрю.

Update
Да, замени ту строку вот на эту:

      fadd st, st(1)

Сообщение отредактировано: IUnknown - 24.05.2012 16:32

[marwell]

FPC не ругается, в Дельфи сейчас посмотрю.

Update
Да, замени ту строку вот на эту:

      fadd st, st(1)

сделал. Запускается без ошибок. Вот только ответ... Ответ должен быть приблизительно 0.261168 да? А прога при n=100 выдает 62,3434. Чем больше n, тем дальше ответ растет