[38ba34]: / Tests / Cameras.any

Download this file

91 lines (75 with data), 2.7 kB

  
  AnyOperationSequence RunTest = {
       AnyOperation& LoadTimeImage = Main.LoadTimeCam.Preview;    
       AnyOperation& initpos = Main.CameraInitPos;
       AnyOperation& InitPosImage = Main.InitPosCam.Preview; 
       
  };
  
  #ifdef TEST_NAME
  AnyString CameraName = TEST_NAME;
  #define _OPEN_PREVIEW OFF
  #else
  AnyString CameraName = ANYBODY_NAME_MAINFILE;
  #define _OPEN_PREVIEW ON
  #endif  
  
  #ifndef _MODEL_UP_DIRECTION 
  #define _MODEL_UP_DIRECTION y
  #endif
  
  
  
  VideoLookAtCamera LoadTimeCam(_AUTO_OPEN_PREVIEW_=_OPEN_PREVIEW, UP_DIRECTION=_MODEL_UP_DIRECTION, TRANSPARENT_BACKGROUND = 1) =
  {
    VideoInputScale = 1;
    VideoResolution = {500,500};
    BackgroundColor = DesignVar({1,1,1});
    //CameraUpDirection = Main.CameraUpDirection;
    Preview.FileName = Main.CameraName + "_LoadTime.png";
    #ifdef CREATE_IMAGE_FULLDIR
    VideoOutputPath = CREATE_IMAGE_FULLDIR;
    #else
    VideoOutputPath = ANYBODY_PATH_OUTPUT;
    #endif
    Camera.Recorder.AntiAlias = 4;
  };   



  VideoLookAtCamera InitPosCam(_AUTO_OPEN_PREVIEW_=_OPEN_PREVIEW, UP_DIRECTION=_MODEL_UP_DIRECTION, TRANSPARENT_BACKGROUND = 1) =
  {
    VideoInputScale = 1;
    VideoResolution = {500,500};
    CameraLookAtPoint = Main.LoadTimeCam.CameraLookAtPoint;
    CameraFieldOfView = Main.LoadTimeCam.CameraFieldOfView;
    CameraDirection  = Main.LoadTimeCam.CameraDirection;
    CameraUpDirection = Main.LoadTimeCam.CameraUpDirection;
    BackgroundColor = DesignVar({1,1,1});
    Preview.FileName = Main.CameraName + "_InitPos.png";    
    #ifdef CREATE_IMAGE_FULLDIR
    VideoOutputPath = CREATE_IMAGE_FULLDIR;
    #else
    VideoOutputPath = ANYBODY_PATH_OUTPUT;
    #endif
    Camera.Recorder.AntiAlias = 4;
    
  };   

 
  #ifdef CREATE_VIDEO
  RunTest = 
  {
      AnyOperation& InitPosImage = Main.VideoCam.Create_Video; 
  };
  VideoLookAtCamera VideoCam(_AUTO_PLAY_VIDEOS=_OPEN_PREVIEW) =
  {
    VideoName = Main.CameraName;
    Analysis = {
      AnyOperation &ref = Main.RunApplication;
    };
    VideoInputScale = 5;
    VideoResolution = {350,350};
    CameraUpDirection = Main.LoadTimeCam.CameraUpDirection;
//    VideoInputFrameRate = 30; 
    VideoOutputFrameRate = 30;
    CameraLookAtPoint = Main.InitPosCam.CameraLookAtPoint;
    CameraFieldOfView = Main.InitPosCam.CameraFieldOfView;
    CameraDirection  = Main.InitPosCam.CameraDirection;
    BackgroundColor = DesignVar({1,1,1});
    //Counter = Main.study.iStep;
    #ifdef CREATE_IMAGE_FULLDIR
    VideoOutputPath = CREATE_IMAGE_FULLDIR;
    #else
    VideoOutputPath = ANYBODY_PATH_OUTPUT;
    #endif
    Camera.Recorder.AntiAlias = 0;

  }; 
  #endif