>>TINYさん お褒めいただきありがとうございます！最初、TINYさんの提案通りにしていたのですが、プログラムを短くするため現在の仕様に変更しました