<Function>
   <Name>
      LoadSound:TSound( url:Object, loop_flag=False )
   </Name>
   <Parameter>
      url - Pfadangabe zur Sounddatei
      loop - true = Dauerschleife , false = Nicht in Dauerschleife
   </Parameter>
   <Description>
      Um eine Datei nachher mit PlaySound abzuspielen, muss sie
      vorher mit LoadSound geladen werden. Als Parameter gilt es eine Pfadangabe zur Datei
      zu hinterlegen und true oder false für Dauerschleife oder nicht.
   </Description>
   <Return>
      TSound- Objekt
   </Return>
   <Example>
      Graphics (640,480,0,-1)

      Local MeinSound:TSound
      
      MeinSound=LoadSound("shoot.wav",True)
      PlaySound (MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         
      Wend
   </Example>
</Function>
<Function>
   <Name>
      PlaySound:TChannel( sound:TSound, channel:TChannel=Null )
   </Name>
   <Parameter>
      sound - TSound Objekt
      channel - channel durch welchen gespielt werden soll
   </Parameter>
   <Description>
      Dieser Befehl spielt seine Sound-Datei ab, die vorher mit LoadSound geladen wurde.
      Der channel- Parameter beschreibt dabei den Kanal durch welchen die Musik abgespielt wird.
      Wird kein channel angegeben, ermittelt BlitzMax automatisch einen Soundkanal.
   </Description>
   <Return>
      TChannel- Objekt
   </Return>
   <Example>
      Graphics (640,480,0,-1)

      Local MeinSound:TSound
      
      MeinSound=LoadSound("shoot.wav",True)
      PlaySound (MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         
      Wend
   </Example>
</Function>
<Function>
   <Name>
      CueSound:TChannel( sound:TSound, alloced_channel:TChannel=Null )
   </Name>
   <Parameter>
      sound - TSound Objekt
      alloced_channel - channel welcher für die Kanalvorbereitung genutzt werden soll
   </Parameter>
   <Description>
      CueSound bereitet einen Audiokanal für das Abspielen eines Sounds vor.
      Dies ist sinnvoll um die Eigenschaft eines Kanals noch vor dem Abspielen zu verändern.
      z.B. die Lautstärke oder die Tonverschiebung zu verändern.
      Wird kein Kanal ausgewählt, also eine null übergeben, so bestimmt BlitzMax automatisch den Soundkanal.
      Um nach einem CueSound- Befehl den Kanal wieder abzuspielen,
      ist ResumeChannel() erforderlich.
   </Description>
   <Return>
      TChannel- Objekt
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=CueSound(MeinSound)
      SetChannelVolume(MeinKanal,.2)
      ResumeChannel(MeinKanal)
      
      While Not KeyDown(KEY_ESCAPE)
         
      Wend
   </Example>
</Function>
<Function>
   <Name>
      AllocChannel:TChannel()
   </Name>
   <Parameter>
      -
   </Parameter>
   <Description>
      Diese Funktion reserviert einen Kanal, den man später durch PlaySound oder CueSound nutzen kann.
      Jeder Sound der auf einem Kanal genutzt wird, wird gestopt, wenn man versucht den Kanal neuzunutzen.
      
      Um den Kanal wieder freizugeben nutzt man StopChannel().
   </Description>
   <Return>
      TChannel- Objekt
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local i:Int
      Local timer:Int
      
      timer=CreateTimer(20)
      MeinSound=LoadSound("shoot.wav")
      MeinKanal=AllocChannel()
      
      For i=1 To 20
         WaitTimer timer
         PlaySound MeinSound,MeinKanal
      Next
   </Example>
</Function>
<Function>
   <Name>
      StopChannel( channel:TChannel )
   </Name>
   <Parameter>
      channel - TChanell Objekt
   </Parameter>
   <Description>
      Um einen Kanal zu schließen oder wieder freizugeben ist es erforderlich
      StopChannel() einzusetzen.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local i:Int
      Local timer:Int
      
      timer=CreateTimer(20)
      MeinSound=LoadSound("shoot.wav")
      MeinKanal=AllocChannel()
      PlaySound MeinSound,MeinKanal
      StopChannel(MeinKanal)
   </Example>
</Function>
<Function>
   <Name>
      SetChannelVolume( channel:TChannel, volume:Float )
   </Name>
   <Parameter>
      channel - TChanell Objekt
      volume - Lautst&auml;rke
   </Parameter>
   <Description>
      Damit der ein oder andere Sound ein bischen lauter oder leiser klingen soll, einfach
      den zu verändernden Kanal übergeben und die Latstärke.
      
      0 ist stumm, 1 ist volle Lautstärke.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Vol:Float
      Local I:Int
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      
      For I=0 To 9
         _Vol=_Vol+0.1
         SetChannelVolume(MeinKanal,_Vol)
         Input("Lauter? (Enter drücken)")
      Next
   </Example>
</Function>
<Function>
   <Name>
      SetChannelPan( channel:TChannel, pan:Float )
   </Name>
   <Parameter>
      channel - TChanell Objekt
      pan - Audiobalance
   </Parameter>
   <Description>
      Häufig ist es nötig einen Sound mehr von der Linken Seiten erklingen zu
      lassen als von der Rechten oder umgekehrt. Damit verstärkt ihr die Tiefenwirkung
      in euren Spielen und lasst es räumlicher klingen.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Pan:Float
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         _Pan=MouseX () / (GraphicsWidth () / 2.0) - 1
         SetChannelPan(MeinKanal,_Pan)
      Wend
   </Example>
</Function>
<Function>
   <Name>
      SetChannelDepth( channel:TChannel, depth:Float )
   </Name>
   <Parameter>
      channel - TChanell Objekt
      depth - Audiobalance vom Surroundsound
   </Parameter>
   <Description>
      So ähnlich wie SetChannelDepth nur gilt hier nicht die Rechts- und Linksverschiebung des Sounds,
      sondern nach vorne und hinten.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Depth:Float
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         _Depth=MouseY () / (GraphicsHeight () / 2.0) - 1
         SetChannelPan(MeinKanal,_Depth)
      Wend
   </Example>
</Function>
<Function>
   <Name>
      SetChannelRate( channel:TChannel, rate:Float )
   </Name>
   <Parameter>
      channel - TChanell Objekt
      rate - Frequenzmultiplikator
   </Parameter>
   <Description>
      rate ist ein Multiplikator der benutzt wird um die Soundfrequenz
      zu errechnen die auf einem Kanal abgespielt werden.
      Um einen Sound doppelt so schnell wie normal
      abzuspielen setzt man die ChannelRate auf 2.0 .
      3 mal so schnell auf 3.0 usw.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Depth:Float
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      SetChannelRate(MeinKanal, 2)
      
      While Not KeyDown(KEY_ESCAPE)
         
      Wend
   </Example>
</Function>
<Function>
   <Name>
      PauseChannel( channel:TChannel )
   </Name>
   <Parameter>
      channel - TChanell Objekt
   </Parameter>
   <Description>
      Soll ein Kanal für eine gewisse Zeit keinen Ton von sich geben, kann man diesen pausieren.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Depth:Float
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         DrawText("ENTER = Pause",10,10)
         DrawText("LEERTASTE = Resume",10,30)
         If KeyDown(KEY_ENTER)
            PauseChannel(MeinKanal)
         EndIf
         If KeyDown(KEY_SPACE)
            ResumeChannel(MeinKanal)
         EndIf
         Flip
      Wend
   </Example>
</Function>
<Function>
   <Name>
      ResumeChannel( channel:TChannel )
   </Name>
   <Parameter>
      channel - TChanell Objekt
   </Parameter>
   <Description>
      Das einsetzen dieser Funktion hat zur Folge das ein pausierter Kanal wieder aufgenommen wird.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Depth:Float
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         DrawText("ENTER = Pause",10,10)
         DrawText("LEERTASTE = Resume",10,30)
         If KeyDown(KEY_ENTER)
            PauseChannel(MeinKanal)
         EndIf
         If KeyDown(KEY_SPACE)
            ResumeChannel(MeinKanal)
         EndIf
         Flip
      Wend
   </Example>
</Function>
<Function>
   <Name>
      SetChannelPaused( channel:TChannel, paused)
   </Name>
   <Parameter>
      channel - TChanell Objekt
      paused - true = pausieren, false = wiederaufnehmen
   </Parameter>
   <Description>
      Pausiert oder nimmt den Kanal wieder auf.
   </Description>
   <Return>
      -
   </Return>
   <Example>
      Graphics (640,480,0,-1)
      
      Local MeinSound:TSound
      Local MeinKanal:TChannel
      Local _Depth:Float
      
      MeinSound=LoadSound("shoot.wav", True)
      MeinKanal=PlaySound(MeinSound)
      
      While Not KeyDown(KEY_ESCAPE)
         DrawText ("ENTER = Pause",10,10)
         DrawText ("LEERTASTE = Resume",10,30)
         If KeyDown(KEY_ENTER)
            SetChannelPaused(MeinKanal,True)
         EndIf
         If KeyDown(KEY_SPACE)
            SetChannelPaused(MeinKanal,False)
         EndIf
         Flip
      Wend
   </Example>
</Function>