Skip to content

Instantly share code, notes, and snippets.

@Tamakichi Tamakichi/TONE.adoc
Created Sep 6, 2018

Embed
What would you like to do?
asciiDocサンプル

TONE 単音出力

【書式】

TONE 周波数
TONE 周波数, 出力期間

【引数】

周波数

0 ~ 32767 (Hz) 0の場合は消音

出力期間

0 ~ 32767 (ミリ秒) 0の場合は、継続再生

【説明】

PB9 ピンより、指定した周波数のパルス出力(デューティ比50%)を行います。
PB9 ピンに圧電スピーカー(圧電サウンダ)を接続すること音を出すことが出来ます。

出力期間の指定がある場合は、その期間パスルを出力します(ミリ秒単位)。
出力期間の指定がある場合、出力完了待ちを行います。
出力期間の指定がない場合は、NOTONE コマンドで停止指示をするまでパスルを出力し続けます。
TONE 0は NOTONE と等価です)

Table 1. 音階・周波数対応表

ド♯

レ♯

ファ

ファ♯

ソ♯

ラ♯

1

33

35

37

39

41

44

46

49

52

55

58

62

2

65

69

73

78

82

87

93

98

104

110

117

123

3

131

139

147

156

165

175

185

196

208

220

233

247

4

262

277

294

311

330

349

370

392

415

440

466

494

5

523

554

587

622

659

698

740

784

831

880

932

988

6

1047

1109

1175

1245

1319

1397

1480

1568

1661

1760

1865

1976

7

2093

2217

2349

2489

2637

2794

2960

3136

3322

3520

3729

3951

8

4186

4435

4699

4978

5274

5588

5920

6272

6643

7040

7459

7902

【エラーメッセージ】

Syntax error

文法エラー、書式と異なる利用を行った

Overflow

指定した数値が-32768 ~ 32767を超えている

【利用例】

スペースキーを押したら音を鳴らす
10 IF INKEY() = 32 TONE 800,50
20 GOTO 10
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.