Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

2019/05/19 12:48:38

MixJuice GET URL : kidspod.club/mj/840

Voice? (BASIC 1.2.0~+圧電サウンダ)

イチゴジャム リズム (ID=839) の音を聞いていたら、
しゃべってるような状態にできそうな気がして、形にしてみました。
IchigoJam や RPG でキャラクターがしゃべってるような感じです。

BEEP <値> は <値> を小さくする程、高い音になります。
S の文字列や WAIT <値> も変えて、いろいろ試してみて下さい。

文字列を連続して入力したい場合は次に変更・追加します。

20 CLS:POKE #1003,1,34:INPUT S (IchigoCake BASIC は #1003→#1E03)
70 GOTO 20

  • 1
  • 1

SOURCE CODE

NEW

CLS

10 'Voice?
20 S="KATAKANA mo tsukae masu.
30 FOR I=0 TO LEN(S)-1
40 C=ASC(S+I)
50 ? CHR$(C);:BEEP C%128
60 WAIT 6:NEXT:?

'OK

COMMENT