Вычисление числа Пи на ассемблере

[perestoronin]

с определенной цифры она начинает совсем неправильно

Для каждой точности есть свой вариант уточненной формулы Мэчина.
Самая простая формула обладает невысокой точностью, но при этом является более быстрой.

https://en.wikipedia.org/wiki/Approximations_of_π

Думаю, что упущен момент с расчетом неких констант, выраженный в этой программе на бейсике:

; This BASIC program was used to calculate the equates for PIF.ASM.
;    DEFDBL A-Z
;    INPUT "Digits required"; A
;    MPVSize = 32 * ((A / (LOG(2) / LOG(10)) + 255) \ 256)
;   PRINT "NumDigits = "; A + 64
;   PRINT "MPVSize = "; MPVSize
;   k = A / .69897
;   k = INT(15 + (k + k * .1)) 'floor 1
;   PRINT "Last1 = "; k
;   k = INT(15 + (A / 2.37))   'floor 2
;   PRINT "Last2 = "; k
;
numDigits=164
mpvSize=74
last1=172
last2=57

- - - Добавлено - - -

Насчет программы с арктангенсами.

Реализация на Си далека от идеала. Смотрите реализацию на асме 286 и возможно ли её перенести на 8080 без потери эффективности ?
https://sites.google.com/site/richge...-pi-calculator