parallel port

[psychlops/cpp.git] / win32gl / test / compilenew.cpp

diff --git a/win32gl/test/compilenew.cpp b/win32gl/test/compilenew.cpp
index 445b6a5..814ba72 100644 (file)
--- a/win32gl/test/compilenew.cpp
+++ b/win32gl/test/compilenew.cpp
@@ -11,6 +11,52 @@ using namespace Psychlops;    // Initially developed with Psychlops Win32 1.5.3
 \r
 ///+ Stimulus drawing function\r
 //// A function for stimulus drawing (main body)\r
+\r
+\r
+void psychlops_main() {\r
+       Canvas cnvs(Canvas::window);\r
+\r
+       Letters let(L"flower_png24.png");\r
+       let.fill = Color::white;\r
+\r
+       Psychlops::Ellipse rect(100,100);\r
+       rect.fill = Color::red;\r
+\r
+\r
+       data_bits[0] = 1 + 4 + 8; // choose bit\r
+\r
+       int t=0;\r
+\r
+       while(!Keyboard::esc.pushed()) {\r
+               t++;\r
+               Display::clear(); //Clear window\r
+\r
+               //if(t%100 == 0)\r
+               //      rs = CreateProcess("C:\\Windows\\System32\\print.exe",(LPTSTR)" /D:LPT1 D:\\Users\\hskwk\\Desktop\\zzz.txt",NULL,NULL,FALSE,NORMAL_PRIORITY_CLASS,NULL,NULL,&si,&pi);\r
+\r
+               Display::flip(); // Flip frame buffers\r
+       }\r
+\r
+       DeleteDC(hdc);\r
+}\r
+///- Stimulus drawing function\r
+\r
+\r
+\r
+#if 0\r
+\r
+// Motion with glass patterns.\r
+// Ross, J., Badcock, D. R., and Hayes, A. (2000)\r
+// Coherent global motion in the absence of coherent velocity signals.\r
+// Current Biology, 10, 679-682.\r
+///+ Prefix\r
+//// Include Psychlops Package\r
+#include <psychlops.h>\r
+using namespace Psychlops;    // Initially developed with Psychlops Win32 1.5.3 / 20110311\r
+///- Prefix\r
+\r
+///+ Stimulus drawing function\r
+//// A function for stimulus drawing (main body)\r
 void psychlops_main() {\r
 \r
        Canvas cnvs(Canvas::window);\r
@@ -41,7 +87,6 @@ void psychlops_main() {
 ///- Stimulus drawing function\r
 \r
 \r
-#if 0\r
 \r
 #include <psychlops.h>\r
 using namespace Psychlops;\r