Block(JumpLoop(
  Execute(If(
    Get(
      2001
      12
    )
    1
    2
  ))
  Execute(
    Set(
      10000
      8
      Get(
        4000
        0
      )
    )
    Set(
      10000
      9
      Negate(Get(
        10000
        8
      ))
    )
    Set(
      4000
      0
      Get(
        10000
        9
      )
    )
    Set(
      10000
      10
      Get(
        4000
        2
      )
    )
    Set(
      10000
      11
      Negate(Get(
        10000
        10
      ))
    )
    Set(
      4000
      2
      Get(
        10000
        11
      )
    )
    2
  )
  Execute(
    Set(
      10000
      0
      Get(
        4000
        1
      )
    )
    Set(
      10000
      1
      BeatToTime(Get(
        10000
        0
      ))
    )
    Set(
      4000
      3
      Get(
        10000
        1
      )
    )
    Set(
      10000
      2
      Get(
        2000
        1
      )
    )
    Set(
      10000
      3
      Get(
        4000
        3
      )
    )
    Set(
      10000
      4
      Max(
        Get(
          10000
          2
        )
        Get(
          10000
          3
        )
      )
    )
    Set(
      2000
      1
      Get(
        10000
        4
      )
    )
    Set(
      10000
      5
      Get(
        2000
        2
      )
    )
    Set(
      10000
      6
      Get(
        4000
        1
      )
    )
    Set(
      10000
      7
      Max(
        Get(
          10000
          5
        )
        Get(
          10000
          6
        )
      )
    )
    Set(
      2000
      2
      Get(
        10000
        7
      )
    )
    3
  )
  0
))