coding Shift_JIS;

// Load libraries
import tool.Graph3D; // Required for 3D graph handling
import Math;         // Required for mathematical functions


// Prepare arrays for plotting
int pointN = 100;     // Number of points
float xData[pointN];  // Array for X coordinates
float yData[pointN];  // Array for Y coordinates
float zData[pointN];  // Array for Z coordinates


// Set plot range
float xMax = 10.0;  // Maximum X value
float xMin = 0.0;   // Minimum X value
float yMax = 1.0;   // Maximum Y value
float yMin = -1.0;  // Minimum Y value
float zMax = 1.0;   // Maximum Z value
float zMin = -1.0;  // Minimum Z value

// Launch the 3D graph and configure settings
int graph = newGraph3D();             // Launch graph
setGraph3DRangeX(graph, xMin, xMax);  // Set X range
setGraph3DRangeY(graph, yMin, yMax);  // Set Y range
setGraph3DRangeZ(graph, zMin, zMax);  // Set Z range
setGraph3DAutoRange(graph, false, false, false); // Disable auto-scaling
setGraph3DOption(graph, "WITH_LINES", true);     // Enable line plots


// Animation loop (frames counted by 'frame' variable)
for (int frame=0; true; frame++) { // Limit frame count if necessary, e.g., frame<=1000
	
	// Calculate time t based on the current frame
	float t = 0.05 * frame;  // Larger coefficient = faster animation
	
	// Update coordinate arrays
	for(int i=0; i<pointN; i++){
		
		float dx = (xMax-xMin)/(pointN-1); // X interval
		float x = xMin + i * dx;    // X coordinate
		float y = sin(x + t);       // Y coordinate (modify as desired)
		float z = sin(2.0 * x + t); // Z coordinate (modify as desired)
		
		xData[i] = x;
		yData[i] = y;
		zData[i] = z;
	}
	
	// Plot the coordinate arrays
	setGraph3DData(graph, xData, yData, zData);
	
	// Wait for 30 milliseconds
	sleep(30);
	
	
	/*
	// Export the graph to sequential image files (e.g., "image_0.png", "image_1.png", ...)
	if(frame <= 100) {
		exportGraph3D(graph, "image_" + frame + ".png", "PNG");
	}
	*/
}