Außerdem gibt es doch den Sound Befehl in Bascom:
Code:
'-------------------------------------------------------------
' SOUND.BAS
' Copyright 1999-2003 MCS Electronics
'-------------------------------------------------------------
Dim Pulses As Word , Periods As Word
Pulses = 65535 : Periods = 10000 'set variables
Speaker Alias Portb.1 'define port pin
Sound Speaker , Pulses , Periods 'make some noice
'note that pulses and periods must have a high value for high XTALS
'sound is only intended to make some noise!
'pulses range from 1-65535
'periods range from 1-65535
End
Bei mir funktioniert dieser Code sehr gut (hab irgend einen Piepser damals aus einem anderen Gerät herausgelötet).
Lesezeichen