COM Interface

COM Interface

The VideoReDo COM interface lets another COM enabled application invoke and control many aspects of VideoReDo's behavior. In fact the VideoReDo's own batch manager uses the COM interface to create command files that process your edit commands. The samples shown use the Windows Scripting interface which is available on all Windows systems which run VideoReDo.

VideoReDo COM Interface:

Methods:

AbortOutput	Aborts the current file- or joiner-save that is in progress.
AddFileToJoiner	Adds a program file or VideoReDo project to the joiner list.
AddSceneMark	Adds a new scene marker.
AddToJoiner	Adds the currently open VideoReDo project to the joiner list.
CaptureFrame	Capture a bitmap of the current frame and saves it either to the Windows clipboard or a file.
ClearAllSelections	Clears all sections from the cut or scene list.
ClearJoinerList	Removes all items from the joiner list.
Close	Closes the currently open file. Any unsaved edits are lost.
DeleteBatchProjectFile	Deletes a project file as long as the output file is great then 1MB in length. (Plus only)
EnterRegistrationKey	Displays the registration key entry dialog.
FileOpen	Opens a program file or VideoReDo project.
FileOpenBatch	Opens a program file in QuickStream Fix mode.
FileOpenBatchPIDS	Opens a program file in QuickStream Fix mode using the specified PIDs.
FileSaveAs	Saves the currently open file or project.
FileSaveAsElemStreams	Saves the currently open file or project as elementary streams.
FileSaveAsEx	Saves the currently open file or project in a desired format.
GetCursorTimeMsec	Returns the current cursor time in milliseconds.
GetCutMode	Returns whether VideoReDo is in cut or scene mode.
GetCutSceneListCount	Returns the number of items in the cut or scene list.
GetCutSceneListData	Returns the start or end time, in milliseconds, of a particular cut.
GetFrameRate	Returns the current frame rate in 100's of a second.
GetProgramDuration	Returns the length of the currently open program.
GetSceneMarkMsec	Returns the location of a scene marker in milliseconds.
IsOutputInProgress	Tests whether VideoReDo is in the middle of saving a file.
IsScanInProgress	Tests whether VideoReDo is in the middle of performing a commerical scan. (Plus only).
Pause	Pauses the currently open video.
Play	Plays the currently open video.
QueueEditsToBatch	Queues the currently open VideoReDo project to the batch queue.
RemoveSceneMark	Removes a scene marker.
SaveJoinerAs	Save the joiner list as a program stream.
SaveJoinerAsEx	Save the joiner list to a selected file type.
SeekToTimeMsec	Seeks the cursor to a specific point in your program.
SelectScene	Creates a selection using the specified start and end times.
SetAudioOutputCodec	Sets the audio codec that will be used when saving edits.
SetCutMode	Sets the editor mode to either cut or scene mode. Overrides the default value.
SetQuietMode	Sets VideoReDo to run with a minimal screen interface
StartAdScan	Starts commercial detection of the currently open file. (Plus only)
WriteProjectFile	Saves the current project file to disk.
	Sample Script

Properties::

AudioAlert	Sets or gets the audio alert status
OpenedFilename	Gets the currently opened filename
OutputPercentComplete	Estimate of output percent complete
PlotMask	Sets or gets the size of the plot mask.
PreviewMode	Enable or disabled the preview mode.
SelectionEndMsec	Sets or gets the location of the start selection marker.
SelectionStartMsec	Sets or gets the location of the start selection marker.
ThumbnailDisplay	Enable or disable the thumbnail display.
ThumbnailInterval	Sets or gets the thumbnail interval
VersionNumber	Retrieves the current VideoReDo version number.

How To Start VideoReDo in Silent Mode:

To start VideoReDo in silent mode, create the "VideoReDoSilent" COM object instead of the "Application" object.

if quietMode then
  ' Start in silent mode
  '
	Set VideoReDoSilent = WScript.CreateObject( "VideoReDo.VideoReDoSilent" )
	set VideoReDo = VideoReDoSilent.VRDInterface
