X-Git-Url: http://git.osdn.jp/view?a=blobdiff_plain;ds=sidebyside;f=test4%2FPsychlopsMain.cs;h=9090e565e1f5ab870ed670977d7befe60f762d7a;hb=b55ddaa401cfe09614a68299447148a3dd55c406;hp=aafe41225b89fd66f465dc74f82bfbe5f3fa9246;hpb=39cda95632f7017ff1941c8162e0dbe026f56baa;p=psychlops%2Fsilverlight.git

diff --git a/test4/PsychlopsMain.cs b/test4/PsychlopsMain.cs
index aafe412..9090e56 100644
--- a/test4/PsychlopsMain.cs
+++ b/test4/PsychlopsMain.cs
@@ -1,602 +1,295 @@
-///+ Prefix linkto BasicCode1
-//// Lines for set up Psychlops environment
-<<<<<<< HEAD
-using Psychlops;
-
-namespace PsychlopsSilverlight4test
-{
-
-	public class PsychlopsMain
-	{///- Prefix linkto BasicCode1
-
-
-		///+ Main Routine
-		//// Psychlops runs at the first line of this function psychlops_main().
-		public void psychlops_main() {
-    ///+ 0 linkto BasicCode3_1a
-    ////Prepare global parameters
-     const int maxrectnum = 200;
-     int rectnum = 100/*ID:rectnumber 25.0 200.0 25.0*/;
-     double rectsize = 5.0/*ID:dotsize 1.0 10.0 1.0*/;
-     Rectangle[] rect = new Rectangle[maxrectnum];
-	 for (int i = 0; i < maxrectnum; i++) { rect[i] = new Rectangle(); }
-     double[] rectcolorR = new double[maxrectnum];
-     double[] rectcolorG = new double[maxrectnum];
-     double[] rectcolorB = new double[maxrectnum];
-    ///- 0 linkto BasicCode3_1a
-
-	 Canvas window = new Canvas(Canvas.window);
-
-     ///+ 1 linkto BasicCode3_1a
-     ////Initialize
-     for(int i=0; i < rectnum; i++){
-         ///+ 1.1 set1
-         ////set positions and sizes
-         rect[i].set(rectsize, rectsize); //Set a size of rectangles.
-         rect[i].centering();
-         rect[i].shift((i - 0.5 * rectnum) * rectsize* 1.5/*ID:RectHGap 1.0 3.0 0.5*/,
-                                        (i - 0.5*rectnum) * rectsize * 1.5/*ID:RectVGap 1.0 3.0 0.5*/); //Move Rectangles to initial positions
-         ///- 1.1 set1
-         ///+ 1.2 set2
-         ////set colors
-         rectcolorR[i]=Math.random(1.0) * 0.5/*ID: RGain 0.0 1.0 0.5*/; //Set R values. Note that "i" is converted to double-type.
-         rectcolorG[i]=Math.random(1.0) * 0.5/*ID: GGain 0.0 1.0 0.5*/; //Set G values. Note that "i" is converted to double-type.
-         rectcolorB[i]=Math.random(1.0) * 0.5/*ID: BGain 0.0 1.0 0.5*/; //Set B values. Note that "i" is converted to double-type.
-         ///- 1.2 set2
-         }
-    ///- 1 linkto BasicCode3_1a
-
-    ///+ 2 drawing
-    ////drawing objects
-    ///+ 2.1 setlocal
-    ////Prepare variables for movie control;
-    int frame = 0;
-    int motion_dir = 1;
-    double Horizontal_shift, Vertical_shift;
-    ///- 2.1 setlocal
-
-    while(!Keyboard.esc.pushed()){
-        window.clear(Color.black);
-
-        if(frame % 30/*ID:Period_Position 30 240 30*/ ==0){ // motion direction will reverse at designated frames.
-        	motion_dir *= -1;
-        }
-
-        for(int i=0; i < rectnum; i++){
-         ///+ 2.2 loopset1
-         ////set positions and sizes
-
-         Horizontal_shift=motion_dir * 1.0/*ID:HSpeed 0.0 5.0 1.0*/;
-         Vertical_shift=motion_dir * 0.0/*ID:VSpeed 0.0 5.0 1.0*/;
-
-         rect[i].resize(rectsize, rectsize); //Resize rectangles.
-         rect[i].shift(Horizontal_shift, Vertical_shift);
-         ///- 2.2 loopset1
-
-         ///+ 2.3 loopset2
-         ////set colors
-         rectcolorR[i]=Math.random(1.0)* 0.5/*ID:RGain 0.0 1.0 0.5*/; //Set R values. Note that "i" is converted to double-type.
-         rectcolorG[i]=Math.random(1.0)* 0.5/*ID:GGain 0.0 1.0 0.5*/; //Set G values. Note that "i" is converted to double-type.
-         rectcolorB[i]=Math.random(1.0)* 0.5/*ID:BGain 0.0 1.0 0.5*/; //Set B values. Note that "i" is converted to double-type.
-         ///- 2.3 loopset2
-
-         }
-		
-		///+ 2.4 linkto BasicCode3_1a
-        for(int i=0; i < rectnum; i++){
-            rect[i].draw(new Color(rectcolorR[i], rectcolorG[i], rectcolorB[i])); //draw objects by designated colors.
-        }
-        window.flip();
-        ///- 2.4 linkto BasicCode3_1a
-        
-        frame++;
-    }
-    ///- 2 drawing
-
-}
-		///- Main Routine
-
-
-	}
-
-}
-
-
+
 /*
-=======
->>>>>>> 06a470a0e79a283223a73d8c5f6e43ef76174d97
-using Psychlops;
-
-namespace PsychlopsSilverlightApp
-{
+//Two types of plaid motion
+//E. H. Adelson and J. A. Movshon (1982).
+//Phenomenal coherence of moving visual patterns. Nature 300, 523-525
 
-	public class PsychlopsMain
-	{///- Prefix linkto BasicCode1
+///+ Prefix
+//// Include Psychlops Package
+using Psychlops;
 
+	namespace PsychlopsSilverlightApp
+	{
 
-		///+ Main Routine
-		//// Psychlops runs at the first line of this function psychlops_main().
-		public void psychlops_main()
+		public class PsychlopsMain
 		{
-			///+ 0 linkto BasicCode3_1a
-			////Prepare global parameters
-			int maxrectnum = 200;
-			int rectnum = 100;
-			double rectsize = 5.0;
-			Rectangle[] rect = StaticFunctions.NewArray<Rectangle>(maxrectnum);
-			double[] rectcolorR = new double[maxrectnum];
-			double[] rectcolorG = new double[maxrectnum];
-			double[] rectcolorB = new double[maxrectnum];
-			///- 0 linkto BasicCode3_1a
-
-			Canvas window = new Canvas(Canvas.window);
-			var img = new Image("logo.png");
-
-
-			///+ 1 linkto BasicCode3_1a
-			////Initialize
-			for (int i = 0; i < rectnum; i++)
+			///- Prefix
+
+			///+ Global
+			// Struct for component paremeters
+			struct component
 			{
-				///+ 1.1 set1
-				////set positions and sizes
-				rect[i].set(rectsize, rectsize); //Set a size of rectangles.
-				rect[i].centering();
-				rect[i].shift((i - 0.5 * rectnum) * rectsize * 1.5,
-											   (i - 0.5 * rectnum) * rectsize * 1.5); //Move Rectangles to initial positions
-				///- 1.1 set1
-				///+ 1.2 set2
-				////set colors
-				rectcolorR[i] = Math.random(1.0) * 0.5; //Set R values. Note that "i" is converted to double-type.
-				rectcolorG[i] = Math.random(1.0) * 0.5; //Set G values. Note that "i" is converted to double-type.
-				rectcolorB[i] = Math.random(1.0) * 0.5; //Set B values. Note that "i" is converted to double-type.
-				///- 1.2 set2
+				public double contrast;
+				public double orientation;
+				public double lambda;
+				public double tf;
 			}
-			///- 1 linkto BasicCode3_1a
-
-			///+ 2 drawing
-			////drawing objects
-			///+ 2.1 linkto BasicCode3_2a
-			////Prepare variables for movie control;
-			int frame = 0;
-			int motion_dir = 1;
-			double Horizontal_shift, Vertical_shift;
-			///- 2.1 linkto BasicCode3_2a
+			///- Global
 
-			while (!Keyboard.esc.pushed())
+			///+ Stimulus drawing function
+			//// A function for stimulus drawing (main body)
+			void drawgratingmovie(Image[] img, component c1, component c2, double contrast, int start, int maxframe, double bg_lum, double alpha)
 			{
-				window.clear(Color.black);
-				for (int i = 0; i < rectnum; i++)
-				{
-					///+ 2.2 loopset1
-					////set positions and sizes
-
-					Horizontal_shift = Math.sin(2 * Math.PI * ((double)frame / 30.0)) * motion_dir * 100.0; //Calculate horizontal displacement from the center.
-					Vertical_shift = Math.sin(2 * Math.PI * ((double)frame / 30.0)) * motion_dir * 0.0;//Calculate vertical displacement from the center.
-					rect[i].resize(rectsize, rectsize); //Resize rectangles.
-					rect[i].centering(); //Rectangles are moved to the center...
-					rect[i].shift(Horizontal_shift + (i - 0.5 * rectnum) * rectsize * 1.5,
-								  Vertical_shift + (i - 0.5 * rectnum) * rectsize * 1.5); //and then move to designated positions
-					///- 2.2 loopset1
-
-					///+ 2.3 linkto BasicCode3_2a
-					////set colors 
-					rectcolorR[i] = Math.random(1.0) * 0.5; //Set R values. Note that "i" is converted to double-type.
-					rectcolorG[i] = Math.random(1.0) * 0.5; //Set G values. Note that "i" is converted to double-type.
-					rectcolorB[i] = Math.random(1.0) * 0.5; //Set B values. Note that "i" is converted to double-type.
-					///- 2.3 linkto BasicCode3_2a
-
+				double _xp, _xp2, col1, col2;
+				double contrast1, contrast2;
+				double imageheight, imagewidth;
+
+				contrast1 = contrast*c1.contrast/(c1.contrast+c2.contrast);
+				contrast2 = contrast*c2.contrast/(c1.contrast+c2.contrast);
+
+				imageheight = img[0].getHeight();
+				imagewidth = img[0].getWidth();
+
+				for(int frame=start; frame<start+maxframe+1; frame++){
+					//Display.progressbar(frame, maxframe+1);
+					//img[frame].convert(Image::RGBA);
+					for(int i=0; i<imagewidth; i++){
+						for(int j=0; j<imageheight; j++){
+							_xp = Math.sin(c1.orientation)*(i-imagewidth*0.5) + Math.cos(c1.orientation) * (j-imageheight *0.5);
+							_xp2 = Math.sin(c2.orientation)*(i-imagewidth*0.5) + Math.cos(c2.orientation) * (j-imageheight *0.5);
+							col1 = bg_lum*contrast1*Math.sin(2*Math.PI*_xp/c1.lambda + 2*Math.PI*c1.tf*frame/(double)refresh);
+							col2 = bg_lum*contrast2*Math.sin(2*Math.PI*_xp2/c2.lambda + 2*Math.PI*c2.tf*frame/(double)refresh);
+							img[frame].pix(i,j,new Color(col1+col2+bg_lum));
+							img[frame].alpha(i,j,alpha);
+						}
+					}
+					//img[frame].cache();
 				}
-				///+ 2.4 linkto BasicCode3_1a
-				for (int i = 0; i < rectnum; i++)
+			}
+
+			///+ Stimulus drawing function
+			//// A function for stimulus drawing (main body)
+			void drawplaid() {
+				Canvas display = new Canvas(Canvas.window);
+				///+ Preperation
+				//// Declare and initialize local variables
+				int rect_size = 150;
+				double rect_lum  = 0.5;
+				double bg_lum    = 0.2;
+				double duration = 400;
+
+				double[] lambda = new double[2], contrast = new double[2], tf = new double[2];
+				double center_orientation = 0.0;
+				Image[,] movie = StaticFunctions.NewArray<Image>(2, 120);
+				Image[,] component_movie = StaticFunctions.NewArray<Image>(4, 120);
+				Image envelope = new Image(), envelope_small = new Image();
+
+				for(int i=0; i<120; i++)
 				{
-					rect[i].draw(new Color(rectcolorR[i], rectcolorG[i], rectcolorB[i])); //draw objects by designated colors.
+					movie[0, i].set(rect_size, rect_size);
+					movie[1, i].set(rect_size, rect_size);
+					component_movie[0, i].set(rect_size/2, rect_size/2);
+					component_movie[1, i].set(rect_size/2, rect_size/2);
+					component_movie[2, i].set(rect_size/2, rect_size/2);
+					component_movie[3, i].set(rect_size/2, rect_size/2);
 				}
-				window.flip();
-				///- 2.4 linkto BasicCode3_1a
-				frame++;
+				envelope.set(rect_size, rect_size);
+				envelope_small.set(rect_size/2, rect_size/2);
+
+				Letters let1 = new Letters(), let2 = new Letters(), let3 = new Letters();
+				let1.str = "Component1";
+				let2.str = "Component2";
+				let3.str = "Superposition";
+				let1.centering().shift(-rect_size*1.25, -rect_size);
+				//let1.cache();
+				let2.centering().shift(rect_size*1.25, -rect_size);
+				//let2.cache();
+				let3.centering().shift(0.0, rect_size*0.75);
+				//let3.cache();
+
+				component c1, c2, c0;
+				c0 = new component{ 0.0,0.0,1.0,1.0 }; //dummy for component movie
+				///+ type-I
+				// Prepare Type-I plaid movie
+				center_orientation = 0.0;
+				orientation_offset = Math.PI/6;
+				contrast[0] = 1.0, contrast[1] = 1.0;
+				lambda[0] = 30.0, lambda[1] = 30.0;
+				tf[0] = 1.0; tf[1] = 1.0;
+
+				c1 = {contrast[0], center_orientation-orientation_offset, lambda[0], tf[0]};
+				c2 = {contrast[1], center_orientation+orientation_offset, lambda[1], tf[1]};
+
+			drawgratingmovie(movie[0],c1, c2, 0.5, 0, refresh_int, bg_lum, 1.0);
+			drawgratingmovie(component_movie[0],c0, c2, 0.5, 0, refresh_int, bg_lum, 1.0);
+			drawgratingmovie(component_movie[1],c1, c0, 0.5, 0, refresh_int, bg_lum, 1.0);
+			///- type-I
+
+			///+ type-II
+			// Prepare Type-II plaid movie
+			center_orientation = -0.0, orientation_offset = Math.PI/12;
+			contrast[0] = 1.0, contrast[1] = 1.0;
+			lambda[0] = 30.0, lambda[1] = 30.0;
+			tf[0] = 1.0; tf[1] = 4.0;
+
+			c1 = {contrast[0], center_orientation-orientation_offset, lambda[0], tf[0]};
+			c2 = {contrast[1], center_orientation+orientation_offset, lambda[1], tf[1]};
+
+			drawgratingmovie(movie[1],c1, c2, 0.5, 0, refresh_int, bg_lum, 1.0);
+			drawgratingmovie(component_movie[2],c0, c2, 0.5, 0, refresh_int, bg_lum, 1.0);
+			drawgratingmovie(component_movie[3],c1, c0, 0.5, 0, refresh_int, bg_lum, 1.0);
+			///- type-II
+
+			///+ gaussian
+			//draw Gaussian envelopes
+			envelope.clear(new Color(bg_lum)); //clear offscreen image
+			double _x, _y;
+			for(int i=0; i<rect_size; i++){
+			_x=i-0.5*rect_size;
+			for(int j=0; j<rect_size; j++){
+			_y=j-0.5*rect_size;
+			envelope.alpha(i,j,1.0-Math.exp(-((_x*_x+_y*_y)/ (2.0*pow(rect_size/6.0, 2.0) ))));
 			}
-			///- 2 drawing
-
-		}
-		///- Main Routine
-
-
-	}
-
-}
-
-
-
-
-
-/*
-using Psychlops;
-
-namespace PsychlopsSilverlight4test
-{
-
-	public class PsychlopsMain
-	{
-		void RectLuminance()
-		{
-			Canvas display = new Canvas(Canvas.window);
-			Psychlops.Solver.BinomialLikelihood.showWindow(Math.cumulativeNormalDistibution);
-			Letters le = new Letters("Reload to restart");
-			le.fill = Color.black;
-			le.align = Letters.HorizontalAlign.center;
-
-			while (!Keyboard.esc.pushed())
-			{
-				Display.clear(Color.white);
-				le.centering().shift(-200,-10).draw();
-				Display.flip();
 			}
 
-		}
-
-
-		public void psychlops_main()
-		{
-			RectLuminance();
-		}
-
-
-	}
-
-}
-*/
-
-*/
-
-
-
-
-
-
-
-
-
-/*
- using Psychlops;
-
-namespace PsychlopsSilverlight4test
-{
-
-	public class PsychlopsMain
-	{
-
-		Psychlops.Canvas cnvs;
-		int i;
-		double x, y, z, t, p, temp, xx, yy;
-
-		//Set Target Initial Value
-		double TargetEcce = 100.0, TargetSize = 5.0, TargetNumber = 5, Rotate = 0.0;
-
-		//Set Background Initial Value
-		double Axis = 0.0, BGRadii = 150, BGSize = 5.0;
-		Psychlops.Widgets.Slider thetaSpeed, DotNumber;
-		Image img;
-
-
-
-		public void psychlops_main()
-		{
-			cnvs = new Canvas(500, 500);
-
-			Psychlops.Solver.BinomialLikelihood.showWindow(Math.cumulativeNormalDistibution);
-
-
-			img = new Image("Resources/logo.png");
-
-			Interval rng = new Interval();
-			thetaSpeed = new Psychlops.Widgets.Slider("Label", -10 <= rng <= 10, 3.0);
-			DotNumber  = new Psychlops.Widgets.Slider("DotNum",   0 <= rng <= 100, 50.0);
-
-			//Declare background dots and target
-			Rectangle[] BGDot = new Rectangle[2048];
-			for(int i=0; i<2048; i++){
-				BGDot[i]=new Rectangle();
+			envelope_small.clear(new Color(bg_lum)); //clear offscreen image
+			for(int i=0; i<rect_size*0.5; i++){
+			_x=i-0.25*rect_size;
+			for(int j=0; j<rect_size*0.5; j++){
+			_y=j-0.25*rect_size;
+			envelope_small.alpha(i,j,1.0-Math.exp(-((_x*_x+_y*_y)/ (2.0*pow(rect_size/12.0, 2.0) ))));
 			}
-			Rectangle[] Target= new Rectangle[10];
-			for(int i=0; i<10; i++){
-				Target[i]=new Rectangle();
 			}
+			envelope.cache(); //send offscreen image from main memory to GPU
+			envelope_small.cache(); //send offscreen image from main memory to GPU
+			///- gaussian
+
+			///+ user interface
+			// Draw user interface
+			Widgets::SelectBox stimulus_type;
+			stimulus_type.area.set(120, 20);
+			stimulus_type.append(L"TypeI");
+			stimulus_type.append(L"TypeII");
+			stimulus_type.centering().shift(-120.0,250.0);
+
+			Psychlops::Widgets::SelectBox stimulus_type2;
+			stimulus_type2.area.set(120, 20);
+			stimulus_type2.append(L"Continuous");
+			stimulus_type2.append(L"Periodic");
+			stimulus_type2.centering().shift(120.0,250.0);
+
+			Psychlops::Widgets::Slider duration_slider;
+			duration_slider.area.set(100,20);
+			duration_slider.centering().shift(120,280.0);
+			Interval rng = new Interval();
+			duration_slider.link(duration, 50<=rng<=950, 50.0, 50.0);
+			///- user interface
+			///- Preperation
 
-
-			//Declare Matrix to keep back ground dots' coordinate value
-			double[] DotX=new double[2048];
-			double[] DotY = new double[2048];
-
-
-			//Set Independent variables to manipulate
-
-
-			//Initialize positions of background dots
-			for(int i=0; i<2048; i++){
-				t=2.0*Math.PI*Math.random(1.0);
-				p=2.0*Math.PI*Math.random(1.0);
-				DotX[i]=t;
-				DotY[i]=p;
-
-				x=BGRadii*Math.cos(t)*Math.cos(p);
-				y=BGRadii*Math.sin(t)*Math.cos(p);
-				BGDot[i].set(BGSize, BGSize);
-				BGDot[i].centering().shift(x,y);
+			///+ Main loop
+			int frame = 0;
+			int period = refresh_int;
+			int movienum;
+			while(!Keyboard.esc.pushed()) {
+			Display.clear(new Color(bg_lum));
+			movienum = stimulus_type.getSelected(); //if "Type-I" is selected, 0, else frame refresh per sec
+
+			in;
+			else period = refresh_int;
+
+			if(frame>0){
+			movie[movienum, frame].centering().draw();
+			envelope.centering().draw();
+			component_movie[movienum*2, frame].centering().shift(-rect_size*0.5, -rect_size).draw();
+			envelope_small.centering().shift(-rect_size*0.5, -rect_size).draw();
+			component_movie[movienum*2+1, frame].centering().shift(rect_size*0.5, -rect_size).draw();
+			envelope_small.centering().shift(rect_size*0.5, -rect_size).draw();
 			}
 
-			//Initialize positions of targets
-			for(int i=0; i<10; i++)Target[i].set(TargetSize, TargetSize);
-
-			double COS, SIN;
-			//DotNumber = 200;
-			//Main stimulus loop
-			while(true){
-				//Clear the main window
-				cnvs.clear();
-
-
-				temp=Axis/360*2*Math.PI;
-				COS=Math.cos(temp);
-				SIN=Math.sin(temp);
-
-				//Calculate positions of background dots and set them
-				for(int i=0; i<DotNumber; i++){
-					//Calculate in polar coordinate
-					t=DotX[i]+2.0*Math.PI*thetaSpeed/360.0;
-					p=DotY[i];
-
-					//Save current position
-					DotX[i]=t;
-
-					//Convert to Decartes coordinate
-					x=BGRadii*Math.cos(t)*Math.cos(p);
-					y=BGRadii*Math.sin(t)*Math.cos(p);
-					z=BGRadii*Math.sin(p);
-					xx=x;
-					yy=SIN*y+COS*z;
-
-					//Set Dotsize and Draw them
-					BGDot[i].set(BGSize, BGSize);
-					BGDot[i].centering().shift(xx,yy);
-					BGDot[i].draw( Color.blue );
-				}
-
-				//Calculate positions of targets and set them
-				temp=Rotate*2*Math.PI/360.0;
-				for (int i = 0; i < 5; i++)
-				{
-					t = 2.0 * Math.PI/TargetNumber;
-					x = TargetEcce*Math.cos(i*t+temp);
-					y = TargetEcce*Math.sin(i*t+temp);
-					Target[i].centering().shift(x,y);
-					Target[i].fill = Color.yellow;
-					Target[i].draw();
-				}
-
-				img.centering(Mouse.position).draw();
-
-				cnvs.var(Mouse.position.x, 100, 100);
-				cnvs.var(Mouse.position.y, 100, 140);
-
-				//Reflect drawing at the next frame;
-				cnvs.flip();
+			///+ draw user interface
+			let1.draw(0.75);
+			let2.draw(0.75);
+			let3.draw(0.75);
+			stimulus_type.draw();
+			stimulus_type2.draw();
+			if(stimulus_type2.getSelected())duration_slider.draw();
+			///- draw user interface
+			Display.flip();
+			if(frame++ >= period) frame -= refresh_int;
 			}
-		}
-	}
-
-}
-*/
+			///- Main loop
 
