perlin circle

gistfile1.txt

for hiro

//--------------------------------------------------------------
void testApp::draw(){

	ofSetColor(255,0,127);
	
	ofBeginShape();
	for (int i = 0; i < 1000; i++){
		
		//float add = ofNoise(sin((i/100.0)*TWO_PI), ofGetElapsedTimef());  // symetrical
		
        //cout << i << " " << (i + 500) % 1000 << endl;
        
        int i2 = (i + 500) % 1000;
        
		float add = ofNoise(i/100.0f, ofGetElapsedTimef() * 3 * (float)mouseX / (float)ofGetWidth());

        float add2 = ofNoise(i2/100.0f + 1000, ofGetElapsedTimef() * 3 * (float)mouseX / (float)ofGetWidth());

        float pct = sin(ofMap( i / 1000.0, 0.25, 0.75, 0, 1, true) * PI);
        
        float pct2 = 1 - sin(ofMap( i / 1000.0, 0.25, 0.75, 0, 1, true) * PI);
        
        
        
		ofVertex(	500 + (200 + 100 * add2 * pct2 + 100 * add * pct) * cos((i/1000.0)*TWO_PI),
					400 + (200 + 100 * add2 * pct2 + 100 * add * pct) * sin((i/1000.0)*TWO_PI));
	}
	ofEndShape();
	
}