Moin Ikarus,
den hab ich ja genommen (siehe Code)
Code:
$regfile = "m8def.dat"
$crystal = 3686400
'Outputs
Config Portc.0 = Output
Config Portd.6 = Output
Config Portd.7 = Output
'Aliases
Speaker Alias Portc.0
Button Alias Pind.5
Green Alias Portd.6
Yellow Alias Portd.7
'Initial Bits
Portd.5 = 1
Do
If Button = 0 Then
Sound , Speaker , 50 , 500
Green = 1
Waitms 25
Green = 0
Sound , Speaker , 50 , 250
Yellow = 1
Waitms 25
Yellow = 0
End If
Loop
End
Auf dem MyAVR MK2 USB funktioniert das mit dem Buzzer auch. Es muss also an meiner Schaltung liegen. Anbei auch noch das Datenblatt von dem Buzzer.
Gruß
Demian
Lesezeichen