Skip to content

Instantly share code, notes, and snippets.

@Tamakichi
Created September 6, 2018 07:54
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save Tamakichi/cbc69f27ffb2d2b0b944f3529a2797f2 to your computer and use it in GitHub Desktop.
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