Block(JumpLoop(
  Execute(
    Set(
      10000
      0
      Get(
        4000
        0
      )
    )
    Set(
      4000
      2
      BeatToTime(Get(
        10000
        0
      ))
    )
    1
  )
  0
))