' {$STAMP BS2}
' {$PBASIC 2.5}
' -----[ Title ]-----------------------------------------------------------------------
' Wat is een Microcontroller - YANKEE DOODLE
'---[Variabelen/constanten/Pins]---
FreqDetectable CON 3000
C6 CON 1047' Piano notes
D6 CON 1175
E6 CON 1319
F6 CON 1397
G6 CON 1568
A6 CON 1760
Be6 CON 1976
C7 CON 2093
D7 CON 2349
E7 CON 2637
F7 CON 2793
G7 CON 3136
A7 CON 3520
Be7 CON 3951
C8 CON 4186' einde van piano notes
Piezospeaker PIN 4' spreker
' -----[ Main Routine ]----------------------------------------------------------------
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, D7
PAUZE 50
FREQOUT Piezospeaker, 500, E7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, E7
PAUZE 50
FREQOUT Piezospeaker, 1000, D7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, D7
PAUZE 50
FREQOUT Piezospeaker, 500, E7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 1000, BE6
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, D7
PAUZE 50
FREQOUT Piezospeaker, 500, E7
PAUZE 50
FREQOUT Piezospeaker, 500, F7
PAUZE 50
FREQOUT Piezospeaker, 500, E7
PAUZE 50
FREQOUT Piezospeaker, 500, D7
PAUZE 50
FREQOUT Piezospeaker, 500, C7
PAUZE 50
FREQOUT Piezospeaker, 500, BE6
PAUZE 50
FREQOUT Piezospeaker, 500, G6
PAUZE 50
FREQOUT Piezospeaker, 500, A6
PAUZE 50
FREQOUT Piezospeaker, 500, BE6
PAUZE 50
FREQOUT Piezospeaker, 1000, C7
PAUZE 50
FREQOUT Piezospeaker, 1000, C7