extern printf
section .text
global  main

main:
        finit
                fild    dword[a]
                fld     qword[b]
                fld     qword[c]

        mov     ecx, 0
        _petla:
        cmp     ecx, 10
        ja      _konpen

        fld     qword[ak]
        fmul    st2
        fld     qword[ak]
        fmul    qword[ak]
        fmul    st4
        faddp   st1, st0
        fsub    st1
        fstp    qword[wyn]

        fld     qword[k]
        fld     qword[ak]
        faddp   st1, st0
        fstp    qword[ak]

        ;wypisanie na ekran z uzyciem printf
        push    rcx             ;wrzucenie licznika na stos

        sub     rsp, 8  ;trzeba przestawic wskaznik stosu o 8, bo xmm sa 16 bajtowe, qword = 8bajtow
        mov     rdi, typ
        movq    xmm0, qword[wyn]
        mov     rax, 1
        call    printf
        add     rsp, 8
        xor     rdi, rdi


        pop     rcx             ;zdjecie rsi ze stosu

        inc     ecx
        jmp     _petla
        _konpen:

        mov     rax, 1
        int     80h

section .data
ak      dq              0.0             ;aktualny krok w petli
k       dq              0.1             ;krok
typ     db              "%f",0ah        ;typ wyswietlany w printf
a       dd              12
b       dq              2.25
c       dq              4.5
wyn     dq              0.0