INKEY$()命令を使った サンプルプログラム