user: 请将以下的汇编代码转换成C语言代码：

```asm
<vparms>:
  endbr64
  push   %r13
  mov    %rcx,%r11
  mov    %rdi,%rax
  lea    -0x64(%rdx),%r10
  push   %r12
  mov    %rdx,%rdi
  pxor   %xmm3,%xmm3
  push   %rbp
  push   %rbx
  sub    $0x18,%rsp
  mov    0x40(%rsp),%r12
  mov    0x60(%rsp),%rcx
  movl   $0x0,(%rcx)
  movq   $0x0,(%r12)
  mov    (%rax),%rbx
  mov    0x8(%rax),%rbp
  lea    -0x1(%r11),%rax
  sub    %rbx,%rbp
  add    $0x1,%rbp
  imul   %rbp,%rax
  mov    %rbp,%r11
  shr    $0x3f,%r11
  add    %rbp,%r11
  mov    %rax,%rdx
  sar    %r11
  shr    $0x3f,%rdx
  add    %rdx,%rax
  sar    %rax
  lea    0x1(%rbx,%rax,1),%rax
  movss  -0x2d8(%rsi,%rax,4),%xmm0
  subss  (%r8),%xmm0
  add    %rax,%r11
  comiss %xmm0,%xmm3
  ja     L215
  movss  D78(%rip),%xmm13
  movaps %xmm13,%xmm0
  cmp    %rax,%r11
  jle    L103
L143:
  mov    (%r9),%rdx
  xor    %ebx,%ebx
  movaps %xmm3,%xmm12
  movaps %xmm3,%xmm5
  movaps %xmm3,%xmm6
  movaps %xmm3,%xmm10
  movaps %xmm3,%xmm11
  movaps %xmm3,%xmm4
  movaps %xmm3,%xmm8
  movaps %xmm3,%xmm7
  movaps %xmm3,%xmm9
  movaps %xmm3,%xmm1
  jmp    L139
  cs nopw 0x0(%rax,%rax,1)
L125:
  xorps  D72(%rip),%xmm2
  add    $0x1,%rbx
  add    $0x1,%rax
  mov    %rbx,(%r12)
  xorps  D72(%rip),%xmm0
  movss  %xmm2,(%r8)
  cmp    %rax,%r11
  je     L173
  mov    (%r9),%rdx
L133:
  movss  (%rcx),%xmm1
L139:
  movss  -0x64(%rdi,%rax,4),%xmm2
  comiss %xmm2,%xmm3
  ja     L183
  movss  -0x2d4(%rsi,%rax,4),%xmm14
  addss  %xmm2,%xmm4
  comiss %xmm14,%xmm3
  ja     L45
L47:
  addss  %xmm14,%xmm7
L109:
  movss  -0x2d8(%rsi,%rax,4),%xmm2
  movaps %xmm14,%xmm15
  subss  %xmm2,%xmm15
  comiss %xmm15,%xmm3
  ja     L116
  addss  %xmm15,%xmm9
L135:
  movaps %xmm14,%xmm15
  mov    %rax,%r13
  mulss  %xmm14,%xmm15
  sub    %rdx,%r13
  mulss  %xmm2,%xmm14
  addss  %xmm15,%xmm12
  addss  %xmm14,%xmm1
  movss  %xmm1,(%rcx)
  movss  -0x64(%rdi,%rax,4),%xmm1
  movss  (%r10,%r13,4),%xmm14
  lea    (%rdx,%rax,1),%r13
  movaps %xmm1,%xmm2
  mulss  %xmm1,%xmm2
  addss  %xmm2,%xmm8
  movaps %xmm14,%xmm2
  mulss  %xmm14,%xmm2
  addss  %xmm2,%xmm11
  movss  (%r10,%r13,4),%xmm2
  movaps %xmm2,%xmm15
  mulss  %xmm2,%xmm15
  mulss  %xmm1,%xmm2
  mulss  %xmm14,%xmm1
  movss  D92(%rip),%xmm14
  addss  %xmm15,%xmm10
  addss  %xmm2,%xmm5
  movss  (%r8),%xmm2
  addss  %xmm1,%xmm6
  movss  -0x2d4(%rsi,%rax,4),%xmm1
  addss  %xmm2,%xmm1
  cmpltss %xmm3,%xmm1
  andps  %xmm1,%xmm14
  andnps %xmm13,%xmm1
  orps   %xmm14,%xmm1
  ucomiss %xmm0,%xmm1
  jp     L125
  jne    L125
  xorps  D72(%rip),%xmm2
  add    $0x1,%rax
  movss  %xmm2,(%r8)
  cmp    %rax,%r11
  jne    L133
L173:
  add    %rbx,%rbx
  comiss %xmm13,%xmm12
  movaps %xmm7,%xmm2
  movss  (%rcx),%xmm1
  pxor   %xmm0,%xmm0
  addss  %xmm7,%xmm2
  cvtsi2ss %rbx,%xmm0
  jb     L176
  divss  %xmm12,%xmm1
L176:
  comiss %xmm13,%xmm2
  movss  %xmm1,(%rcx)
  jb     L171
  divss  %xmm2,%xmm9
L171:
  comiss %xmm13,%xmm11
  mov    0x58(%rsp),%rax
  movaps %xmm6,%xmm2
  movss  %xmm9,(%rax)
  jb     L12
  divss  %xmm11,%xmm2
L12:
  comiss %xmm13,%xmm8
  movaps %xmm5,%xmm1
  jb     L69
  divss  %xmm8,%xmm6
  divss  %xmm8,%xmm1
L69:
  mulss  %xmm6,%xmm2
  comiss %xmm13,%xmm10
  mov    0x68(%rsp),%rax
  movss  %xmm2,(%rax)
  jb     L6
  divss  %xmm10,%xmm5
L6:
  mulss  %xmm5,%xmm1
  mov    0x70(%rsp),%rax
  movss  D21(%rip),%xmm2
  movss  %xmm7,0xc(%rsp)
  movss  %xmm4,0x8(%rsp)
  movss  %xmm1,(%rax)
  pxor   %xmm1,%xmm1
  cvtsi2ss %rbp,%xmm1
  divss  %xmm1,%xmm2
  mulss  %xmm2,%xmm0
  movss  %xmm2,0x4(%rsp)
  call   <lrintf@plt>
  movss  0x8(%rsp),%xmm4
  mulss  D65(%rip),%xmm4
  mulss  0x4(%rsp),%xmm4
  cltq
  mov    %rax,(%r12)
  movaps %xmm4,%xmm0
  movss  %xmm4,0x8(%rsp)
  call   <lrintf@plt>
  movss  0x8(%rsp),%xmm4
  movss  0xc(%rsp),%xmm7
  mov    %eax,%r8d
  mov    $0x7fff,%eax
  cmp    $0x7fff,%r8d
  jle    L211
L56:
  movss  D65(%rip),%xmm0
  mov    0x48(%rsp),%rdx
  mulss  %xmm7,%xmm0
  mov    %rax,(%rdx)
  mulss  0x4(%rsp),%xmm0
  movss  %xmm0,0x4(%rsp)
  call   <lrintf@plt>
  movss  0x4(%rsp),%xmm0
  mov    %eax,%r8d
  mov    $0x7fff,%eax
  cmp    $0x7fff,%r8d
  jle    L67
L134:
  mov    0x50(%rsp),%rdx
  mov    %rax,(%rdx)
  add    $0x18,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
  xchg   %ax,%ax
L116:
  subss  %xmm15,%xmm9
  jmp    L135
  nopw   0x0(%rax,%rax,1)
L183:
  movss  -0x2d4(%rsi,%rax,4),%xmm14
  subss  %xmm2,%xmm4
  comiss %xmm14,%xmm3
  jbe    L47
L45:
  subss  %xmm14,%xmm7
  jmp    L109
  nopw   0x0(%rax,%rax,1)
L215:
  movss  D92(%rip),%xmm0
  movss  D78(%rip),%xmm13
  cmp    %rax,%r11
  jg     L143
L103:
  movl   $0x0,(%rcx)
  movaps %xmm3,%xmm0
  movaps %xmm3,%xmm7
  movaps %xmm3,%xmm8
  movaps %xmm3,%xmm4
  movaps %xmm3,%xmm11
  movaps %xmm3,%xmm10
  movaps %xmm3,%xmm6
  movaps %xmm3,%xmm5
  movaps %xmm3,%xmm9
  jmp    L171
  nopl   0x0(%rax)
L67:
  call   <lrintf@plt>
  cltq
  jmp    L134
  nopl   0x0(%rax)
L211:
  movaps %xmm4,%xmm0
  movss  %xmm7,0x8(%rsp)
  call   <lrintf@plt>
  movss  0x8(%rsp),%xmm7
  cltq
  jmp    L56
```

tool_calls: name: read_data
arguments: data_tag: D78
datatype: byte[4]
name: read_data
arguments: data_tag: D72
datatype: byte[16]
name: read_data
arguments: data_tag: D92
datatype: byte[4]
name: read_data
arguments: data_tag: D21
datatype: byte[4]
name: read_data
arguments: data_tag: D65
datatype: byte[4]

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

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

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

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

tool: {"D65": [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));
}
```