17 lines
312 B
Plaintext
17 lines
312 B
Plaintext
' ########### start ###########
|
|
' pic:PIC16F886
|
|
' ########### end ###########
|
|
|
|
'Tone.gcb
|
|
'This program produces a constant A note (440 Hz)
|
|
'on Digital Pin 5 connected to Piezo speaker on Demo-Shield
|
|
|
|
#chip 16F886, 16
|
|
#include <chipino.h>
|
|
|
|
#define SoundOut D5
|
|
|
|
Do
|
|
Tone 440, 1000
|
|
Loop
|