Block(JumpLoop(
  Execute(If(
    Get(
      2001
      12
    )
    1
    2
  ))
  Execute(
    Set(
      10000
      0
      Get(
        4000
        0
      )
    )
    Set(
      4000
      0
      Negate(Get(
        10000
        0
      ))
    )
    Set(
      10000
      0
      Get(
        4000
        2
      )
    )
    Set(
      4000
      2
      Negate(Get(
        10000
        0
      ))
    )
    2
  )
  Execute(
    Set(
      10000
      0
      Get(
        4000
        1
      )
    )
    Set(
      4000
      3
      BeatToTime(Get(
        10000
        0
      ))
    )
    Set(
      10000
      0
      Get(
        2000
        1
      )
    )
    Set(
      10000
      1
      Get(
        4000
        3
      )
    )
    Set(
      2000
      1
      Max(
        Get(
          10000
          0
        )
        Get(
          10000
          1
        )
      )
    )
    Set(
      10000
      0
      Get(
        2000
        2
      )
    )
    Set(
      10000
      1
      Get(
        4000
        1
      )
    )
    Set(
      2000
      2
      Max(
        Get(
          10000
          0
        )
        Get(
          10000
          1
        )
      )
    )
    3
  )
  0
))