Psychlops.manual/sample_cpp_file/2��/2.2.8_�^��}�`�̕`��2.cpp

   1 #include <psychlops.h>\r
   2 using namespace Psychlops;\r
   3 \r
   4 Psychlops::Rectangle rect1;\r
   5 Psychlops::Color col1;\r
   6 double width=200;\r
   7 double height=100;\r
   8 double lambda=60;\r
   9 double lmean=0.5, contrast=1.0, theta=0;\r
  10 double speed=PI/90;\r
  11 \r
  12 void psychlops_main() {\r
  13 \r
  14         Canvas sampleA(Canvas::fullscreen);\r
  15         while(!Input::get(Keyboard::spc)){\r
  16                 rect1.set(1,height);\r
  17                 for(int i=0;i<width;i++){\r
  18                         col1.set(lmean*((contrast*sin((2*PI*i/lambda)+theta))+1));\r
  19                         rect1.centering().shift((double)-1/2*width+i,0);\r
  20                         rect1.draw(col1);\r
  21                 }\r
  22         sampleA.flip(6);\r
  23         theta+=speed;\r
  24         }\r
  25 }