user: Please show me the C implementation that matches the assembly code listed below:

```asm
<vparms>:
  endbr64
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x10,%rsp
  mov    %rdi,%rbp
  mov    %rdx,%rdi
  mov    %rcx,%rax
  mov    0x30(%rsp),%rbx
  mov    0x50(%rsp),%rcx
  lea    -0x64(%rdx),%r10
  movl   $0x0,(%rcx)
  movq   $0x0,(%rbx)
  mov    0x0(%rbp),%r11
  mov    0x8(%rbp),%rbp
  sub    %r11,%rbp
  add    $0x1,%rbp
  sub    $0x1,%rax
  imul   %rbp,%rax
  mov    %rax,%rdx
  shr    $0x3f,%rdx
  add    %rdx,%rax
  sar    %rax
  lea    0x1(%r11,%rax,1),%rax
  mov    %rbp,%r11
  shr    $0x3f,%r11
  add    %rbp,%r11
  sar    %r11
  add    %rax,%r11
  movss  -0x2d8(%rsi,%rax,4),%xmm0
  subss  (%r8),%xmm0
  movss  D153(%rip),%xmm2
  pxor   %xmm1,%xmm1
  comiss %xmm0,%xmm1
  ja     L196
  movss  D196(%rip),%xmm2
L196:
  cmp    %rax,%r11
  jle    L46
  pxor   %xmm1,%xmm1
  movaps %xmm1,%xmm4
  movaps %xmm1,%xmm3
  movaps %xmm1,%xmm7
  movaps %xmm1,%xmm8
  movss  %xmm1,0x8(%rsp)
  movaps %xmm1,%xmm6
  movss  %xmm1,0x4(%rsp)
  movaps %xmm1,%xmm5
  movaps %xmm1,%xmm14
  movaps %xmm1,%xmm10
  movss  D153(%rip),%xmm9
  movss  D34(%rip),%xmm11
  jmp    L178
L45:
  movss  0x8(%rsp),%xmm12
  subss  %xmm0,%xmm12
  movss  %xmm12,0x8(%rsp)
  jmp    L151
L55:
  movss  0x4(%rsp),%xmm15
  subss  %xmm0,%xmm15
  movss  %xmm15,0x4(%rsp)
  jmp    L274
L123:
  subss  %xmm13,%xmm5
  jmp    L16
L58:
  addq   $0x1,(%rbx)
  xorps  D34(%rip),%xmm2
L148:
  movss  (%r8),%xmm0
  xorps  %xmm11,%xmm0
  movss  %xmm0,(%r8)
  add    $0x1,%rax
  cmp    %rax,%r11
  je     L230
L178:
  mov    %rax,%rdx
  movss  -0x64(%rdi,%rax,4),%xmm0
  comiss %xmm0,%xmm14
  ja     L45
  addss  0x8(%rsp),%xmm0
  movss  %xmm0,0x8(%rsp)
L151:
  movss  -0x2d4(%rsi,%rdx,4),%xmm0
  pxor   %xmm12,%xmm12
  comiss %xmm0,%xmm12
  ja     L55
  movss  0x4(%rsp),%xmm12
  addss  %xmm0,%xmm12
  movss  %xmm12,0x4(%rsp)
L274:
  movss  -0x2d8(%rsi,%rdx,4),%xmm12
  movaps %xmm0,%xmm13
  subss  %xmm12,%xmm13
  pxor   %xmm15,%xmm15
  comiss %xmm13,%xmm15
  ja     L123
  addss  %xmm13,%xmm5
L16:
  movaps %xmm0,%xmm13
  mulss  %xmm0,%xmm13
  addss  %xmm13,%xmm1
  mulss  %xmm12,%xmm0
  addss  (%rcx),%xmm0
  movss  %xmm0,(%rcx)
  movss  -0x64(%rdi,%rdx,4),%xmm13
  movaps %xmm13,%xmm0
  mulss  %xmm13,%xmm0
  addss  %xmm0,%xmm6
  mov    %rax,%r12
  sub    (%r9),%r12
  movss  (%r10,%r12,4),%xmm12
  movaps %xmm12,%xmm0
  mulss  %xmm12,%xmm0
  addss  %xmm0,%xmm8
  mov    %rax,%r12
  add    (%r9),%r12
  movss  (%r10,%r12,4),%xmm0
  movaps %xmm0,%xmm15
  mulss  %xmm0,%xmm15
  addss  %xmm15,%xmm7
  mulss  %xmm13,%xmm0
  addss  %xmm0,%xmm4
  mulss  %xmm13,%xmm12
  addss  %xmm12,%xmm3
  movss  -0x2d4(%rsi,%rdx,4),%xmm0
  addss  (%r8),%xmm0
  cmpltss %xmm10,%xmm0
  movaps %xmm9,%xmm15
  andps  %xmm0,%xmm15
  movss  D196(%rip),%xmm12
  andnps %xmm12,%xmm0
  orps   %xmm0,%xmm15
  ucomiss %xmm2,%xmm15
  jp     L58
  je     L148
  jmp    L58
L230:
  movss  (%rcx),%xmm0
  comiss D196(%rip),%xmm1
  jb     L74
L261:
  divss  %xmm1,%xmm0
  movss  %xmm0,(%rcx)
  movss  0x4(%rsp),%xmm2
  movaps %xmm2,%xmm0
  addss  %xmm2,%xmm0
  comiss D196(%rip),%xmm0
  jb     L184
L72:
  divss  %xmm0,%xmm5
  mov    0x48(%rsp),%rax
  movss  %xmm5,(%rax)
  comiss D196(%rip),%xmm8
  jb     L211
L207:
  movaps %xmm3,%xmm0
  divss  %xmm8,%xmm0
  comiss D196(%rip),%xmm6
  jb     L202
L25:
  divss  %xmm6,%xmm3
  mulss  %xmm0,%xmm3
  mov    0x58(%rsp),%rax
  movss  %xmm3,(%rax)
  comiss D196(%rip),%xmm7
  jb     L108
L203:
  movaps %xmm4,%xmm0
  divss  %xmm7,%xmm0
  divss  %xmm6,%xmm4
  mulss  %xmm4,%xmm0
  mov    0x60(%rsp),%rax
  movss  %xmm0,(%rax)
  pxor   %xmm0,%xmm0
  cvtsi2ss %rbp,%xmm0
  movss  D157(%rip),%xmm1
  movaps %xmm1,%xmm7
  divss  %xmm0,%xmm7
  mov    (%rbx),%rax
  add    %rax,%rax
  pxor   %xmm0,%xmm0
  cvtsi2ss %rax,%xmm0
  movss  %xmm7,0xc(%rsp)
  mulss  %xmm7,%xmm0
  call   <lrintf@plt>
  cltq
  mov    %rax,(%rbx)
  movss  0x8(%rsp),%xmm0
  mulss  D62(%rip),%xmm0
  mulss  0xc(%rsp),%xmm0
  movd   %xmm0,%ebx
  call   <lrintf@plt>
  mov    %eax,%edx
  mov    $0x7fff,%eax
  cmp    $0x7fff,%edx
  jle    L161
L132:
  mov    0x38(%rsp),%rdx
  mov    %rax,(%rdx)
  movss  0x4(%rsp),%xmm0
  mulss  D62(%rip),%xmm0
  mulss  0xc(%rsp),%xmm0
  movd   %xmm0,%ebx
  call   <lrintf@plt>
  mov    %eax,%edx
  mov    $0x7fff,%eax
  cmp    $0x7fff,%edx
  jle    L205
L193:
  mov    0x40(%rsp),%rdx
  mov    %rax,(%rdx)
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  ret
L74:
  movss  D196(%rip),%xmm1
  jmp    L261
L184:
  movss  D196(%rip),%xmm0
  jmp    L72
L211:
  movss  D196(%rip),%xmm8
  jmp    L207
L202:
  movss  D196(%rip),%xmm6
  jmp    L25
L108:
  movss  D196(%rip),%xmm7
  jmp    L203
L161:
  movd   %ebx,%xmm0
  call   <lrintf@plt>
  cltq
  jmp    L132
L205:
  movd   %ebx,%xmm0
  call   <lrintf@plt>
  cltq
  jmp    L193
L46:
  pxor   %xmm5,%xmm5
  movss  %xmm5,0x4(%rsp)
  movaps %xmm5,%xmm6
  movss  %xmm5,0x8(%rsp)
  movaps %xmm5,%xmm8
  movaps %xmm5,%xmm7
  movaps %xmm5,%xmm3
  movaps %xmm5,%xmm4
  movss  D196(%rip),%xmm0
  jmp    L72
```

