// マンデルブロ集合 [Mandel.java](JDK 1.0.2)
 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
 public class Mandel extends Applet { //!
  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
 //============= JDK 1.0.2 イベント処理(ボタン) =============
 public boolean action(Event e, Object o) { //! イベントの処理
    String label = o.toString();
    if(e.target instanceof Button) {     //! ボタンを押した時の処理
       if (label.equals("RE-Write")) { 
          repaint();     //!
       } else if (label.equals("RESET")) {  //! resetボタン
          rs=-2.0; re=0.5; //!(b) 実部の始点,終点(初期値)
          is=-1.2; ie=1.2; //!(b) 虚部の始点,終点(初期値)
          repaint();       //!
       }//end if           //!
    }//end if              //!
    return true;           //!
 }//end action             //!
 //============= JDK 1.0.2 イベント処理(マウス) =============
 public boolean mouseDown(Event e,int x,int y){ //! マウスを押した時の処理
    Dx=x;              //!(c)マウスのボタンを押した位置
    Dy=y;              //!(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) 縦線
    return true;    //!
 } //end mouseDown  //!
 public boolean mouseUp(Event e,int x,int y){ //! マウスを放した時の処理
    int w;                       //!
    double wR,wI,wwR,wwI;        //!
    Graphics g=getGraphics();    //! Graphicsオブジェクトの代入
    int width  =size().width;       //! 横の長さ
    int height =size().height-45;   //! 縦の長さ
    Ux=x; Uy=y;                       //! ボタンを放した位置
    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)虚部の終点
    return true;   //!
 } //end mouseUp   //!
  //================= グラフィックスの表示 =================
  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;   // 縦の長さ
     int width =size().width;       //!横の長さ
     int height=size().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