else
  ' Start in windowed mode.
	Set VideoReDo = WScript.CreateObject( "VideoReDo.Application" )
end if

BOOL AbortOutput( )

AddSceneMark( ) as Integer

Parameters:

none

Return Values:

	Function returns non-zero (TRUE) if output was in progress prior to calling this function, otherwise zero (FALSE)

Description:
	This command will instruct VideoReDo to stop the output process. Note that output occurs in a background thread and you should not assume that the abort has completed when this call returns. Continue to monitor IsOutputInProgress until that function returns false.

BOOL AddSceneMark( long sceneTimeMsec )

AddSceneMark( sceneTimeMsec as integer) as Integer

Parameters:

sceneTimeMsec	Time, in milliseconds, at which to place the scene marker.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will add a scene marker to the timeline. If an existing scene marker exists within 1 second of the specified time, then the new marker will NOT be added.

BOOL AddFileToJoiner( const char *filename )

AddFileToJoiner( filename as string) as Integer

Parameters:

filename	Character string containing a VideoReDo project file or MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command combines a FileOpen command followed by an AddToJoiner.

BOOL AddToJoiner( )

AddToJoiner( ) as Integer

Parameters:

none

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command adds the currently open file and its associated edits to the joiner list.

BOOL CaptureFrame( int type, const char *filename, int divisor )

CaptureFrame( type as integer, filename as string, divisor as integer ) as Integer

Parameters

type	0 = copy to clipboard, 1 = copy to .bmp file.
filename	filename string. Ignored if type is '0'.
divisor	1 to 8. Shrinks the bitmap size by this factor.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will copy the currently displayed video image to the clipboard or bitmap file, depending upon the value of the 'type' parameter. The divisor is used to scale the image. For example if the original video is 720 x 480 and the divisor is '2', then the bitmap size will be 360 x 240.

BOOL ClearAllSelections( )

ClearAllSelections( ) as Integer

Parameters

none

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will clear all selections from the cut or scene list.

BOOL ClearJoinerList( )

Close( ) as Integer

Parameters

none

Return Values:

	Function returns non-zero (TRUE) if the joiner list was not empty before this call was made, otherwise zero (FALSE)

Description:
	Clears all items from the joiner list.

BOOL Close( )

Close( ) as Integer

Parameters

none

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command closes the current file. Same as clicking on the File > Close menu.

BOOL DeleteBatchProjectFile( const char *projectFile , const char *outputFile)

DeleteBatchProjectFile( projectFile as string, outputFile as string) as Integer

Parameters:

projectFile	Name of a VideoReDo project file.
outputFile	Name of a VideoReDo project file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command is used by the VideoReDo batch processor to optionally delete the temporary project files (*.BPrj) after batch processing. It will first check the size of the outputFile, and if its great than 1 MB delete the projectFile. This check is done to insure that project file isn't deleted if VideoReDo had a problem creating the outputFile.

BOOL EnterRegistrationKey()

EnterRegistrationKey( ) as Integer

Parameters:

	None

Return Values:

	Returns TRUE (1) if the user clicked on the "Register Key" button. Otherwise FALSE (0).

Description:
	This COM command is intended for users who pre-load VideoReDo onto a system and want to be sure the system administrator is prompted to enter a key.

BOOL FileOpen( const char *filename )

FileOpen( filename as string) as Integer

Parameters:

filename	Character string containing a VideoReDo project file or MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will open a VideoReDo project file or an MPEG video file. If an MPEG program or transport stream file is specified, then FileOpen will open the first video stream it finds and the first audio audio stream it finds for that video. To specify specific audio and video PIDs either use a project file or use the FileOpenBatchPIDS if running QuickStream Fix.

BOOL FileOpenBatch( const char *filename )

FileOpenBatch( filename as string) as Integer

Parameters:

