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