tool_calls: name: parse_data
arguments: data_label: D153
data_type: byte[4]
name: parse_data
arguments: data_label: D196
data_type: byte[4]
name: parse_data
arguments: data_label: D34
data_type: byte[16]
name: parse_data
arguments: data_label: D157
data_type: byte[4]
name: parse_data
arguments: data_label: D62
data_type: byte[4]

tool: {"D153": [0x00,0x00,0x80,0xbf]}

tool: {"D196": [0x00,0x00,0x80,0x3f]}

tool: {"D34": [0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00]}

tool: {"D157": [0x00,0x00,0xb4,0x42]}

tool: {"D62": [0x00,0x00,0x80,0x3e]}

assistant: ```c
void vparms(long *vwin, float *inbuf, float *lpbuf, long half, float *dither, long *mintau, long *zc, long *lbe, long *fbe, float *qs, float *rc1, float *ar_b, float *ar_f) {
  float temp;
  long vlen, stop, i;
  float e_pre;
  long start;
  float ap_rms, e_0, oldsgn, lp_rms, e_b, e_f, r_b, r_f, e0ap;
  lpbuf -= 25;
  inbuf -= 181;
  lp_rms = 0.f;
  ap_rms = 0.f;
  e_pre = 0.f;
  e0ap = 0.f;
  *rc1 = 0.f;
  e_0 = 0.f;
  e_b = 0.f;
  e_f = 0.f;
  r_f = 0.f;
  r_b = 0.f;
  *zc = 0;
  vlen = vwin[1] - vwin[0] + 1;
  start = vwin[0] + (half - 1) * vlen / 2 + 1;
  stop = start + vlen / 2 - 1;
  oldsgn = ((inbuf[start - 1] - *dither) < 0.0f) ? -1.0f : 1.0f;
  for (i = start; i <= stop; ++i) {
    if (lpbuf[i] < 0.0f)
      lp_rms -= lpbuf[i];
    else
      lp_rms += lpbuf[i];
    if (inbuf[i] < 0.0f)
      ap_rms -= inbuf[i];
    else
      ap_rms += inbuf[i];
    temp = inbuf[i] - inbuf[i - 1];
    if (temp < 0.0f)
      e_pre -= temp;
    else
      e_pre += temp;
    e0ap += inbuf[i] * inbuf[i];
    *rc1 += inbuf[i] * inbuf[i - 1];
    e_0 += lpbuf[i] * lpbuf[i];
    e_b += lpbuf[i - *mintau] * lpbuf[i - *mintau];
    e_f += lpbuf[i + *mintau] * lpbuf[i + *mintau];
    r_f += lpbuf[i] * lpbuf[i + *mintau];
    r_b += lpbuf[i] * lpbuf[i - *mintau];
    if ((((inbuf[i] + *dither) < 0.0f) ? -1.0f : 1.0f) != oldsgn) {
      ++(*zc);
      oldsgn = -oldsgn;
    }
    *dither = -(*dither);
  }
  *rc1 /= ((e0ap) >= (1.f) ? (e0ap) : (1.f));
  *qs = e_pre / ((ap_rms * 2.f) >= (1.f) ? (ap_rms * 2.f) : (1.f));
  *ar_b = r_b / ((e_b) >= (1.f) ? (e_b) : (1.f)) * (r_b / ((e_0) >= (1.f) ? (e_0) : (1.f)));
  *ar_f = r_f / ((e_f) >= (1.f) ? (e_f) : (1.f)) * (r_f / ((e_0) >= (1.f) ? (e_0) : (1.f)));
  *zc = lrintf((float)(*zc << 1) * (90.f / vlen));
  *lbe = ((lrintf(lp_rms * 0.25f * (90.f / vlen))) <= (32767) ? (lrintf(lp_rms * 0.25f * (90.f / vlen))) : (32767));
  *fbe = ((lrintf(ap_rms * 0.25f * (90.f / vlen))) <= (32767) ? (lrintf(ap_rms * 0.25f * (90.f / vlen))) : (32767));
}
```