Gast
#335949
Hallo,
kann ich so sound , also einen einzelnen Ton erzugen?
leider höre ich nach dem Drücken des Tasters nichts.
Angeschlossen ist ein Lautsprecher über 1,2k an Pd.3
nach Masse.
Danke
$regfile = "2313def.dat"
$crystal = 3686400
Ddrd = &B0001000
Portd = &B0000100
Do
If Pind.2 = 0 Then
Sound , Portd.3 = 100 , 500
Else
Portd.3 = 0
End If
Loop
End