ちなみにさっきのプログラムをSmile BASICに翻訳するとこんな感じです。