filename	Character string containing a VideoReDo project file or MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will open a VideoReDo project file or an MPEG video file. If the file is a video file it will be opening in QuickStream Fix mode and the video will not display.

BOOL FileOpenBatchPIDS( const char *filename, long videoPID, long audioPID)

FileOpenBatchPIDS( filename as string, videoPID as integer, audioPID as integer) as Integer

Parameters:

filename	Character string containing a VideoReDo project file or MPEG program file.
videoPID	The PID (program ID) of the video stream.
audioPID	The PID (program ID) of the audio stream.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will open a VideoReDo project file or an MPEG video file. If the file is a video file it will be opening in QuickStream Fix mode and the video will not display. If the audioPID and videoPID must exist in in the video file or an error will be thrown. For MPEG program stream files including VOBS, the PIDs refer to the stream number: 0xE0-0xE7: mpeg2 video stream 0x80 - 0x87: AC3 audio stream 0xC0 - 0xC7: MPEG audio stream 0xA0 - 0xA7 LPCM audio stream

BOOL FileSaveAs( const char *filename )

FileSaveAs( filename as string) as Integer

Parameters:

filename	Character string containing a MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will save your current project to the specified file.

BOOL FileSaveAsElemStreams( const char *filename )

FileSaveAsElemStreams( filename as string) as Integer

Parameters:

filename	Character string containing a MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will save your current project to a pair of elementary streams. The filename specified is the video stream stream. The audio stream will be saved to the same base filename but with an MP2, AC3 or WAV file type, depending upon the type of audio encoding used in the particular stream.

BOOL FileSaveAsEx( const char *filename, short outputType )

FileSaveAsEx( filename as string, outputType as integer) as Integer

Parameters:

