VLC Music to a Textfile

I thought about making a playlist (textfile) out of music I hear. This programm checks your VLC Title and adds the filename to a textfile. Works good but I didnt edit the “if”, so it just writes the same title every minute even if it is still the same song. I might finish this soon.

###################################
########04.10.2014 03:04 am########
###################################
#########Made by Lunetikk##########
###################################
####Use: Write playing VLC song####
######automatic into a txtfile#####
###################################
 
 
 
HotKeySet("{x}", "start")
Hotkeyset("{END}", "close")
 
MsgBox(0, "Welcome", "        Write your VLC songs automatically into a .txtfile"&@CRLF& "                         X to start, END to close this app"&@CRLF&"                                      Made by Lunetikk")
 
$Title = "x"
$Checktitle = "y"
 
Func start()
while 1
 
If $Title = $Checktitle Then
$Title = StringReplace ( $Title, " - VLC media player", "" )
Sleep(3000)
FileWriteLine ( "Songs.txt" , $Title )
Sleep(60000)
Else
AutoItSetOption ( "WinTitleMatchMode", 2 )
Sleep(50)
WinActivate ( "player" )
Sleep(50)
$Title = WinGetTitle("")
Sleep(50)
WinSetState ( $Title, "", @SW_MINIMIZE )
Sleep(50)
$Checktitle = $Title
Sleep(50)
 
EndIf
 
WEnd
 
EndFunc
 
Func close ()
	Exit 0
EndFunc
Sleep(1)
While 1
   Sleep (10)
WEnd

Example

Knife Party - Internet Friends
Knife Party - Internet Friends
Knife Party - Internet Friends
Metallica - One
Metallica - One
Metallica - One
Metallica - One
Example - Shot Yourself In The Foot Again ft. Skream
Example - Shot Yourself In The Foot Again ft. Skream
Example - Shot Yourself In The Foot Again ft. Skream
Example - Wrong In The Head
Example - Wrong In The Head
Example - Wrong In The Head