/**

 * This script will add regions for all events on the selected track,

 * and name those regions to the event's media file name.

 *

 * If more than one event comes from the same media, this will result in 

 * duplicate region names.

 *

 * By John Meyer 4/11/2005

 *

 **/



import System;

import System.IO;

import System.Windows.Forms;

import Microsoft.Win32; 

import System.Collections;

import Sony.Vegas;



var evnt : TrackEvent;

var myRegion : Region;

var RegionName : String;





try {



  //Find the selected event

  var track = FindSelectedTrack();

  if (null == track)

      throw "no selected track";



  var eventEnum = new Enumerator(track.Events);

  while (!eventEnum.atEnd()) {

    evnt = TrackEvent(eventEnum.item());

    var MyFilePath = evnt.ActiveTake.MediaPath; 

    var extFileName = Path.GetFileName(MyFilePath);

    var baseFileName = Path.GetFileNameWithoutExtension(extFileName); // Media file name for this event



    var StartTime = evnt.Start;

    var LengthTime = evnt.Length;

//    if (evnt.FadeIn.Length.Nanos > 0) {

//      StartTime = StartTime + evnt.FadeIn.Length;

//      LengthTime = LengthTime - evnt.FadeIn.Length;

//    }



    if (evnt.FadeOut.Length.Nanos > 0) {

      LengthTime = LengthTime - evnt.FadeOut.Length;

    }



// MessageBox.Show (baseFileName + ", " + evnt.FadeOut.Length);





    myRegion = new Region(StartTime,LengthTime,baseFileName); //Insert a region over this event

    Vegas.Project.Regions.Add(myRegion);



// Vegas.UpdateUI(); 





    eventEnum.moveNext();

  }



} catch (e) {

    MessageBox.Show(e);

}





function FindSelectedTrack() : Track {

  var trackEnum = new Enumerator(Vegas.Project.Tracks);

  while (!trackEnum.atEnd()) {

    var track : Track = Track(trackEnum.item());

    if (track.Selected) {

        return track;

    }

    trackEnum.moveNext();

  }

  return null;

}