Block(JumpLoop(
  Execute(If(
    Greater(
      Get(
        1001
        2
      )
      0
    )
    1
    2
  ))
  Execute(
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      2000
      0
      Add(
        Get(
          10000
          0
        )
        1
      )
    )
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      2000
      0
      Mod(
        Get(
          10000
          0
        )
        7
      )
    )
    Set(
      2000
      1
      Get(
        1001
        0
      )
    )
    3
  )
  Execute(
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      2000
      0
      Subtract(
        Get(
          10000
          0
        )
        1
      )
    )
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      2000
      0
      Mod(
        Get(
          10000
          0
        )
        7
      )
    )
    Set(
      2000
      1
      Get(
        1001
        0
      )
    )
    3
  )
  0
))