Nu ik met MikroBasic ben gestart, een eerste programmaatje gemaakt om middels de PIC16F1826 een melodietje te laten spelen.
En wat aanloop-probleempjes:
- Het melodietje speelt wel, maar reageert niet op de schakelaar S1, op poort A.0 (die is dus blijkbaar altijd een '0 ', Hierdoor herhaalt het liedje zich steeds
- De frequentie en de tijden kloppen niet (frequentie te laag, duur te lang). Hie zit dus iets niet goed met de kloksnelheid o.i.d
De code:
'==============================================================================
program Midsomer_1826
'-------------------------------------------------------------------------
'==============================================================================
main:
'==============================================================================
PortA = %11111111
TRISA.0 = 1
TRISB.3 = 0
'
OSCCON = %11110000 '32MHz internal
Sound_Init(PORTB, 3)
while true
if porta.0 = 0 then
delay_ms(20)
if porta.0 = 0 then
Sound_Play(622, 250)
Sound_Play(587, 250)
Sound_Play(622, 250)
Sound_Play(587, 250)
Sound_Play(523, 375)
Sound_Play(466, 125)
Sound_Play(587, 250)
Sound_Play(523, 1000)
delay_ms(1000)
END IF
END IF
wend
'
end.