user: 请从给定的汇编指令推导出C源代码：

```asm
<par_monitor>:
  endbr64
  push   %rbp
  movslq %edi,%r10
  lea    0x2(%rdi),%eax
  mov    %rdx,%r11
  push   %rbx
  imul   $0xcccccccd,%eax,%eax
  mov    %rcx,%rdx
  movslq %esi,%rsi
  lea    0x0(,%r10,4),%rcx
  pxor   %xmm1,%xmm1
  lea    (%r11,%rcx,1),%rbp
  lea    (%r8,%rcx,1),%rbx
  sub    $0x8,%rsp
  add    $0x19999998,%eax
  cvtss2sd 0x0(%rbp),%xmm1
  addsd  (%r9,%rsi,8),%xmm1
  ror    %eax
  cvtsd2ss %xmm1,%xmm1
  movss  %xmm1,(%rbx)
  cmp    $0x19999998,%eax
  jbe    L374
  lea    0x7(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L35
  lea    0x6(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L47
  lea    0x5(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L290
  lea    0x9(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L363
  lea    0x8(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L363
  lea    0x1(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L35
  imul   $0xcccccccd,%edi,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L6
  lea    0x3(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  jbe    L56
  lea    0x4(%rdi),%eax
  imul   $0xcccccccd,%eax,%eax
  add    $0x19999998,%eax
  ror    %eax
  cmp    $0x19999998,%eax
  ja     L35
L56:
  pxor   %xmm0,%xmm0
  comiss %xmm1,%xmm0
  jbe    L35
  movl   $0x0,(%rbx)
L35:
  add    $0x8,%rsp
  pop    %rbx
  pop    %rbp
  ret
  nopw   0x0(%rax,%rax,1)
L374:
  movss  D138(%rip),%xmm0
  comiss %xmm0,%xmm1
  jbe    L93
  cmpl   $0x1,0x4(%rdx,%rcx,1)
  lea    0x4(%rcx),%rax
  je     L89
L57:
  cmpl   $0x1,(%rdx,%r10,4)
  je     L207
L93:
  movss  0x0(%rbp),%xmm0
  divss  %xmm1,%xmm0
  call   <fabs@plt>
  cmp    $0x63,%eax
  jg     L368
  movss  (%rbx),%xmm0
L345:
  pxor   %xmm1,%xmm1
  comiss %xmm0,%xmm1
  jbe    L35
  call   <fabs@plt>
  pxor   %xmm0,%xmm0
  cvtsi2ss %eax,%xmm0
  movss  %xmm0,(%rbx)
  jmp    L35
  xchg   %ax,%ax
L368:
  movss  0x0(%rbp),%xmm0
  divss  D6(%rip),%xmm0
  movss  %xmm0,(%rbx)
  jmp    L345
  nopl   0x0(%rax,%rax,1)
L363:
  movss  0x0(%rbp),%xmm0
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm2
  comiss D122(%rip),%xmm2
  jb     L160
  addss  D122(%rip),%xmm0
  movss  %xmm0,(%rbx)
  jmp    L35
  nopw   0x0(%rax,%rax,1)
L207:
  divss  %xmm1,%xmm0
  movaps %xmm0,%xmm1
  movss  %xmm0,(%rbx)
  jmp    L93
  nopl   0x0(%rax,%rax,1)
L89:
  add    %rax,%r8
  movss  D129(%rip),%xmm1
  addss  (%r8),%xmm1
  movss  %xmm1,(%r8)
  movss  (%rbx),%xmm1
  jmp    L57
  xchg   %ax,%ax
L47:
  movss  0x0(%rbp),%xmm0
  movaps %xmm1,%xmm2
  divss  %xmm0,%xmm2
  comiss D109(%rip),%xmm2
  jb     L67
  mulss  D109(%rip),%xmm0
  movss  %xmm0,(%rbx)
  movss  0x0(%rbp),%xmm0
L144:
  pxor   %xmm1,%xmm1
  comiss %xmm0,%xmm1
  jb     L45
  movl   $0x76453719,0x0(%rbp)
L45:
  comiss (%rbx),%xmm1
  jb     L35
  movl   $0x76453719,(%rbx)
  jmp    L35
  nopw   0x0(%rax,%rax,1)
L67:
  movaps %xmm0,%xmm2
  divss  %xmm1,%xmm2
  comiss D109(%rip),%xmm2
  jb     L144
  divss  D109(%rip),%xmm0
  movss  %xmm0,(%rbx)
  movss  0x0(%rbp),%xmm0
  jmp    L144
  nopl   0x0(%rax,%rax,1)
L160:
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm2
  comiss D122(%rip),%xmm2
  jb     L35
  subss  D122(%rip),%xmm0
  movss  %xmm0,(%rbx)
  jmp    L35
  nopl   (%rax)
L290:
  movaps %xmm1,%xmm0
  divss  0x0(%rbp),%xmm0
  call   <fabs@plt>
  cmp    $0x9,%eax
  jg     L367
  movss  0x0(%rbp),%xmm1
  movss  (%rbx),%xmm0
  movaps %xmm1,%xmm2
  divss  %xmm0,%xmm2
  comiss D109(%rip),%xmm2
  jb     L187
  movaps %xmm1,%xmm0
  divss  D109(%rip),%xmm0
  movss  %xmm0,(%rbx)
L187:
  comiss D109(%rip),%xmm0
  jbe    L278
  movl   $0x41200000,(%rbx)
  jmp    L35
  xchg   %ax,%ax
L367:
  movss  D109(%rip),%xmm0
  mulss  0x0(%rbp),%xmm0
  movss  %xmm0,(%rbx)
  jmp    L187
  nopl   0x0(%rax,%rax,1)
L6:
  movss  D42(%rip),%xmm0
  comiss %xmm1,%xmm0
  jb     L35
  movss  %xmm0,(%rbx)
  jmp    L35
  nopw   0x0(%rax,%rax,1)
L278:
  pxor   %xmm1,%xmm1
  comiss %xmm0,%xmm1
  jbe    L35
  movl   $0x3dcccccd,(%rbx)
  jmp    L35
```

