Spela musik på din Boe-bot
"{$STAMP BS2}
"{$PBASIC 2.5}
' -----[ Title ]-----------------------------------------------------------------------
"Vad är en mikrokontroller - YANKEE DOODLE
"---[Variabler/konstanter/Pins]---
FreqDetectable CON 3000
C6 CON 1047' Piano noter
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' slutet av piano noter
Piezospeaker PIN 4' högtalare
' -----[ Main Routine ]----------------------------------------------------------------
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, D7
PAUSA 50
FREQOUT Piezospeaker, 500, E7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, E7
PAUSA 50
FREQOUT Piezospeaker, 1000, D7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, D7
PAUSA 50
FREQOUT Piezospeaker, 500, E7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 1000, BE6
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, D7
PAUSA 50
FREQOUT Piezospeaker, 500, E7
PAUSA 50
FREQOUT Piezospeaker, 500, F7
PAUSA 50
FREQOUT Piezospeaker, 500, E7
PAUSA 50
FREQOUT Piezospeaker, 500, D7
PAUSA 50
FREQOUT Piezospeaker, 500, C7
PAUSA 50
FREQOUT Piezospeaker, 500, BE6
PAUSA 50
FREQOUT Piezospeaker, 500, G6
PAUSA 50
FREQOUT Piezospeaker, 500, A6
PAUSA 50
FREQOUT Piezospeaker, 500, BE6
PAUSA 50
FREQOUT Piezospeaker, 1000, C7
PAUSA 50
FREQOUT Piezospeaker, 1000, C7