grabar voz

[taoru]

hola, intento hacer un programa para grabar la voz en mp3, ahy alguna forma de hacerlo con autoit?.
busqué por el foro pero no vi nada.
existe alguna función que grabe la voz?. o alguna librería que pueda llamar?.
si tienen un código ejemplo se lo agradeceré.

muchísimas gracias.

[gna08]

BUeno. haber.. algo rapido a mano alzadaa es esto..

Código: Seleccionar todo

HotKeySet("{ESC}", "parar")

Global $grabando = 1

MsgBox(0,"Ejemplo de grabacion de sonido - Gn7 xD","Despues de este cartel empieza a grabar... para detener la grabacion presion ESCAPE" & @CRLF & "El archivo se guardar en C:\Grab.wav")

DllCall("winmm.dll","int","mciSendString","str","open new type waveaudio alias media1","str","","int",65534,"hwnd",0) ; Creamos un archivo tipo wav
DllCall("winmm.dll","int","mciSendString","str","record media1","str","","int",65534,"hwnd",0) ; Grabar...

$timer = TimerInit()
While 1
	TrayTip("Grabando...", "Van " & Int(TimerDiff($timer)/1000) & " segundos", 3, 3) ; mostramos y redondeamos a 1 segundo.. ojo k con esto se puede grabar el sonido k genera el tooltip. es solo como para ejemplificar .. una guia..
	If $grabando = 0 Then ;Detener
		DllCall("winmm.dll","int","mciSendString","str","stop media1","str","","int",65534,"hwnd",0) ; parar..
		DllCall("winmm.dll","int","mciSendString","str",'save media1 "C:\Grab.wav"',"str","","int",65534,"hwnd",0) ; Guardar
		DllCall("winmm.dll","int","mciSendString","str","close media1","str","","int",65534,"hwnd",0) ; Cerrar
		ShellExecute("C:\Grab.wav") ; Abrimos lo grabado
		Exit
	EndIf
WEnd

Func parar()
	$grabando = 0
EndFunc

Obvio k es pesima la calidad. jajaja. (esto se puede arreglar no te hagas drama), esta en wav (esto tmb se soluciona) pero es un ejemplo rapido... para k veasmasomenos por donde entrar.. si no entedes algo lo coemntas.. saludos..

[taoru]

muchísimas gracias.
si ya con esto es un pie porque iba re perdido no sabia por donde investigar.

me pongo a revisar un poquito.

gracias!