Block(JumpLoop(
  Execute(If(
    Get(
      2001
      8
    )
    1
    2
  ))
  Execute(
    Set(
      10000
      4
      Add(
        3
        Multiply(
          Get(
            4000
            0
          )
          32
        )
      )
    )
    Set(
      10000
      0
      Multiply(
        Add(
          Trunc(Divide(
            Get(
              4100
              Get(
                10000
                4
              )
            )
            2
          ))
          0.5
        )
        Get(
          2000
          1
        )
      )
    )
    Set(
      10000
      2
      Subtract(
        Add(
          Get(
            10000
            0
          )
          Multiply(
            Get(
              4100
              Multiply(
                Get(
                  4000
                  0
                )
                32
              )
            )
            0.072
          )
        )
        Divide(
          Subtract(
            Get(
              1000
              1
            )
            Negate(Get(
              1000
              1
            ))
          )
          2
        )
      )
    )
    Set(
      10000
      3
      Subtract(
        Add(
          Get(
            10000
            0
          )
          Multiply(
            Get(
              4100
              Multiply(
                Get(
                  4000
                  1
                )
                32
              )
            )
            0.072
          )
        )
        Divide(
          Subtract(
            Get(
              1000
              1
            )
            Negate(Get(
              1000
              1
            ))
          )
          2
        )
      )
    )
    Set(
      10000
      4
      Lerp(
        -0.9
        0.9
        Divide(
          Mod(
            Get(
              4100
              Get(
                10000
                4
              )
            )
            2
          )
          2
        )
      )
    )
    Set(
      10000
      0
      Subtract(
        Get(
          10000
          4
        )
        0.009
      )
    )
    Set(
      10000
      1
      Add(
        Get(
          10000
          4
        )
        0.009
      )
    )
    Draw(
      18
      Get(
        10000
        2
      )
      Get(
        10000
        0
      )
      Get(
        10000
        2
      )
      Get(
        10000
        1
      )
      Get(
        10000
        3
      )
      Get(
        10000
        1
      )
      Get(
        10000
        3
      )
      Get(
        10000
        0
      )
      Add(
        220000
        Multiply(
          Min(
            Get(
              4100
              Multiply(
                Get(
                  4000
                  0
                )
                32
              )
            )
            Get(
              4100
              Multiply(
                Get(
                  4000
                  1
                )
                32
              )
            )
          )
          100
        )
        Get(
          4100
          Add(
            3
            Multiply(
              Get(
                4000
                0
              )
              32
            )
          )
        )
      )
      Get(
        2001
        9
      )
    )
    3
  )
  Execute(3)
  0
))