tool_calls: name: read_data
arguments: tag: D138
type_guessed: f32
name: read_data
arguments: tag: D6
type_guessed: f32
name: read_data
arguments: tag: D122
type_guessed: f32
name: read_data
arguments: tag: D129
type_guessed: f32
name: read_data
arguments: tag: D109
type_guessed: f32
name: read_data
arguments: tag: D42
type_guessed: byte[4]

tool: D138: 1

tool: D6: 100

tool: D122: 100000

tool: D129: 90

tool: D109: 10

tool: {"D42": [0x00,0x00,0x00,0xc0]}

assistant: ```c
void par_monitor(int l, int j, float a[], int ia[], float atry[], double da[]) {
  extern int (*pfunc)(const char *, ...);
  extern char device[];
  int hitwall = 0;
  atry[l] = a[l] + da[j];
  if ((l + 2) % 10 == 0) {
    if (atry[l] > 1.) {
      if (ia[l + 1] == 1)
        atry[l + 1] = atry[l + 1] + 90.;
      if (ia[l] == 1)
        atry[l] = 1. / atry[l];
    }
    if (fabs(a[l] / atry[l]) >= 100.) {
      atry[l] = a[l] / 100.;
    };
    if (atry[l] < 0.) {
      atry[l] = fabs(atry[l]);
    };
    return;
  };
  if ((l + 7) % 10 == 0) {
    return;
  };
  if ((l + 6) % 10 == 0) {
    if (atry[l] / a[l] >= 10.) {
      atry[l] = a[l] * 10.;
    } else if (a[l] / atry[l] >= 10.) {
      atry[l] = a[l] / 10.;
    };
    if (a[l] <= 0.00) {
      a[l] = 1e33;
      hitwall = 1;
    };
    if (atry[l] <= 0.00) {
      atry[l] = 1e33;
      hitwall = 1;
    };
    return;
  };
  if ((l + 5) % 10 == 0) {
    if (fabs(atry[l] / a[l]) >= 10.) {
      atry[l] = a[l] * 10.;
    } else if (a[l] / atry[l] >= 10.) {
      atry[l] = a[l] / 10.;
    }
    if (atry[l] > 10.) {
      atry[l] = 10.;
    } else if (atry[l] < 0.0) {
      atry[l] = 0.1;
    };
    return;
  };
  if ((l + 9) % 10 == 0 || (l + 8) % 10 == 0) {
    if (atry[l] - a[l] >= 100000.) {
      atry[l] = a[l] + 100000.;
    } else if (a[l] - atry[l] >= 100000.) {
      atry[l] = a[l] - 100000.;
    };
    return;
  };
  if ((l + 1) % 10 == 0) {
    return;
  };
  if (l % 10 == 0) {
    if (atry[l] <= -2.0) {
      atry[l] = -2.0;
    };
    return;
  };
  if ((l + 3) % 10 == 0 || (l + 4) % 10 == 0) {
    if (atry[l] < 0.)
      atry[l] = 0.0;
    hitwall = 1;
  }
  return;
}
```