[StainlessS]

2_SpliceClips.avs (The actual joining script)

# 2_SpliceClips.avs

import("DB_AppendFilename.avs")
import("DB_SpliceClips.avs")
import("DB_FindTrim.avs")


# Make DataBase of Fullpath clip filenames given a file or string containing directories.
# Fills in ONLY the FileName in field 0
# View Progress via DebugView

OUTAVI          = "Movie.AVI"
DB              = "Movie.DB"
DB_TYPESTRING   = "s1024ii"                      # 1 String[1024] Filename, 2 Int fields (Start,End frames in final movie)
DB_FILENAMEFIELD= 0
GLOBAL_HEADER   = ""                             # Not needed for this demo (all same size etc)

#Directory Names in String pseudo array
DIR_STRING="DIR0"+Chr(10)+"DIR1"+Chr(10)+"DIR2"+Chr(10)+"DIR3"+Chr(10)+"DIR4"+Chr(10)
# OR DIR_STRING=RT_String("DIR0\nDIR1\nDIR2\nDIR3\nDIR4\n")

#DIR_STRING="DIR1"

WILDCARD = "*.AVI|DIVX|XDIV|MKV|MPG|MOV|MP4|M4V|WMV"           # Whatever
LOG_FN   = "MakeDB.LOG"
FOURCC   = "ULY0"                                              # Video Codec FOURCC (UT_Video rec601 YV12)

##################
    myName="SpliceClips: "
    (Exist(LOG_FN)) ? RT_FileDelete(LOG_FN) : NOP
    DLIST=DIR_STRING
    RT_DBaseAlloc(DB,0,DB_TYPESTRING)               # Allocate Dbase, 0 Records
    DB_AppendFileNamesFromDir(DB,DLIST,Wildcard,DB_FILENAMEFIELD,Log=LOG_FN,Debug=True,Verbose=True)
    DB_SpliceClips(DB,OUTAVI,StartFrameField=1,EndFrameField=2,ClipDBField=-1,OpenMax=24,Pass1Max=24,
        \ FourCC=FOURCC,Log=LOG_FN,Append=True,Debug=True,Verbose=True,Global_Header=GLOBAL_HEADER)

MessageClip(myName+"All Done")