名前「TALKEX」 公開キー:W25EK394 ご自由にお使いください。

10進数4桁の数を喋らせることのできるTALKEX命令を更新してみた。

一応、355/113でも求められますが、多少誤差が出ます。

マギーさんへ 指摘ありがとうございます。 修正しておきます。

説明:喋ることが出来る桁数は4桁までで、5桁以上にするには、2回以上呼び出さないといけません。 この「TALKEX」命令は、TALKで喋り終わるまで、次の行の命令等は実行しません。 公開キー:NDX3B3C3

TALKEXは、4桁までの10進数の数値を、喋らせることの出来る命令です。 公開キーや詳しい説明はコメントに書きます。

皆さん、ありがとうございます。 よく分かりました。

分かる方はおしえてください。

ありがとうございます！

役にたたなくても良いですよ！

それ以外に使うことはありますか？

百人一首のような取り札も現在作成中…

百人一首を読み上げるプログラムを作成中…

'これで勇者のキャラクターが登場します。 SPSET 0,500

最後のGOTO @Aを、GOTO@Aにしたら1文字減らせます。

@FPS INC FP IF A$!=TIME$ THEN FPS=FP:FP=0:A$=TIME$ ENDIF WAIT LOCATE 0,0 PRINT FPS GOTO@FPS

何行目がどのエラーですか？

あっ、つけたしでこれがだめなら、「新しいメニューを1つ作って、そこに表示する」というのも手もあります。

'SAVE INPUT "セーブすることばは",A$ SAVE "TXT:(14文字までの自由な英数字)",A$ END 'LOAD A$=LOAD("TXT:(14文字までの自由な英数字)",FALSE) PRINT A$