SOUND/de

From MCS Wiki AVR
< SOUND(Difference between revisions)
Jump to: navigation, search
(Funktion)
(Beispiel)
 
(2 intermediate revisions by one user not shown)
Line 65: Line 65:
 
<span style="font-family: Arial;">&nbsp;</span>
 
<span style="font-family: Arial;">&nbsp;</span>
  
= <span class="f_Header">See also</span> =
+
= <span class="f_Header">Siehe auch</span> =
  
 
NONE
 
NONE
Line 73: Line 73:
 
<span style="font-family: Arial;">&nbsp;</span>
 
<span style="font-family: Arial;">&nbsp;</span>
  
= <span class="f_Header">Example</span> =
+
= <span class="f_Header">Beispiel</span> =
  
 
<br/><source lang="bascomavr">
 
<br/><source lang="bascomavr">
Line 85: Line 85:
 
'-----------------------------------------------------------------------------------------
 
'-----------------------------------------------------------------------------------------
 
   
 
   
$regfile = "m48def.dat" ' specify the used micro
+
$regfile = "m48def.dat" ' Mikrocontroller
$crystal = 4000000 ' used crystal frequency
+
$crystal = 4000000 ' Taktfrequenz
 
$baud = 19200 ' use baud rate
 
$baud = 19200 ' use baud rate
 
$hwstack = 32 ' default use 32 for the hardware stack
 
$hwstack = 32 ' default use 32 for the hardware stack
Line 93: Line 93:
 
   
 
   
 
Dim Pulses As Word , Periods As Word
 
Dim Pulses As Word , Periods As Word
Pulses = 65535 : Periods = 10000 'set variables
+
Pulses = 65535 : Periods = 10000 'Werte an Variablen zuweisen
Speaker Alias Portb.1 'define port pin
+
Speaker Alias Portb.1 'Portpin definieren.
 
   
 
   
Sound Speaker , Pulses , Periods 'make some noice
+
Sound Speaker , Pulses , Periods 'Ton erzeugen
'note that pulses and periods must have a high value for high XTALS
+
'Beachten Sie, dass pulses und periods hohe Werte haben müssen für schnelle Takte.
'sound is only intended to make some noise!
+
'SOUND ist nur zum Erzeugen von Piepstönen gedacht.
 
   
 
   
'pulses range from 1-65535
+
'pulses Wertebereich: 1-65535
'periods range from 1-65535
+
'periods Wertebereich: 1-65535
 
End
 
End
 
</source><br/>{{Languages}}
 
</source><br/>{{Languages}}
  
 
[[Category:BASCOM Language Reference/de]]
 
[[Category:BASCOM Language Reference/de]]

Latest revision as of 21:36, 1 March 2013

Contents

Funktion

Gibt Pulse an einem Portpin aus (Tonausgabe).

 

 

Syntax

SOUND pin, duration, pulses

 

 

Anmerkungen

pin

Beliebiger I/O-Pin wie zum Beispiel PORTB.0 etc.

duration

Anzahl auszusendender Pulse. Byte, Integer/Word oder Konstante.

pulses

Zeit, die der Pin pulsiert.

 

Dieses ist der Wert für einen Schleifenzähler.

 

Wenn ein Lautsprecher oder Piezo-Schallgeber an den Portpin angeschlossen wird dann kann man mit SOUND Töne erzeugen.

Der Portpin wird pulses mal an- und ausgeschaltet

Die Schleife wir duration mal ausgeführt.

 

Der SOUND-Befehl ist nicht dafür gedacht, genaue Frequenzen zu erzeugen. Dafür sollte ein Timer benutzt werden.

 

Sound.png

 

 

Siehe auch

NONE

 

 

Beispiel


'-----------------------------------------------------------------------------------------
'name : sound.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo : SOUND
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------
 
$regfile = "m48def.dat" ' Mikrocontroller
$crystal = 4000000 ' Taktfrequenz
$baud = 19200 ' use baud rate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
 
Dim Pulses As Word , Periods As Word
Pulses = 65535 : Periods = 10000 'Werte an Variablen zuweisen
Speaker Alias Portb.1 'Portpin definieren.
 
Sound Speaker , Pulses , Periods 'Ton erzeugen
'Beachten Sie, dass pulses und periods hohe Werte haben müssen für schnelle Takte.
'SOUND ist nur zum Erzeugen von Piepstönen gedacht.
 
'pulses Wertebereich: 1-65535
'periods Wertebereich: 1-65535
End

Languages   English Deutsch  
Personal tools
Namespaces
Variants
Actions
Navigation
In other languages
Language