Dieses Fraktal füllt die Zeichenfläche mit immer kleiner werdenden Rechtecken. Um die Entstehung dieses Fraktals ``sehen'' zu können, werden die Rechteckflächen der einzelnen Rekursionen übereinander gezeichnet (und schön eingefärbt ;-):
import java.awt.*;
import java.applet.*;
public class Flaeche extends Applet {
public void paint (Graphics g) {
flaeche(this, 100, 200, 200);
}
public void flaeche(Container ct, double l, double x, double y) {
Graphics g = ct.getGraphics();
if (l>1) {
flaeche(ct, l/2, x-l, y+l);
flaeche(ct, l/2, x+l, y+l);
flaeche(ct, l/2, x-l, y-l);
flaeche(ct, l/2, x+l, y-l);
g.setColor(Color.black);
g.drawRect((int) (x-l),(int) (y-l), (int) (2*l), (int) (2*l));
g.setColor(Color.yellow);
g.fillRect((int) (x-l+1),(int) (y-l+1),(int) (2*l-1), (int) (2*l)-1);
}
}
}