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

```asm
<pie_intercept>:
  endbr64
  push   %r13
  pxor   %xmm3,%xmm3
  movapd %xmm0,%xmm5
  mov    %rdx,%r13
  push   %r12
  mov    %esi,%r12d
  push   %rbp
  mov    %rcx,%rbp
  push   %rbx
  mov    %edi,%ebx
  sub    $0x28,%rsp
  comisd %xmm2,%xmm3
  movsd  D69(%rip),%xmm0
  jbe    L128
  nop
L94:
  addsd  %xmm0,%xmm2
  comisd %xmm2,%xmm3
  ja     L94
  comisd %xmm0,%xmm2
  jb     L101
L8:
  subsd  %xmm0,%xmm2
L128:
  comisd %xmm0,%xmm2
  jae    L8
L101:
  movsd  D13(%rip),%xmm8
  movapd %xmm2,%xmm0
  movq   D5(%rip),%xmm7
  movsd  D43(%rip),%xmm6
  subsd  %xmm8,%xmm0
  andpd  %xmm7,%xmm0
  comisd %xmm0,%xmm6
  ja     L122
  movapd %xmm2,%xmm0
  andpd  %xmm7,%xmm0
  comisd %xmm0,%xmm6
  ja     L76
  comisd %xmm2,%xmm8
  ja     L38
  movapd %xmm2,%xmm0
  subsd  D44(%rip),%xmm0
  movq   $0x0,0x0(%rbp)
  movapd %xmm3,%xmm4
  andpd  %xmm7,%xmm0
  comisd %xmm0,%xmm6
  ja     L28
L67:
  divsd  %xmm8,%xmm2
  movsd  %xmm1,0x18(%rsp)
  movsd  %xmm5,0x10(%rsp)
  movsd  %xmm4,0x8(%rsp)
  mulsd  D68(%rip),%xmm2
  movapd %xmm2,%xmm0
  call   <tan@plt>
  movsd  0x8(%rsp),%xmm4
  movsd  0x18(%rsp),%xmm1
  pxor   %xmm3,%xmm3
  movsd  0x10(%rsp),%xmm5
  subsd  %xmm1,%xmm4
  movapd %xmm4,%xmm2
  divsd  %xmm0,%xmm2
  addsd  %xmm5,%xmm2
  comisd %xmm2,%xmm3
  movsd  %xmm2,0x0(%r13)
  ja     L22
  add    $0x1,%ebx
  pxor   %xmm3,%xmm3
  cvtsi2sd %ebx,%xmm3
  comisd %xmm3,%xmm2
  ja     L124
  pxor   %xmm0,%xmm0
  xor    %eax,%eax
  cvtsi2sd %r12d,%xmm0
  comisd 0x0(%rbp),%xmm0
  seta   %al
  lea    0x1(%rax,%rax,1),%eax
L54:
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
  nopw   0x0(%rax,%rax,1)
L38:
  movapd %xmm2,%xmm0
  subsd  D41(%rip),%xmm0
  lea    0x1(%r12),%eax
  pxor   %xmm4,%xmm4
  cvtsi2sd %eax,%xmm4
  andpd  %xmm7,%xmm0
  comisd %xmm0,%xmm6
  movsd  %xmm4,0x0(%rbp)
  jbe    L67
  movsd  %xmm5,0x0(%r13)
  add    $0x28,%rsp
  mov    $0x1,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
  nopw   0x0(%rax,%rax,1)
L122:
  movq   $0x0,0x0(%r13)
  mov    $0x2,%eax
  movsd  %xmm1,0x0(%rbp)
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
  nopl   (%rax)
L76:
  add    $0x1,%ebx
  pxor   %xmm0,%xmm0
  mov    $0x4,%eax
  cvtsi2sd %ebx,%xmm0
  movsd  %xmm0,0x0(%r13)
  movsd  %xmm1,0x0(%rbp)
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
L124:
  movapd %xmm3,%xmm2
  mov    $0x4,%eax
  subsd  %xmm5,%xmm2
  mulsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,0x0(%rbp)
  movsd  %xmm3,0x0(%r13)
  jmp    L54
L22:
  mulsd  %xmm5,%xmm0
  mov    $0x2,%eax
  subsd  %xmm0,%xmm1
  movsd  %xmm1,0x0(%rbp)
  movsd  %xmm3,0x0(%r13)
  jmp    L54
L28:
  movsd  %xmm5,0x0(%r13)
  mov    $0x3,%eax
  jmp    L54
```

tool_calls: name: unpack_data
arguments: label: D69
type: f64
name: unpack_data
arguments: label: D13
type: f64
name: unpack_data
arguments: label: D5
type: qword
name: unpack_data
arguments: label: D43
type: byte[8]
name: unpack_data
arguments: label: D44
type: f64
name: unpack_data
arguments: label: D68
type: f64
name: unpack_data
arguments: label: D41
type: f64

tool: D69: 360

tool: D13: 180

tool: D5: 9223372036854775807

tool: {"D43": [0xa7,0x8e,0xa8,0x99,0xc2,0x57,0xf3,0x3a]}

tool: D44: 270

tool: D68: 3.141592653589793

tool: D41: 90

assistant: ```c
int pie_intercept(int width, int height, double xcen, double ycen, double angle, double *xcept, double *ycept) {
  double angl, slope;
  angl = angle;
  while (angl < 0.0)
    angl = angl + 360.0;
  while (angl >= 360.0)
    angl = angl - 360.0;
  if (fabs(angl - 180.0) < 1.0E-24) {
    *xcept = 0.0;
    *ycept = ycen;
    return (2);
  }
  if (fabs(angl - 0.0) < 1.0E-24) {
    *xcept = width + 1;
    *ycept = ycen;
    return (4);
  }
  if (angl >= 360.0)
    angl = angl - 360.0;
  if (angl < 180.0) {
    *ycept = height + 1;
    if (fabs(angl - 90.0) < 1.0E-24) {
      *xcept = xcen;
      return (1);
    }
  } else {
    *ycept = 0.0;
    if (fabs(angl - 270.0) < 1.0E-24) {
      *xcept = xcen;
      return (3);
    }
  }
  angl = (angl / 180.0) * 3.14159265358979323846;
  slope = tan(angl);
  *xcept = xcen + ((*ycept - ycen) / slope);
  if (*xcept < 0) {
    *ycept = (ycen - (xcen * slope));
    *xcept = 0.0;
    return (2);
  } else if (*xcept > (width + 1)) {
    *ycept = (ycen + ((width + 1 - xcen) * slope));
    *xcept = width + 1;
    return (4);
  } else {
    if (*ycept < height)
      return (3);
    else
      return (1);
  }
}
```