Mp3 to Wav Converter

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

AutoIt Version: 3.3.5.1 (beta)
Author: Zocker5656

[/autoit] [autoit][/autoit] [autoit]

Script Function:
- Mp3 zu Wav convetieren

[/autoit] [autoit][/autoit] [autoit]

#ce ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

; Script Start

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

#include <GUIConstants.au3>
#include <EditConstants.au3>
#include <Array.au3>

[/autoit] [autoit][/autoit] [autoit]

$message = "Bitte wähle eine Mp3-Datei aus."

[/autoit] [autoit][/autoit] [autoit]

AdlibRegister("checkprogresslabel",100)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;Local

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$input1check = 0
$input2check = 0
$input3check = 0
$input4check = 0
$input5check = 0
$input6check = 0
$input7check = 0
$input8check = 0
$input9check = 0
$input10check = 0
$input11check = 0

[/autoit] [autoit][/autoit] [autoit]

;end local

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

#Region ### START Koda GUI section ### Form=C:\Users\zocker5656\Desktop\Zeugs\mac\Koda\Forms\converter.kxf
$Form1 = GUICreate("Mp3 to Wav Converter 1.1", 633, 447, 193, 125)
$Group1 = GUICtrlCreateGroup("Input", 0, 40, 292, 401)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("1. Leer", 16, 64, 121, 21,$ES_READONLY)
$Button3 = GUICtrlCreateButton("...", 144, 64, 43, 25, 0)
$Input2 = GUICtrlCreateInput("2. Leer", 16, 96, 121, 21,$ES_READONLY)
$Button4 = GUICtrlCreateButton("...", 144, 96, 43, 25, 0)
$Input3 = GUICtrlCreateInput("3. Leer", 16, 128, 121, 21,$ES_READONLY)
$Input4 = GUICtrlCreateInput("4. Leer", 16, 160, 121, 21,$ES_READONLY)
$Input5 = GUICtrlCreateInput("5. Leer", 16, 192, 121, 21,$ES_READONLY)
$Input6 = GUICtrlCreateInput("6. Leer", 16, 224, 121, 21,$ES_READONLY)
$Input7 = GUICtrlCreateInput("7. Leer", 16, 256, 121, 21,$ES_READONLY)
$Input8 = GUICtrlCreateInput("8. Leer", 16, 288, 121, 21,$ES_READONLY)
$Input9 = GUICtrlCreateInput("9. Leer", 16, 320, 121, 21,$ES_READONLY)
$Input10 = GUICtrlCreateInput("10. Leer", 16, 352, 121, 21,$ES_READONLY)
$Input11 = GUICtrlCreateInput("11. Leer", 16, 384, 121, 21,$ES_READONLY)
$Button5 = GUICtrlCreateButton("...", 144, 128, 43, 25, 0)
$Button6 = GUICtrlCreateButton("...", 144, 160, 43, 25, 0)
$Button7 = GUICtrlCreateButton("...", 144, 192, 43, 25, 0)
$Button8 = GUICtrlCreateButton("...", 144, 224, 43, 25, 0)
$Button9 = GUICtrlCreateButton("...", 144, 256, 43, 25, 0)
$Button10 = GUICtrlCreateButton("...", 144, 288, 43, 25, 0)
$Button11 = GUICtrlCreateButton("...", 144, 320, 43, 25, 0)
$Button12 = GUICtrlCreateButton("...", 144, 352, 43, 25, 0)
$Button13 = GUICtrlCreateButton("...", 144, 384, 43, 25, 0)
$Label3 = GUICtrlCreateLabel("Fertig", 200, 64, 44, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label4 = GUICtrlCreateLabel("Fertig", 200, 96, 42, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label5 = GUICtrlCreateLabel("Fertig", 200, 128, 42, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label6 = GUICtrlCreateLabel("Fertig", 200, 160, 42, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label7 = GUICtrlCreateLabel("Fertig", 200, 192, 42, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label8 = GUICtrlCreateLabel("Fertig", 200, 224, 42, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label9 = GUICtrlCreateLabel("Fertig", 200, 256, 42, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label10 = GUICtrlCreateLabel("Fertig", 200, 288, 49, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label11 = GUICtrlCreateLabel("Fertig", 200, 320, 49, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label12 = GUICtrlCreateLabel("Fertig", 200, 352, 49, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
$Label13 = GUICtrlCreateLabel("Fertig", 200, 384, 49, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xC0C0C0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Output", 336, 40, 292, 401)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("GO", 296, 160, 35, 129, 0)
$Progress1 = GUICtrlCreateProgress(8, 16, 502, 15)
$Label1 = GUICtrlCreateLabel("0", 512, 16, 42, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("%", 537, 16, 13, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Datei = GUICtrlCreateMenu("Datei")
$MenuItem5 = GUICtrlCreateMenuItem("Schließen", $Datei)
$Einstellungen = GUICtrlCreateMenu("Einstellungen")
$MenuItem4 = GUICtrlCreateMenuItem("Optionen", $Einstellungen)
$MenuItem2 = GUICtrlCreateMenu("?")
$MenuItem1 = GUICtrlCreateMenuItem("Copyright", $MenuItem2)
$MenuItem3 = GUICtrlCreateMenuItem("Info", $MenuItem2)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

[/autoit] [autoit][/autoit] [autoit]

Case $Datei

Case $Einstellungen

Case $MenuItem1

Case $MenuItem2

Case $MenuItem3

Case $MenuItem4

Case $MenuItem5

Case $Button1
##1
if $input1check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput1 = guictrlread($Input1)
GUICtrlSetData($Progress1,25)
$splitet1 = StringSplit($pfadinput1,"\",1)
$split1 = $splitet1[$splitet1[0]]
GUICtrlSetData($Progress1,40)
$hOutput1 = StringSplit($split1,".",1)
$houtput1 = @ScriptDir & "/Output/" & $hOutput1[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput1 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput1 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label3, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##2
if $input2check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput2 = guictrlread($Input2)
GUICtrlSetData($Progress1,25)
$splitet2 = StringSplit($pfadinput2,"\",1)
$split2 = $splitet2[$splitet2[0]]
GUICtrlSetData($Progress1,40)
$hOutput2 = StringSplit($split2,".",1)
$houtput2 = @ScriptDir & "/Output/" & $hOutput2[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput2 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput2 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label4, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##3
if $input3check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput3 = guictrlread($Input3)
GUICtrlSetData($Progress1,25)
$splitet3 = StringSplit($pfadinput3,"\",1)
$split3 = $splitet3[$splitet3[0]]
GUICtrlSetData($Progress1,40)
$hOutput3 = StringSplit($split3,".",1)
$houtput3 = @ScriptDir & "/Output/" & $hOutput3[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput3 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput3 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label5, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##4
if $input4check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput4 = guictrlread($Input4)
GUICtrlSetData($Progress1,25)
$splitet4 = StringSplit($pfadinput4,"\",1)
$split4 = $splitet4[$splitet4[0]]
GUICtrlSetData($Progress1,40)
$hOutput4 = StringSplit($split4,".",1)
$houtput4 = @ScriptDir & "/Output/" & $hOutput4[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput4 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput4 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label6, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##5
if $input5check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput5 = guictrlread($Input5)
GUICtrlSetData($Progress1,25)
$splitet5 = StringSplit($pfadinput5,"\",1)
$split5 = $splitet5[$splitet5[0]]
GUICtrlSetData($Progress1,40)
$hOutput5 = StringSplit($split5,".",1)
$houtput5 = @ScriptDir & "/Output/" & $hOutput5[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput5 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput5 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label7, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##6
if $input6check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput6 = guictrlread($Input6)
GUICtrlSetData($Progress1,25)
$splitet6 = StringSplit($pfadinput6,"\",1)
$split6 = $splitet6[$splitet6[0]]
GUICtrlSetData($Progress1,40)
$hOutput6 = StringSplit($split6,".",1)
$houtput6 = @ScriptDir & "/Output/" & $hOutput6[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput6 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput6 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label8, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##7
if $input7check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput7 = guictrlread($Input7)
GUICtrlSetData($Progress1,25)
$splitet7 = StringSplit($pfadinput7,"\",1)
$split7 = $splitet7[$splitet7[0]]
GUICtrlSetData($Progress1,40)
$hOutput7 = StringSplit($split7,".",1)
$houtput7 = @ScriptDir & "/Output/" & $hOutput7[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput7 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput7 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label9, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##8
if $input8check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput8 = guictrlread($Input8)
GUICtrlSetData($Progress1,25)
$splitet8 = StringSplit($pfadinput8,"\",1)
$split8 = $splitet8[$splitet8[0]]
GUICtrlSetData($Progress1,40)
$hOutput8 = StringSplit($split8,".",1)
$houtput8 = @ScriptDir & "/Output/" & $hOutput8[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput8 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput8 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label10, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##9
if $input9check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput9 = guictrlread($Input9)
GUICtrlSetData($Progress1,25)
$splitet9 = StringSplit($pfadinput9,"\",1)
$split9 = $splitet9[$splitet9[0]]
GUICtrlSetData($Progress1,40)
$hOutput9 = StringSplit($split9,".",1)
$houtput9 = @ScriptDir & "/Output/" & $hOutput9[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput9 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput9 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label11, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##10
if $input10check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput8 = guictrlread($Input10)
GUICtrlSetData($Progress1,25)
$splitet10 = StringSplit($pfadinput10,"\",1)
$split10 = $splitet10[$splitet10[0]]
GUICtrlSetData($Progress1,40)
$hOutput10 = StringSplit($split10,".",1)
$houtput10 = @ScriptDir & "/Output/" & $hOutput10[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput10 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput10 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label12, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf
##11
if $input11check = 1 Then
GUICtrlSetData($Progress1,15)
$hInput11 = guictrlread($Input11)
GUICtrlSetData($Progress1,25)
$splitet11 = StringSplit($pfadinput11,"\",1)
$split11 = $splitet11[$splitet11[0]]
GUICtrlSetData($Progress1,40)
$hOutput11 = StringSplit($split11,".",1)
$houtput11 = @ScriptDir & "/Output/" & $hOutput11[1] & ".wav"
GUICtrlSetData($Progress1,55)
Run(@ScriptDir & '/ffmpeg.exe -i "' & $hInput11 & '" -acodec libmp3lame -ab 256k -ac 2 -y "' & $houtput11 &'"',"",@SW_HIDE)
GUICtrlSetData($Progress1,80)
ProcessWaitClose("ffmpeg.exe") ;wartet bis konvertieren abgeschlossen ist
GUICtrlSetData($Progress1,100)
GUICtrlSetColor($Label13, 0xFF0000)
GUICtrlSetData($Progress1,0)
EndIf


Case $Button3

[/autoit] [autoit][/autoit] [autoit]

$pfadinput1 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input1check = 0
Else
guictrlsetdata($Input1,$pfadinput1)
$input1check = 1
GUICtrlSetColor($Label3, 0xC0C0C0)
EndIf

[/autoit] [autoit][/autoit] [autoit]

Case $Button4

$pfadinput2 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input2check = 0
Else
guictrlsetdata($Input2,$pfadinput2)
$input2check = 1
GUICtrlSetColor($Label4, 0xC0C0C0)
EndIf

Case $Button5

$pfadinput3 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input3check = 0
Else
guictrlsetdata($Input3,$pfadinput3)
$input3check = 1
GUICtrlSetColor($Label5, 0xC0C0C0)
EndIf

Case $Button6

$pfadinput4 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input4check = 0
Else
guictrlsetdata($Input4,$pfadinput4)
$input4check = 1
GUICtrlSetColor($Label6, 0xC0C0C0)
EndIf

Case $Button7

$pfadinput5 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input5check = 0
Else
guictrlsetdata($Input5,$pfadinput5)
$input5check = 1
GUICtrlSetColor($Label7, 0xC0C0C0)
EndIf

Case $Button8

$pfadinput6 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input6check = 0
Else
guictrlsetdata($Input6,$pfadinput6)
$input6check = 1
GUICtrlSetColor($Label8, 0xC0C0C0)
EndIf

Case $Button9

$pfadinput7 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input7check = 0
Else
guictrlsetdata($Input7,$pfadinput7)
$input7check = 1
GUICtrlSetColor($Label9, 0xC0C0C0)
EndIf

Case $Button10

$pfadinput8 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input8check = 0
Else
guictrlsetdata($Input8,$pfadinput8)
$input8check = 1
GUICtrlSetColor($Label10, 0xC0C0C0)
EndIf

Case $Button11

$pfadinput9 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input9check = 0
Else
guictrlsetdata($Input9,$pfadinput9)
$input9check = 1
GUICtrlSetColor($Label11, 0xC0C0C0)
EndIf

Case $Button12

$pfadinput10 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input10check = 0
Else
guictrlsetdata($Input10,$pfadinput10)
$input10check = 1
GUICtrlSetColor($Label3, 0xC0C0C0)
EndIf

Case $Button13

$pfadinput11 = FileOpenDialog($message, @UserProfileDir & "\", "Musik (*.mp3)", 1)
If @error Then
MsgBox(4096,"","Keine Datei ausgewählt")
$input11check = 0
Else
guictrlsetdata($Input11,$pfadinput11)
$input11check = 1
GUICtrlSetColor($Label3, 0xC0C0C0)
EndIf

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

func checkprogresslabel()
;rutine
$prozent = GUICtrlRead($Progress1)
GUICtrlSetData($Label1,$prozent)


if $prozent = 100 Then
GUICtrlSetColor($Label1, 0xFF0000)
GUICtrlSetColor($Label2, 0xFF0000)
EndIf
;end rutine
endfunc

[/autoit]