これがプログラムです。(この下にもありますが、そこは、ボタン判定です。)