filename	Character string containing a MPEG program file.
outputType	1 = Program Stream 2 = Elementary Streams 3 = VOB (MPEG with blank NAV packets ) 4 = Transport Stream 5 = REC (Topfield) 6 = DVRMS 7 = Tivo (or MPEG if source file isn't Tivo)

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will save your current project letting you specify the output file type.

BOOL FrameAdvance( BOOL direction )

FrameAdvance( direction as integer ) as Integer

Parameters:

direction	TRUE (or 1 ) to advance the video by a single frame. FALSE (or 0) to move the video back one frame.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will move the video by one frame in either the forward or backward direction.

BOOL GetCutMode( )

GetCutMode() as Integer

Parameters:

none

Return Values:

	Returns non-zero (TRUE) if VideoReDo is running cut mode. Returns zero (FALSE) if running scene mode...

Description:
	This command may be run before before a file has been opened.

short GetCutSceneListCount( )

GetCutSceneListCount() as Integer

Parameters:

none

Return Values:

	Returns the number of items presently in the cut / scene list.

Description:
	If a video file is not yet open, 0 will be returned.

long GetCutSceneListData( short cutNumber, short startEndFlag )

GetCutSceneListData( cutNumber as Integer, startEndFlag as Integer ) as Integer

Parameters:

cutNumber	The cut or scene number. The first scene number is 1.
startEndFlag	Set to 0 to return the start of cut or scene time. 1 to return the end time of the specified cut or scene.

Return Values:

	Time in milliseconds. If a video has not yet been opened or the cut list is empty, -1 is returned.

Description:
	This function, along with the GetCutSceneListCount(), is used to retrieve the locations of cut and scene markers.

long GetCursorTimeMsec( )

GetCursorTimeMsec() as Long

Parameters:

none

Return Values:

	Returns the current cursor time in milliseconds..

Description:
	For example if the video position is at: 00:10:01.00, then this function return: 601000.

long GetFrameRate( )

GetFrameRate() as Long

Parameters:

none

Return Values:

	Returns the frame frame in hundreds of a second.

Description:
	For example: 29.97 frames / second is returned as 2997. 25 frames / second is returned as 2500. If there isn't an open video program, 0 is returned.

double GetProgramDuration( )

GetProgramDuration( ) as Double

Parameters:

none

Return Values:

	The length, in seconds, of the currently loaded program.

Description:
	Returns a floating point number with the total number of seconds in the program.

long GetSceneMarkMsec( int sceneIndex )

GetSceneMarkMsec( sceneIndex as Integer ) as integer

Parameters:

sceneIndex	Scene marker number, with a range of 1 to N. Calling with sceneIndex of 0 will return the number of scenes markers set.

Return Values:

	If sceneIndex is zero, returns the number of scene markers. Otherwise, the location of the scene marker along the timeline, in milliseconds. If an error such as sceneIndex is out of range, then return -1.

Description:
	Returns the location of the scene marker along the timeline in milliseconds.

BOOL IsOutputInProgress( )

IsOutputInProgress() as integer

Parameters:

None

Return Values:

	TRUE (1) if VideoReDo is processing output, otherwise FALSE( 0 ).

Description:
	This command is part of the output process. When creating output, use one of the Save commands followed by a loop which continually checks this value. As long as it remains TRUE you should sleep for a second or two and then recheck it.

BOOL IsScanInProgress( )

IsScanInProgress() as integer

Parameters:

None

Return Values:

	TRUE (1) if VideoReDo is currently performing an Ad-Detective Scan, otherwise FALSE( 0 ).

Description:
	This command is part of the batch Ad-Detective process. While Ad-Detective is active, this function will return TRUE (1). Once Ad-Detective completes, it will return FALSE (0) indicating its OK to save the Ad-Detective project file. As long as it remains TRUE you should sleep for a second or two and then recheck it.

BOOL Pause( )

Pause() as Integer

Parameters:

none

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will cause VideoReDo to pause a currently playing video. If the video is already paused, it will be ignored.

BOOL Play( )

Play() as Integer

Parameters:

none

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command will cause VideoReDo to start playing a previous paused video. If the video is already playing, the command will be ignored.

BOOL QueueEditsToBatch( )

QueueEditsToBatch( ) as Integer

Parameters:

none

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This command functions the same as the menu option File > Queue To Batch. It will save the current edits as a project and put it into the queue file for batch processing.

BOOL RemoveSceneMark( long sceneIndex )

RemoveSceneMark( sceneIndex as Integer) as Integer

Parameters:

sceneIndex	The index of the scene marker, in the range of 1 to N.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This function removes a scene marker from the list of scene markers. Scene markers are indexed from 1 to N where N is the total number of scene markers.

BOOL SaveJoinerAs( const char *filename )

SaveJoinerAs( filename as string) as Integer

Parameters:

filename	Character string containing a MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	Use this command to save your current joiner command to the specified output file.

BOOL SaveJoinerAsEx( const char *filename, short outputType )

SaveJoinerAsEx( filename as string, outputType as integer ) as Integer

Parameters:

filename	Character string containing a MPEG program file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	Use this command to save your current joiner command to the specified output file. The outputType = 1 for program stream output, 2 for elementary stream output, and 3 for VOB (MPEG with blank NAV packet output).

BOOL SeekToTimeMsec( long timeMsec )

SeekToTimeMsec( timeMsec as integer ) as Integer

Parameters:

timeMsec	Seek position in Milliseconds.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This control will advance the cursor the specified point in your program. If the program is currently playing, it will be paused after this command completed.

BOOL SelectScene( long startMsec, long endMsec )

SelectScene( startMsec as integer, endMsec as integer ) as Integer

Parameters:

startMsec	Time for the beginning of the scene
endMsec	Ending time for the scene.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	The function duplicates the functionality of setting the start and end selection markers and then either cutting or adding the scene. If the current edit mode is "Cut" then the scene will be cut from the output. If the edit mode is "Scene" it will be added to the output. You can change the default edit mode by using the SetCutMode() command after opening your file.

BOOL SetAudioOutputCodec( short audioCodec, short bitRateKbps, short samplingK )

SetAudioOutputCodec( audioCodec as Integer, bitRateKbps as Integer, samplingK as Integer ) as Integer

Parameters:

audioCodec

Audio Output Codec:

0 = audioCodecNotSpecified, Use the default output codec.
1 = audioCodecLPCM, Output audio as WAV (LPCM).
2 = audioCodecMPEGL2, Output audio as MPEG1 Layer 2.
3 = audioCodecAC3, Output audio as AC3 (not yet supported).

bitRateKbps

Output bitrate in KBps. Not used for LPCM. (e.g. 224 = 224,000 bps ).

samplingK

Output sampling rate in thousands (i.e. 48 = 48,000 samples / second). NOTE: This parameter is ignored and is intended for future support.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This function is used to set the audio output codec, and should be called after a file is opened, but before saving. When a file is opened, the default audio output codec (and bit rate) is ascertained. Using the following logic: If opening a project file (VPRJ/BPRJ) and it contains output audio codec settings these will become the audio codec settings. If codec is not set from a project file, the audio codec setting in the File Save options dialog is checked. If a codec is set this will become the output codec setting. Otherwise, the output codec will be the same as the input file. The output bitrate must be set to an appropriate value for the codec being used.

BOOL SetCutMode( BOOL cutModeFlag )

SetCutMode( cutModeFlag as integer ) as Integer

Parameters:

cutModeFlag	1 to have VideoReDo run in Cut Mode. 0 to have it run in scene mode.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	By default, VideoReDo will default operation to the mode specified by the user on the Tools>Options>General options page. This command lets you change the mode dynamically at run time. This command should be used after a file has been opened, but before any edits have been made. This command will remove any previously applied edits. Each time a file is opened, VideoReDo will reset its mode to the user specified default. Therefore this command should be re-executed after each open.

BOOL SetQuietMode( BOOL quietMode )

SetQuietMode( quietMode as integer ) as Integer

Parameters:

quietMode	TRUE (or 1 ) to have VideoReDo run in quiet mode, FALSE (or 0 ) otherwise.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	When quiet mode is set, VideoReDo will completely hide itself during output.

BOOL StartAdScan( long FastSearch, long AutoCut, long DisableDisplay )

StartAdScan( FastSearch as integer, AutoCut as integer, DisableDisplay as integer ) as Integer

Parameters:

FastSearch	TRUE or (1) to run Ad-Detective in fast search mode.
AutoCut	TRUE or (1) to have Ad-Detective automatically set the cut markers around commercials.
DisableDisplay	TRUE or (1) to have Ad-Detective minimize the display while scanning.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	This function starts the Ad-Detective scan.

BOOL WriteProjectFile( const char *outputFilename )

WriteProjectFile( outputFilename as string ) as Integer

Parameters:

outputFilename	Character string containing a VideoReDo project file.

Return Values:

	Function returns non-zero (TRUE) if successful, otherwise zero (FALSE)

Description:
	Saves the current project to disk.

Properties:

AudioAlert

To Set:

VideoReDo.AudioAlert = TRUE or FALSE;

Overrides the current value of the audio alert flag. When TRUE (1), an audio alert will sound when output is complete. For silent operation set to FALSE (0).

To Get:

BOOL b = VideoReDo.AudioAlert;

Retrieves the current value of the batch audio alert flag. By default, the audio flag is set via the program parameter option on the Tools>Options>Audio Alert Page. This value

OpenedFilename

To Set:

This property is read-only.

To Get:

BSTR sd = VideoReDo.OpenedFilename;

Returns the currently open filename. If a project is opened, the video files specified in the project file will be returned. If the open video is a .Vlst, the .VLst filename is returned.

OutputPercentComplete

To Set:

This property is read-only.

To Get:

double d = VideoReDo.OutputPercentComplete;

This property only applies while output is in progress and returns a value from 0 to 99.9 representing how much of the output file has been created. It should only be used as an estimate and should never be relied upon to determine when the output routines have finished. IsOutputInProgress should be used to check when output has actually been completed.

PlotMask

To Set:

short pct = 25;
VideoReDo.PlotMask = pct; // Cover 25% of the image from toward each edge.

To Get:

short pct = VideoReDo.PlotMask

This property is used to get or set the value of the plot mask. The plot mask is used to cover the video image starting from the center of the picture. A value of 0 means no plot mask is displayed. A value of 50% means that the entire window is covered. Since the mask originates from the center of the window in each of 4 directions.

PreviewMode

To Set:

BOOL bPreviewMode = 1;
VideoReDo.PreviewMode = bPreviewMode; // Turn on Preview Mode.

To Get:

BOOL b = VideoReDo.PreviewMode;

If 1 (TRUE) preview mode is enabled otherwise its 0 (FALSE). Preview mode can be enabled or disabled by setting this property.

SelectionStartMsec
SelectionEndMsec

To Set:

unsigned long msec = 5000;
VideoReDo.SelectionEndMsec = msec; // Position the end selection marker to 5 seconds.

To Get:

long msec = VideoReDo.SelectionEndMsec;

These two properties can be used to read or set the start and end selection markers. If both markers are to be set, it is recommended that the SelectScene() method be used.

ThumbnailDisplay

To Set:

BOOL bThumbnailOn = 1;
VideoReDo.ThumbnailDisplay = bThumbnailOn; // Turn on thumbnails.

To Get:

BOOL b = VideoReDo.ThumbnailDisplay;

Property to turn on (TRUE) or off (FALSE) the thumbnail display window.

ThumbnailInterval

To Set:

long intervalMsec = 1000;
VideoReDo.ThumbnailInterval = intervalMsec; // Set current interval to 1 sec.

To Get:

long intervalMsec = VideoReDo.ThumbnailInterval;

Gets or sets the current thumbnail interval in msec. This property does not turn on, or off, the thumbnail display. Use the ThumbNailDisplay property for that purpose. To set the interval to single frame, specify an intervalMsec of 0.

VersionNumber

To Set:

This property is read-only.

To Get:

BSTR str = VideoReDo.VersionNumber

Return the current version and build for VideoReDo as a COM string. The format is result is x.y.z.bbb - <Build Date>, where:

x = major version
y = minor version
z = release number
bbb = build number

For example:

wcript.echo(VideoReDo.VersionNumber) display:

2. 2. 1. 460 - Mar 24 2006

Sample script:

set Args = Wscript.Arguments
'Wcript to do some joins and edits.
Set VideoReDo = WScript.CreateObject( "VideoReDo.Application" )
Wscript.echo( VideoReDo.VersionNumber)
VideoReDo.SetQuietMode( true ) ' Save without any display
openFlag = VideoReDo.FileOpen( args(0) )
if openFlag = false then
Wscript.echo( "? Unable to open file/project: " + args(0) )
Wscript.Quit 3
end if
VideoReDo.SetCutMode( false )
Wscript.echo( VideoReDo.GetFrameRate() )
Wscript.echo( VideoReDo.GetProgramDuration() )

if NOT VideoReDo.SelectScene( 10000, 40000 ) then Wscript.echo("Error ")
if NOT VideoReDo.SelectScene( 60000, 80000 ) then Wscript.echo("Error")
VideoReDo.AddToJoiner()

if NOT VideoReDo.FileOpen( args(1) ) then Wscript.echo( "Open error " + args(1) )
VideoReDo.SetCutMode( false )
if NOT VideoReDo.SelectScene( 0000, 40000 ) then Wscript.echo("Error ")
if NOT VideoReDo.SelectScene( 60000, 180000 ) then Wscript.echo("Error")

VideoReDo.AddToJoiner()
VideoReDo.AudioAlert = true
VideoReDo.SaveJoinerAsEx( "c:\temp\olejoiner.mpg", 1 ) ' Save as program stream

While( VideoReDo.IsOutputInProgress() )
Wscript.Sleep 1000
Wend

VideoReDo.Close()
Wscript.quit 0