Block(JumpLoop(
  Execute(
    Set(
      10000
      0
      Trunc(Divide(
        Get(
          4000
          2
        )
        2
      ))
    )
    Set(
      10000
      1
      Subtract(
        Add(
          Multiply(
            Add(
              Get(
                10000
                0
              )
              0.5
            )
            Get(
              2000
              1
            )
          )
          0.252
        )
        Divide(
          Subtract(
            Get(
              1000
              1
            )
            Negate(Get(
              1000
              1
            ))
          )
          2
        )
      )
    )
    Set(
      10000
      2
      Subtract(
        Subtract(
          Add(
            Multiply(
              Add(
                Get(
                  10000
                  0
                )
                0.5
              )
              Get(
                2000
                1
              )
            )
            -0.252
          )
          Divide(
            Subtract(
              Get(
                1000
                1
              )
              Negate(Get(
                1000
                1
              ))
            )
            2
          )
        )
        0.21599999999999997
      )
    )
    Set(
      10000
      3
      Lerp(
        -0.9
        0.9
        Divide(
          Mod(
            Get(
              4000
              2
            )
            2
          )
          2
        )
      )
    )
    Draw(
      20
      Get(
        10000
        2
      )
      Subtract(
        Get(
          10000
          3
        )
        0.0018
      )
      Get(
        10000
        2
      )
      Add(
        Get(
          10000
          3
        )
        0.0018
      )
      Get(
        10000
        1
      )
      Add(
        Get(
          10000
          3
        )
        0.0018
      )
      Get(
        10000
        1
      )
      Subtract(
        Get(
          10000
          3
        )
        0.0018
      )
      250000
      0.8
    )
    Print(
      Get(
        4000
        1
      )
      21
      -1
      Add(
        Subtract(
          Add(
            Multiply(
              Add(
                Trunc(Divide(
                  Get(
                    4000
                    2
                  )
                  2
                ))
                0.5
              )
              Get(
                2000
                1
              )
            )
            -0.252
          )
          Divide(
            Subtract(
              Get(
                1000
                1
              )
              Negate(Get(
                1000
                1
              ))
            )
            2
          )
        )
        -0.015
      )
      Lerp(
        -0.9
        0.9
        Divide(
          Mod(
            Get(
              4000
              2
            )
            2
          )
          2
        )
      )
      1
      0
      0.22
      0.12
      0
      4
      1
      1
      0
    )
    1
  )
  0
))