sub_76D4F0 proc near                    ; CODE XREF: sub_777A60+1F↓p
.text:0076D4F0
.text:0076D4F0 var_B70= qword ptr -0B70h
.text:0076D4F0 var_B68= qword ptr -0B68h
.text:0076D4F0 var_B58= dword ptr -0B58h
.text:0076D4F0 var_B54= dword ptr -0B54h
.text:0076D4F0 var_B50= qword ptr -0B50h
.text:0076D4F0 var_B48= qword ptr -0B48h
.text:0076D4F0 var_B40= dword ptr -0B40h
.text:0076D4F0 var_B3C= dword ptr -0B3Ch
.text:0076D4F0 var_B38= dword ptr -0B38h
.text:0076D4F0 var_738= byte ptr -738h
.text:0076D4F0 var_72C= dword ptr -72Ch
.text:0076D4F0 var_608= word ptr -608h
.text:0076D4F0 var_408= word ptr -408h
.text:0076D4F0 var_208= word ptr -208h
.text:0076D4F0 var_4= dword ptr -4
.text:0076D4F0 arg_0= dword ptr  8
.text:0076D4F0
.text:0076D4F0 push    ebp
.text:0076D4F1 mov     ebp, esp
.text:0076D4F3 and     esp, 0FFFFFFF8h
.text:0076D4F6 sub     esp, 0B58h
.text:0076D4FC mov     eax, dword_857A00
.text:0076D501 push    ebx
.text:0076D502 push    esi
.text:0076D503 lea     edx, [esp+0B60h+var_738]
.text:0076D50A mov     [esp+0B60h+var_4], eax
.text:0076D511 mov     eax, [ebp+arg_0]
.text:0076D514 mov     ecx, [eax]
.text:0076D516 push    edx
.text:0076D517 push    eax
.text:0076D518 call    dword ptr [ecx+1Ch]
.text:0076D51B test    [esp+0B60h+var_72C], 20000h
.text:0076D526 jz      loc_76D88A
.text:0076D52C mov     eax, dword_19BA9E8
.text:0076D531 fld     dword ptr [eax+28h]
.text:0076D534 fadd    ds:flt_8064CC
.text:0076D53A fstp    dword ptr [esp+0B60h+var_B50]
.text:0076D53E fld     dword ptr [eax+2Ch]
.text:0076D541 fadd    ds:flt_8064CC
.text:0076D547 fstp    dword ptr [esp+0B60h+var_B48]
.text:0076D54B fld     dword ptr [eax+30h]
.text:0076D54E fadd    ds:flt_8064CC
.text:0076D554 fstp    dword ptr [esp+0B60h+var_B50+4]
.text:0076D558 fld     dword ptr [esp+0B60h+var_B50]
.text:0076D55C fmul    ds:flt_806870
.text:0076D562 fld     ds:flt_808164
.text:0076D568 fsub    ds:flt_805738
.text:0076D56E fdiv    ds:flt_80689C
.text:0076D574 fmulp   st(1), st
.text:0076D576 fadd    ds:flt_805738
.text:0076D57C fstp    dword ptr [esp+0B60h+var_B50]
.text:0076D580 fld     dword ptr [esp+0B60h+var_B48]
.text:0076D584 fmul    ds:flt_806870
.text:0076D58A fmul    ds:flt_806754
.text:0076D590 fadd    ds:flt_8064E8
.text:0076D596 fstp    dword ptr [esp+0B60h+var_B48]
.text:0076D59A fld     dword ptr [esp+0B60h+var_B50+4]
.text:0076D59E fmul    ds:flt_806870
.text:0076D5A4 fmul    ds:flt_806754
.text:0076D5AA fadd    ds:flt_8064E8
.text:0076D5B0 fstp    dword ptr [esp+0B60h+var_B50+4]
.text:0076D5B4 cmp     dword ptr [esp+0B60h+var_B50+4], 3F800000h
.text:0076D5BC jnz     short loc_76D5C6
.text:0076D5BE mov     dword ptr [esp+0B60h+var_B50+4], 3F8147AEh
.text:0076D5C6
.text:0076D5C6 loc_76D5C6:                             ; CODE XREF: sub_76D4F0+CC↑j
.text:0076D5C6 xor     ebx, ebx
.text:0076D5C8 xor     eax, eax
.text:0076D5CA mov     [esp+0B60h+var_B54], eax
.text:0076D5CE mov     edi, edi
.text:0076D5D0
.text:0076D5D0 loc_76D5D0:                             ; CODE XREF: sub_76D4F0+F2↓j
.text:0076D5D0 fild    [esp+0B60h+var_B54]
.text:0076D5D4 inc     eax
.text:0076D5D5 cmp     eax, 100h
.text:0076D5DA mov     [esp+0B60h+var_B54], eax
.text:0076D5DE fstp    [esp+eax*4+0B60h+var_B3C]
.text:0076D5E2 jl      short loc_76D5D0
.text:0076D5E4 fld     ds:flt_8064CC
.text:0076D5EA xor     esi, esi
.text:0076D5EC fdiv    dword ptr [esp+0B60h+var_B50]
.text:0076D5F0 fstp    [esp+0B60h+var_B54]
.text:0076D5F4 fld     [esp+0B60h+var_B54]
.text:0076D5F8 fstp    qword ptr [esp+20h]
.text:0076D5FC lea     esp, [esp+0]
.text:0076D600
.text:0076D600 loc_76D600:                             ; CODE XREF: sub_76D4F0+191↓j
.text:0076D600 fld     [esp+esi*4+0B60h+var_B38]
.text:0076D604 sub     esp, 10h
.text:0076D607 fmul    ds:flt_80BD34
.text:0076D60D fstp    [esp+0B70h+var_B54]
.text:0076D611 fld     qword ptr [esp+30h]
.text:0076D615 fstp    [esp+0B70h+var_B68]             ; double
.text:0076D619 fld     [esp+0B70h+var_B54]
.text:0076D61D fstp    [esp+0B70h+var_B70]             ; double
.text:0076D620 call    pow
.text:0076D625 fstp    dword ptr [esp+0B70h+var_B50]
.text:0076D629 add     esp, 10h
.text:0076D62C fld     dword ptr [esp+0B60h+var_B50]
.text:0076D630 fcomp   ds:flt_805738
.text:0076D636 fnstsw  ax
.text:0076D638 test    ah, 5
.text:0076D63B jp      short loc_76D643
.text:0076D63D mov     dword ptr [esp+0B60h+var_B50], ebx
.text:0076D641 jmp     short loc_76D65C
.text:0076D643 ; ---------------------------------------------------------------------------
.text:0076D643
.text:0076D643 loc_76D643:                             ; CODE XREF: sub_76D4F0+14B↑j
.text:0076D643 fld     dword ptr [esp+0B60h+var_B50]
.text:0076D647 fcomp   ds:flt_8064CC
.text:0076D64D fnstsw  ax
.text:0076D64F test    ah, 41h
.text:0076D652 jnz     short loc_76D65C
.text:0076D654 mov     dword ptr [esp+0B60h+var_B50], 3F800000h
.text:0076D65C
.text:0076D65C loc_76D65C:                             ; CODE XREF: sub_76D4F0+151↑j
.text:0076D65C                                         ; sub_76D4F0+162↑j
.text:0076D65C fld     dword ptr [esp+0B60h+var_B50]
.text:0076D660 fmul    ds:flt_80BA3C
.text:0076D666 call    __ftol2
.text:0076D66B movzx   eax, ax
.text:0076D66E mov     [esp+0B60h+var_B54], eax
.text:0076D672 inc     esi
.text:0076D673 cmp     esi, 100h
.text:0076D679 fild    [esp+0B60h+var_B54]
.text:0076D67D fstp    [esp+esi*4+0B60h+var_B3C]
.text:0076D681 jl      loc_76D600
.text:0076D687 fld     flt_84DFB0
.text:0076D68D xor     esi, esi
.text:0076D68F fmul    dword ptr [esp+0B60h+var_B48]
.text:0076D693 fstp    [esp+0B60h+var_B54]
.text:0076D697 fld     [esp+0B60h+var_B54]
.text:0076D69B fstp    [esp+0B60h+var_B48]
.text:0076D69F nop
.text:0076D6A0
.text:0076D6A0 loc_76D6A0:                             ; CODE XREF: sub_76D4F0+2AF↓j
.text:0076D6A0 fld     [esp+0B60h+var_B48]
.text:0076D6A4 sub     esp, 8
.text:0076D6A7 fstp    [esp+0B68h+var_B68]             ; double
.text:0076D6AA call    tan
.text:0076D6AF fadd    ds:dbl_806680
.text:0076D6B5 add     esp, 8
.text:0076D6B8 fmul    ds:dbl_80C1B8
.text:0076D6BE call    __ftol2
.text:0076D6C3 mov     [esp+0B60h+var_B54], eax
.text:0076D6C7 fild    [esp+0B60h+var_B54]
.text:0076D6CB fstp    [esp+0B60h+var_B54]
.text:0076D6CF fld     [esp+esi*4+0B60h+var_B38]
.text:0076D6D3 fcomp   [esp+0B60h+var_B54]
.text:0076D6D7 fnstsw  ax
.text:0076D6D9 test    ah, 5
.text:0076D6DC jp      short loc_76D74C
.text:0076D6DE fld     [esp+0B60h+var_B48]
.text:0076D6E2 sub     esp, 8
.text:0076D6E5 fstp    [esp+0B68h+var_B68]             ; double
.text:0076D6E8 call    tan
.text:0076D6ED fmul    ds:dbl_80C1B8
.text:0076D6F3 add     esp, 8
.text:0076D6F6 fsubr   ds:dbl_80C1B8
.text:0076D6FC call    __ftol2
.text:0076D701 mov     [esp+0B60h+var_B54], eax
.text:0076D705 fild    [esp+0B60h+var_B54]
.text:0076D709 fstp    [esp+0B60h+var_B54]
.text:0076D70D fld     [esp+esi*4+0B60h+var_B38]
.text:0076D711 fcomp   [esp+0B60h+var_B54]
.text:0076D715 fnstsw  ax
.text:0076D717 test    ah, 41h
.text:0076D71A jnz     short loc_76D74C
.text:0076D71C fld     [esp+esi*4+0B60h+var_B38]
.text:0076D720 sub     esp, 8
.text:0076D723 fsub    ds:flt_807780
.text:0076D729 fstp    qword ptr [esp+28h]
.text:0076D72D fld     [esp+0B68h+var_B48]
.text:0076D731 fstp    [esp+0B68h+var_B68]             ; double
.text:0076D734 call    tan
.text:0076D739 fdivr   qword ptr [esp+28h]
.text:0076D73D add     esp, 8
.text:0076D740 fadd    ds:dbl_80C1B8
.text:0076D746 fstp    [esp+esi*4+0B60h+var_B38]
.text:0076D74A jmp     short loc_76D798
.text:0076D74C ; ---------------------------------------------------------------------------