#include<stdio.h>
#include <iostream>
using namespace std;

int main()
{
    double minys = 1;
    double a, b, c, x, y;
    double five = 5;
    cout << "a = ";
    cin >> a;
    cout << "b = ";
    cin >> b;
    cout << "c = ";
    cin >> c;
    char m1[] = "-----------------------------\n";
    char m2[] = "|      x      |      y      |\n";
    char m3[] = "-----------------------------\n";
    char s0[] = "| %11.3lf     | %11.3lf     |\n";
    char s1[] = "| %11.3lf     | ----------- |\n";
    double x1 = 0; //левая граница отрезка
    double x2 = 0; //правая граница отрезка
    int key;
    cout << "x1 = ";
    cin >> x1;
    cout << "x2 = ";
    cin >> x2;
    double t; //шаг
    cout << "t = ";
    cin >> t;
    _asm {
        //=====Заголовок таблицы=====
        lea ebx, m1
        push ebx
        call printf
        add esp, 4
        lea ebx, m2
        push ebx
        call printf
        add esp, 4
        lea ebx, m3
        push ebx
        call printf
        add esp, 4
        //=====Таблица значений функции y=====
        //инициализация сопроцессора
        finit
        //загрузить вещественное значение в стек FPU st(0) = x1
        fld x1
        //Сохранить вещественное значение с извлечением из стека x = st(0) и вытолкнуть (x == x1)
        //[стек пуст]
        fstp x
        //st(0) = 0
        //загружает соответствующее константное значение в вершину стека сопроцессора
        fldz
        the_begin :
            fld x2
            //st(0) = x2
            //[st(1) == 0 st(0) == x2]
            fsub x
            //st(0) = st(0)-x (st(0) == (x2–x))
            fcomip st(0), st(1)
            //st(0) сравнить с st(1) и вытолкнуть
            //[st(0) == 0]
            //если (x2-x)<0 (выход за правую границу),
            //то переход на метку end
            jb the_end

            //=====Расчет y(x)=====
            //если x<5, c!=0, то y=-a*x*x-b
            //если x>5, c==0, то y=(x-a)/x
            // но если x==0 – деление на 0
            //иначе y=-(x/c)
            // но если c==0 - деление на 0
            //Стратегия: если значение функции в точке x
            //определено, то результат помещаем в y
            //и key присваиваем 0, иначе key присваиваем 1.
            //В стеке [st(0) == 0]

            //x<5, c!=0, то y=-a*x*x-b
            fld five
            //[st(1) == 0 st(0) == 5]
            fld x
            //[st(1) == 5 st(0) == x]
            fcomip st(0), st(1)
            //если x >= 5,
            //то переход на метку Expression1
            jae Expression1

            fld c
            fcomip st(0), st(1)
            //если c == 0, то переход на метку Expression1
            je Expression1

            // -a*x*x-b
            //Загрузка 0
            fldz
            fsub minys
            fmul a
            fmul x
            fmul x
            fsub b
            //y = st(0) и вытолкнуть (y == -a*x*x-b)
            fstp y
            mov key, 0
            //key = 0 (значение y определено)
            jmp l1

            //случай x>5, c==0, y=(x-a)/x
        Expression1 :
            fld five
            fld x
            fcomip st(0), st(1)
            //если x = 5,
            //то переход на метку Expression2
            je Expression2

            fld c
            fcomip st(0), st(1)
            //если c != 0,
            //то переход на метку Expression2
            jne Expression2

            // (x - a) / x
            fld x
            fcomip st(0), st(1)
            je zero

            fld x
            fsub a
            //(st(0) == x-a)
            fld x
            //[st(2) == 0 st(1) == x-a st(0) == x]

            fdivp st(1), st(0)
            //st(1) = st(1)/st(0) и вытолкнуть
            //[st(1) == 0 st(0) == (x-a)/x]
            fstp y
            //y = st(0) и вытолкнуть (y == (x-a)/x)
            //[st(0) == 0]
            mov key, 0
            //key = 0 (значение y определено)
            jmp l1

            Expression2 :
        fld c
            fcomip st(0), st(1)
            je zero
            // -x / c
            fldz
            fsub minys
            fmul x
            fdiv c
            fstp y
            //y = st(0) и вытолкнуть (y == (-x/c))
            //[st(0) == 0]
            mov key, 0
            //key = 0 (значение y определено)
            jmp l1

            zero :
        mov key, 1
            //key = 1 (значение y не определено)
            l1 :
            //=====Вывод строки таблицы=====
            // если значение функции
            //в точке x определено,
            //то результат лежит в y и key == 0,
            //иначе key == 1
            //В стеке [st(0) == 0]
            cmp key, 0
            //сравнить key c 0
            je l5
            //если равны, переход на метку l5
           //~~~случай, когда y не определен (key==1)~~~
            sub esp, 8
            //указатель сегмента стека esp уменьшить на 8
            fld x
            //st(0) = x [st(1) == 0 st(0) == x]
            fstp qword ptr[esp]
            //st(0) (то есть x) загрузить в сегмент стека
            //(в соответствии с указателем сегмента стека
            //esp) и вытолкнуть [st(0) == 0]
            lea eax, s1
            //поместить адрес строки s1 в eax
            push eax
            //поместить eax (адрес s1) в сегмент стека,
            //автоматически уменьшится указатель сегмента
            //стека esp еще на 4 байта
            call printf
            //вызвать функцию printf(s1,x)
            add esp, 12
            //вернуть указатель сегмента стека esp в
            //исходное состояние (увеличить на 12)
            jmp l6
            //переход на метку l6
            //~~~случай, когда y определен (key==0)~~~
            l5 :
        sub esp, 8
            //указатель сегмента стека esp уменьшить на 8
            fld y
            //st(0) = y [st(1) == 0 st(0) == y]
            fstp qword ptr[esp]
            //st(0) (то есть y) загрузить в сегмент стека
            //(в соответствии с указателем сегмента стека
            //esp) и вытолкнуть [st(0) == 0]
            sub esp, 8
            //указатель сегмента стека esp уменьшить на 8
            fld x
            //st(0) = x [st(1) == 0 st(0) == x]
            fstp qword ptr[esp]
            //st(0) (то есть x) загрузили в сегмент стека
            //(в соответствии с указателем сегмента стека
            //esp) и вытолкнуть [st(0) == 0]
            lea eax, s0
            //поместить адрес строки s0 в eax
            push eax
            //поместить eax (адрес s0) в сегмент стека,
            //автоматически уменьшится указатель сегмента
            //стека esp еще на 4 байта
            call printf
            //вызвать функцию printf(s0,x,y)
            add esp, 20
            //вернуть указатель сегмента стека esp в
            //исходное состояние (увеличть на 20)
            l6:
        fld x
            //st(0) = x
            //[st(1) == 0 st(0) == x]
            fadd t
            //st(0) = st(0)+t (st(0) == (x+t))
            fstp x
            //x = st(0) и вытолкнуть
            //(x увеличился на шаг t) [st(0) == 0]
            jmp the_begin
            //переход на метку begin
            the_end :
    }
    return 0;
}