-
-/*using Psychlops;
-
-namespace PsychlopsSilverlight4test
-{
-	public class PsychlopsMain
-	{
-		public void psychlops_main()
-		{
-			var figure_type = Psychlops.Widgets.Browser.Element.byID("FIGURE");
-			var size_x = Psychlops.Widgets.Browser.Element.byID("SIZE_X");
-			var size_y = Psychlops.Widgets.Browser.Element.byID("SIZE_Y");
-			var shift_x = Psychlops.Widgets.Browser.Element.byID("SHIFT_X");
-			var shift_y = Psychlops.Widgets.Browser.Element.byID("SHIFT_Y");
-			var color_r = Psychlops.Widgets.Browser.Element.byID("COLOR_R");
-			var color_g = Psychlops.Widgets.Browser.Element.byID("COLOR_G");
-			var color_b = Psychlops.Widgets.Browser.Element.byID("COLOR_B");
-
-			Canvas window = new Canvas(300, 300);
-
-			var figure_r = new Rectangle();
-			var figure_e = new Ellipse();
-			Shape figure = figure_r;
-			
-			while (!Keyboard.esc.pushed())
-			{
-				if (System.String.Compare(figure_type, "Rectangle") == 0)
-				{
-					figure_r.set(size_x, size_y);
-					figure = figure_r;
-				}
-				else
-				{
-					figure_e.set(size_x, size_y);
-					figure = figure_e;
-				}
-				figure.fill = new Color(color_r, color_g, color_b);
-
-				window.clear(Color.black);
-				figure.centering().shift(shift_x, shift_y).draw();
-				window.flip();
 			}
+			///- Stimulus drawing function
+
+		///+ Main function for demo circumstances
+		public void psychlops_main() {
+			///+ Demo circumstances
+			//// Spells for run demonstration circumstances
+			Procedure p = new Procedure();
+			//p.setDesign(Procedure::DEMO); //Designate that this is a demo.
+			p.setProcedure(drawplaid);  //The argument name is a name of drawing function.
+			p.run();
+			///- Demo circumstances
 		}
 	}
-
 }
+*/
 
 
 
