XPSE

have I well something overlooking, durchschaue I now not attempt.

what very GEHTS you really? like Fließkommaoperationen in Assembler write?

11/30/14 ▲

funkheld

Yes..., the would like I.

greeting

XProfan 11

12/01/14 ▲

Habs not from whom eyes verlogen, look once in a while drüber what lying could.

12/02/14 ▲

so ists rather:
Compile Mark Separation

nProc ArcSin2

    Parameters a!
    //Formel welche unten umgesetzt wird: arctan(a!/Sqrt(-a!*a!+1.0))
    mov eax,addr(a!)
    finit
    fld qword ptr [eax]
    fmul qword ptr [eax]
    fsubr qword ptr __xeTF_00//__xeTF_00 Konstante für 0.0
    fadd qword ptr __xeTF_01//__xeTF_00 Konstante für 1.0
    fsqrt
    fdivr qword ptr [eax]
    fld1
    fpatan
    fstp qword ptr [eax]
    wait
    return a!

endproc

Funktionierts?

12/02/14 ▲

Michael
W.

The umgesetzte Formel is:
arctan(a / Sqrt(0.0 - (a * a) + 1.0))

less a get one through "fchs" zustande.
Pi Gibts through "fldpi"

fountain nenn' so did i yet: [...]

System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

Michael
W.

Compile Mark Separation

nProc ArcSin2

    Parameters a!
    //Formel welche unten umgesetzt wird: arctan(a!/Sqrt(-a!*a!+1.0))
    mov eax,addr(a!)
    finit
    fld qword ptr [eax]
    // ergibt: a
    fchs
    // ergibt: -a
    fmul qword ptr [eax]
    // ergibt: -a * a
    fld1
    // ergibt: 1.0  ---  -a * a
    faddp st(1)
    // ergibt: -a * a + 1.0
    fsqrt
    // ergibt: Sqrt(-a * a + 1.0)
    fdivr qword ptr [eax]
    // ergibt: a / Sqrt(-a * a + 1.0)
    fld1
    // ergibt: 1.0  ---  a / Sqrt(-a * a + 1.0)
    fpatan
    // ergibt: ArcTan(a / Sqrt(-a * a + 1.0))
    fwait
    // fwait  statt wait
    fstp qword ptr [eax]
    return a!

endproc

System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

even if one:

{$pushkeyword fchs,faddp,st1}

writes circa these Keywords as "bekannt" To deklarieren,
then bleats jwasm:

Objektcode: TEST.asm(166) : Error A2054: Invalid instruction o
perands

warning: Error in the Assembler.

can now but many causes having.

Michael
W.

Hauptursache is well, the it in the Original St(1) hot must. there I had me from the Farbgebung well into Crazy lead let.

XProfan X3
System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

funkheld

Jup thanks.

[15:11:11] warning: undeklariert : FADDP
[15:14:13] Naehe: ~14, 'FADDP ST1'

somehow go The as Variable abused of XPSE.

greeting

XProfan 11