// マンデルブロ集合 [Mandel.java] 
 import java.applet.Applet; 
 import java.awt.*; 
 import java.awt.event.*;                          // JDK 1.1 
 public class Mandel extends Applet  
        implements MouseListener,ActionListener {  // JDK 1.1 
  int Dx,Dy,Ux,Uy;              // マウスの位置 
  double rs,re,is,ie; 
  Button button_rw,button_rst;  // ボタン 
  Color [] C={Color.red,Color.pink,Color.magenta, 
              Color.blue,Color.cyan,Color.green, 
              Color.yellow,Color.gray}; 
  int colorLen=C.length;            // 色の数 
  int n=100;                        // 最大繰り返し回数 
  public void init() {          // ロード時の初期化メソッド 
     button_rw = new Button("RE-Write");  // RE-Writeボタン 
     button_rst= new Button("RESET");     // RESETボタン 
     add(button_rw);                      // RE-Writeボタン 
     add(button_rst);     // RESETボタン 
     rs=-2.0; re=0.5;     //(a) 実部の始点,終点(初期値) 
     is=-1.2; ie=1.2;     //(a) 虚部の始点,終点(初期値) 
     addMouseListener(this);             // JDK 1.1 
     button_rw.addActionListener(this);  // JDK 1.1 
     button_rst.addActionListener(this); // JDK 1.1 
  } // end init 
  //============= JDK 1.1 イベント処理(ボタン) ============= 
  public void actionPerformed(ActionEvent e) { // JDK 1.1 
     if (e.getSource() == button_rw) {   // RE-Writeボタン 
        repaint(); 
     } else if (e.getSource() == button_rst) { //(b) reset 
        rs=-2.0; re=0.5;   //(b) 実部の始点,終点(初期値) 
        is=-1.2; ie=1.2;   //(b) 虚部の始点,終点(初期値) 
        repaint(); 
     }//end if 
  } //end actionPerformed 
  //============= JDK 1.1 イベント処理(マウス) ============= 
  public void mousePressed(MouseEvent e) { //(c) 押す 
     Dx=e.getX();              //(c)マウスのボタンを押した位置 
     Dy=e.getY();              //(c)マウスのボタンを押した位置 
     Ux=0; Uy=0;               //   マウスのボタンを放した位置 
     Graphics g=getGraphics();    // Graphicsオブジェクトの代入 
     g.setColor(Color.white);     //    色の設定 
     g.drawLine(Dx-4,Dy,Dx+4,Dy); //(d) 横線 
     g.drawLine(Dx,Dy-4,Dx,Dy+4); //(d) 縦線 
  } //end mousePressed 
  public void mouseReleased(MouseEvent e) {  //(e) JDK 1.1 
     int w; 
     double wR,wI,wwR,wwI; 
     Graphics g=getGraphics();    // Graphicsオブジェクトの代入 
     int width  =getSize().width;       // 横の長さ  
     int height=getSize().height-45;   // 縦の長さ 
     Ux=e.getX(); Uy=e.getY();         // ボタンを放した位置 
     if (Ux<Dx) { w=Dx; Dx=Ux; Ux=w;}  //(f) 位置によって 
     if (Uy<Dy) { w=Dy; Dy=Uy; Uy=w;}  //(f)   入れ換える 
     g.setColor(Color.white);          // 色の設定 
     g.drawRect(Dx,Dy,Ux-Dx,Uy-Dy);    // 長方形を描く 
     wR=re-rs; wI=ie-is; wwR=rs; wwI=is; 
     rs=wwR + wR * Dx/(double)width;    //(g) 実部の始点 
     re=wwR + wR * Ux/(double)width;    //(g) 実部の終点 
     is=wwI + wI *(height-Uy+30)/(double)height; //(g)虚部の始点 
     ie=wwI + wI *(height-Dy+30)/(double)height; //(g)虚部の終点 
  } //end mouseReleased 
  public void mouseClicked(MouseEvent e) { }  // JDK 1.1 
  public void mouseEntered(MouseEvent e) { }  // JDK 1.1 
  public void mouseExited (MouseEvent e) { }  // JDK 1.1 
  //================= グラフィックスの表示 ================= 
  public void paint( Graphics g ) { 
     double r,i,zR,zI,dR,dI,u,v; 
     String st1,st2; 
     int width =getSize().width;       // 横の長さ 
     int height=getSize().height;      // 縦の長さ 
     st1="R=("+(rs+"    ").substring(0,5)+","+ 
            (ie+"    ").substring(0,5)+") "; 
     st2="I=("+(re+"    ").substring(0,5)+","+ 
            (is+"    ").substring(0,5)+")"; 
     g.setColor(Color.black);          // 色の設定 
     g.fillRect(0,30,width,height-30); // 黒で塗り潰す 
     g.setColor(Color.white);          // 色の設定 
     g.drawString(st1+st2,5,height-2); // 作画の範囲 
     //=============== マンデルブロ集合の計算 =============== 
     dR=(re-rs)/width;                 //(h) 実部の増分 
     dI=(ie-is)/(height-45);           //(h) 虚部の増分 
     for (int rr=0; rr<width; rr++) {  // --> 実部のループ 
        u=rr*dR+rs;                    //(i) 複素定数の実部 
        for (int ii=0; ii<height-45; ii++) { // 虚部のループ 
           v=ie-ii*dI;                 //(i) 複素定数の虚部 
           r=0.0; i=0.0;               //(j) 複素変数の初期値 
           for (int L=1; L<n; L++) {   // --> 収束ループ 
              zR=r*r-i*i+u;            //(k) 実部の計算 
              zI=2*r*i  +v;            //(k) 虚部の計算 
              if (zR*zR + zI*zI > 4.0) {     //(l) 
                 g.setColor(C[L%colorLen]);  // 色の設定 
                 g.drawLine(rr,ii+30,rr,ii+30); 
                 break; 
              } //end if 
              r=zR; i=zI; 
           } //end L 
        } //end ii 
     } //end rr 
  } //end paint 
 } //end Mandel