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).