ich habe mir aus geck ein kleines Hörbereich-tool gemacht.
Diese erhöht einfach nur die Hertzzahl beim beep immer um 1 und spielt den in einer gewünschten länge ab.
optimal sind dabei 100 und 1000 Millisekunden.
Hier ist das Script:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Sebastian\Desktop\autoit\bass\Form1.kxf
$Form1 = GUICreate("music", 256, 101, 520, 349)
$Label1 = GUICtrlCreateLabel("Start-Hertz-Zahl", 8, 8, 102, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Intervall", 8, 32, 50, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("ms", 224, 32, 19, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("", 80, 32, 137, 21)
$Input2 = GUICtrlCreateInput("", 112, 8, 129, 21)
$Button1 = GUICtrlCreateButton("Stop", 16, 64, 49, 33, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Go", 96, 64, 57, 33, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button2
$count=guictrlread($input2)
$dur=guictrlread($input1)
beep($count,$dur)
while 1
if guigetmsg() = $button1 then exitloop
$count=$count+1
GUICtrlSetData($input2,$count)
beep($count,$dur)
wend
EndSwitch
WEnd
Das ist nichts großes