-
-/*
 using Psychlops;
-
-namespace Psychlops
+//Position Bias Program
+namespace PsychlopsSilverlightApp
 {
 
-	public class RandomDots
-	{
-		Rectangle dot;
-		public Point[] cood;
-		public RandomDots()
-		{
-			cood = new Point[250];
-			dot = new Rectangle(5, 5);
-		}
-		public void draw()
-		{
-			dot.fill = Color.white;
-			foreach (Point p in cood)
+    public class PsychlopsMain
+    {
+        Canvas cnvs;
+        Image img, img2, img3;
+        int isize = 40;        
+        int frames;
+        Psychlops.Widgets.Slider tfreq;
+        Psychlops.Widgets.Slider contrast;
+        Psychlops.Widgets.Slider lambda;
+		
+
+		
+        public void psychlops_main()
+        {
+            cnvs = new Canvas(300, 600);
+            Interval rng = new Interval();
+            tfreq = new Psychlops.Widgets.Slider("Temporal Frequency(Hz)", -5 <= rng <= 5, 3.0);
+            contrast = new Psychlops.Widgets.Slider("Contrast", 0.0 <= rng <= 1.0, 0.25);
+            lambda = new Psychlops.Widgets.Slider("Wave Length", 10.0 <= rng <= 120.0, 30);
+
+            img = new Image(isize * 2, isize * 2);
+            img2 = new Image(isize * 2, isize * 2);
+            img3 = new Image(isize * 2, isize * 2);
+
+			Figures.ShaderGabor[] gabor1 = StaticFunctions.NewArray<Figures.ShaderGabor>(100);
+			foreach(var g in gabor1)
 			{
-				dot.centering(p).draw();
+				g.setSigma(isize / 8).centering().shift(Math.random(300) - 150, Math.random(600) - 300);
+				g.orientation = Math.random(2*Math.PI);
 			}
-		}
-	}
-
-}
-
-
 
-namespace PsychlopsSilverlight4test
-{
-
-	public class PsychlopsMain
-	{
-		Canvas cnvs;
-		Image img;
-		Ellipse fixation;
-		Shape shape;
-		Color col;
-		int isize = 100;
-		double tfreq = 1;
-		int frames;
-		RandomDots dots;
-		Group g;
-
-		public void psychlops_main()
-		{
-			cnvs = new Canvas(500, 500);
-			g = new Group();
-			img = new Image(isize * 2, isize * 2);
-			Figures.drawGrating(ref img, 200, 200, 20, 1, 2, frames * 2.0 * Math.PI / tfreq / 60);
-			g.append(img);
-			g.rotation = 50;
-			fixation = new Ellipse(10, 10);
-			fixation.fill = Color.red;
-			//var poly = new Rectangle(100, 100);
-			var poly = new Letters("日本語");
-			//var poly = new Polygon(); poly.append(0, 100); poly.append(-100, 0); poly.append(0, -100); poly.append(100, 0);
-			//var poly = new Ellipse(100, 100);
-			//var poly = new Line(0,0,100, 0);
-			poly.fill = Color.red;
-			poly.stroke = new Stroke { color = Color.yellow, thick = 1 };
-			shape = poly;
-
-			var rng = new Interval();
-			var slider = new Psychlops.Widgets.Slider("tesrt", -100 <= rng <= 100);
-
-			dots = new RandomDots();
-
-
-			while (true)
+            while (true)
 			{
-				frames++;
-
-
-				cnvs.clear(new Color(Mouse.left.pressed() ? 0.75 : 0.5));
-				col.set(Math.random(1.0));
-
-				/*if (frames % 2 == 0)
-				{
-					fixation.centering().shift(100, 100);
-					fixation.draw(new Stroke(Color.blue, 3));
-				}* /
-
-				fixation.centering().shift(slider, 0);
-				fixation.draw(Color.red);
+                cnvs.clear(new Color(0.5));
 
-				//Figures.drawGabor(ref img, 20, 100, 1, 0, frames * 2.0 * Math.PI / tfreq / 60);
-				//Figures.drawGaussian(ref img, 20, 1);
-				//Figures.drawGrating(ref img, 200, 200, 20, 1, 2, frames * 2.0 * Math.PI / tfreq / 60);
-				//img.centering(Mouse.position);
-				//img.draw();
-				g.centering(Mouse.position).draw();
-				g.rotation += 1;
+                Figures.drawGabor(ref img, isize / 8, 1/lambda, contrast, 0.5 * Math.PI, (double)frames * 2.0 * Math.PI * tfreq / 60);
+				Figures.drawGabor(ref img2, isize / 8, 1 / lambda, contrast, 0.5 * Math.PI, (double)frames * 2.0 * Math.PI * -tfreq / 60);
+				Figures.drawGabor(ref img3, isize / 8, 1 / lambda, contrast, 0.5 * Math.PI, (double)frames * 2.0 * Math.PI * tfreq / 60);
 
-				shape.centering(Mouse.position).shift(100, 0);
-				shape.draw();
-				if (Keyboard.spc.pressed()) cnvs.var(Mouse.x, 100, 100);
 
-				cnvs.var(frames, 0, 20);
-				//slider.value = frames / 100.0;
+                //img.centering().shift(0, -isize * 1.5).draw();
+                //img2.centering().draw();
+                //img3.centering().shift(0, isize * 1.5).draw();
 
-				/*if (frames % 2 != 0)
-				{
-					fixation.shift(100, 100);
-					fixation.draw(new Stroke(Color.green, 3));
-				}* /
 
-				for (int i = 0; i < dots.cood.Length; i++)
+				foreach (var g in gabor1)
 				{
-					dots.cood[i].set(Math.random(500), Math.random(500));
+					g.wavelength = lambda;
+					g.phase = (double)frames * 2.0 * Math.PI * tfreq / 60;
+					g.contrast = contrast;
+					g.draw();
 				}
-				cnvs.var((double)slider, 200, 200);
-				dots.draw();
-
-				cnvs.flip();
-			}
-		}
-	}
-}
+                
+                if (!Mouse.left.pressed()) frames++;
 
-**/
-
-
-/*
-
-using Psychlops;
-namespace PsychlopsSilverlight4test
-{
-
-	public class PsychlopsMain
-	{
-		Canvas cnvs;
-		Rectangle[] rect;
-		int n;
-
-		public void psychlops_main()
-		{
-			n = 1;
-			cnvs = new Canvas(500, 500);
-			rect = new Rectangle[n];
-			for (int i = 0; i < n; i++)
-			{
-				rect[i] = new Rectangle(10, 10);
-				rect[i].fill = Color.red;
-			}
-			Interval rng = new Interval();
-			var slider = new Psychlops.Widgets.Slider("Label", -100 <= rng <= 100);
-
-			while (true)
-			{
-				cnvs.clear();
-				for (int i = 0; i < n; i++)
-				{
-					rect[i].centering().shift(slider * i*3, i*3).draw();
-				}
-				cnvs.flip();
-			}
-		}
-	}
+                cnvs.flip();
+            }
+        }
+    }
 }
-
-*/
\ No newline at end of file