Sync subtitles: Difference between revisions

Content added Content deleted
(Added FreeBASIC)
Line 190: Line 190:


Sub syncSubtitles(fileIn As String, fileOut As String, secs As Integer)
Sub syncSubtitles(fileIn As String, fileOut As String, secs As Integer)
Dim As String linea, pio, fin, nl, fmt
Dim As String linea, pio, fin, fmt
Dim As Ubyte f1, f2
Dim As Ubyte f1, f2