home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 275 / DPCS0111DVD.ISO / Toolkit / Audio-Visual / VirtualDub / Source / VirtualDub-1.9.10-src.7z / publish / edittest.script < prev    next >
Encoding:
Text File  |  2009-09-14  |  1.1 KB  |  43 lines
  1. declare vd = VirtualDub;
  2. declare vdv = vd.video;
  3. declare vdvf = vd.video.filters;
  4. declare vda = vd.audio;
  5. declare vds = vd.subset;
  6. declare log = vd.Log;
  7. declare tostr = Sylia.ToString;
  8. declare assert = Sylia.Assert;
  9. declare validate = vdv.__ValidateFrames2;
  10.  
  11. // override the default mode to make sure we aren't tripped by saved settings
  12. vdv.SetInputFormat(0);
  13. vdv.SetOutputFormat(0);
  14.  
  15. // create test file
  16. vd.Open("", "TestId", 0);
  17. assert(vdv.width == 8);
  18. assert(vdv.height == 4);
  19.  
  20. // test frames [0,9] via selection
  21. vd.Open("", "TestId", 0);
  22. vdv.SetRange(0, 9000);        // 100-10
  23. vd.SaveAVI("__test0.avi");
  24. vd.Open("__test0.avi");
  25.  
  26. assert(vdv.framerate == 10);
  27. validate(0, 1, 2, 3, 4, 5, 6, 7, 8, 9);
  28.  
  29. // set frame rate to 20 and revalidate
  30. //
  31. // Note that for compatibility reasons, the range source always be in source time,
  32. // regardless of frame rate adjustment.
  33. vd.Open("", "TestId", 0);
  34. vdv.SetFrameRate2(20, 1, 1);
  35. vdv.SetRange(0, 9500);        // 100-95
  36. vd.SaveAVI("__test1.avi");
  37. vdv.SetFrameRate2(0, 0, 1);
  38.  
  39. vd.Open("__test1.avi");
  40.  
  41. assert(vdv.framerate == 20);
  42. validate(0, 1, 2, 3, 4);
  43.