Cics Player

Cicsplay is an excellent player with very high fidelity. I have used it to replace Foobar.

However, due to the RAM playback characteristics, it can only playback one song. I have written some very primitive Visual Basic (2008) code to playback a m3u playlist .


-------------------------------
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


FileOpen(1, "C:\cics.m3u", OpenMode.Input)

Dim trackname As String

Dim myProcess As Process = New Process

myProcess.StartInfo.FileName = "C:\Progra~1\cicspl~1\cicsPlay.exe"

myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Minimized

Do Until EOF(1)


trackname = "C:\" & LineInput(1)

myProcess.StartInfo.Arguments = trackname

myProcess.Start()

myProcess.WaitForExit()

myProcess.Close()

Loop

FileClose()


End Sub
End Class