import java.awt.event.*;import java.awt.*;import java.applet.*;
class Obi {
    int haba2;                          //帯の幅の２乗
    int haba;                                      //帯の幅
    int edamotox;int edamotoy;          //基本枝の枝元のｘ、ｙ
    int edasakix;int edasakiy;          //基本枝の枝先のｘ、ｙ
    boolean moto_saki_tadasii;                     //基本枝の枝元と枝先が正しく設定されたかを示すフラグ
    boolean enryouiki;                  /*円領域かどうかの判定用フラグ*/
    String buimeisyou;                  /*部位の名前（頭とか尾など）*/
}
public class orio3 extends Applet implements MouseListener, MouseMotionListener, ActionListener{
 int posx0;int posy0; int posx1;int posy1;
 int vposx0;int vposy0; int vposx1;int vposy1; //基本枝の平行移動時のベクトル
 Label lbel; int i;//上部文字表示用ラベル
 boolean sinki = true;//基本枝によって加えた帯が新規なら真
 boolean hajinoten = true;//基本枝の棒の端の点を選択したなら真
 boolean heikouidou = true;//基本枝の棒の平行移動をする状態なら真
 int sagyouJyoutai;//作業状態　１基本枝−基本枝、２基本枝−円図、３円図−円図、４円図−展開図、５展開図−展開図
 int r=7;//基本枝構造の直線の両端の円の半径
 int enzurasi=300;//円図のｘ軸方向のオフセット値

//帯領域用変数の定義
 int nobis; //帯領域の数
 int activeobi; //活性な帯の番号
 Obi obis[] = new Obi[500];//帯領域のインスタンス定義

//マウスボタンを押した場所の帯番号の取得
 void obiBangouHantei(int bhx , int bhy){
    sinki =true ;
   hajinoten = true;
   heikouidou = false;
   for (int bhi=1; bhi<=nobis; bhi++ ){
    if(    //平行移動を行うべきか判断 
     ((obis[bhi].edamotox-bhx)*(obis[bhi].edamotox-bhx)+(obis[bhi].edamotoy-bhy)*(obis[bhi].edamotoy-bhy) <obis[bhi].haba2)
           &&
     ((obis[bhi].edasakix-bhx)*(obis[bhi].edasakix-bhx)+(obis[bhi].edasakiy-bhy)*(obis[bhi].edasakiy-bhy) <obis[bhi].haba2)
    )
    {

     posx1=(obis[bhi].edasakiy-obis[bhi].edamotoy)*(obis[bhi].edasakix-bhx)-(obis[bhi].edasakiy-bhy)*(obis[bhi].edasakix-obis[bhi].edamotox);
     if(
    ((obis[bhi].edasakiy-obis[bhi].edamotoy)*(obis[bhi].edasakix-bhx)-(obis[bhi].edasakiy-bhy)*(obis[bhi].edasakix-obis[bhi].edamotox)<300)
          &&
       (-300<(obis[bhi].edasakiy-obis[bhi].edamotoy)*(obis[bhi].edasakix-bhx)-(obis[bhi].edasakiy-bhy)*(obis[bhi].edasakix-obis[bhi].edamotox))
          /* この真上の行にバグあるかも*/
             )
          { 
       sinki =false ; activeobi=bhi;heikouidou = true  ;
       vposx0=obis[bhi].edamotox-bhx;
       vposy0=obis[bhi].edamotoy-bhy;
       vposx1=obis[bhi].edasakix-bhx;
       vposy1=obis[bhi].edasakiy-bhy;
     }
    }
     //     すでにある枝を変形するかどうか判断
     if( (obis[bhi].edamotox-bhx)*(obis[bhi].edamotox-bhx)+(obis[bhi].edamotoy-bhy)*(obis[bhi].edamotoy-bhy) <r*r ){
        sinki =false ;activeobi=bhi;heikouidou = false  ;
        obis[bhi].edamotox= obis[bhi].edasakix; obis[bhi].edamotoy= obis[bhi].edasakiy;  
        obis[bhi].edasakix=bhx; obis[bhi].edasakiy=bhy;         
     }
     if( (obis[bhi].edasakix-bhx)*(obis[bhi].edasakix-bhx)+(obis[bhi].edasakiy-bhy)*(obis[bhi].edasakiy-bhy) <r*r ){
        sinki =false ;activeobi=bhi;heikouidou = false  ;
     }
   }

   if( sinki){//新規な場所を選んだと判断したときの処理
     nobis=nobis+1;
     activeobi=nobis;
     addObi(bhx , bhy,bhx , bhy);
    }
 }
//基本枝による新規の帯の追加
 void addObi(int emx,int emy,int esx,int esy) { 
   Obi n = new Obi();
   n.edamotox = emx;
   n.edamotoy = emy;
   n.edasakix = esx;
   n.edasakiy = esy; 
   obis[nobis] = n;
 }
//基本枝による新規の帯の追加の後処理
 void addObiatosyori() { 
      obis[activeobi].haba2
                =  (obis[activeobi].edamotox-obis[activeobi].edasakix)  *(obis[activeobi].edamotox-obis[activeobi].edasakix)  
                  +(obis[activeobi].edamotoy-obis[activeobi].edasakiy)  *(obis[activeobi].edamotoy-obis[activeobi].edasakiy)   ;
      obis[activeobi].haba=(int)Math.sqrt((float)obis[activeobi].haba2);
    for (int aboi=1; aboi<=nobis; aboi++ ){
       if(
             (obis[activeobi].edamotox-obis[aboi].edamotox)*(obis[activeobi].edamotox-obis[aboi].edamotox)
            +(obis[activeobi].edamotoy-obis[aboi].edamotoy)*(obis[activeobi].edamotoy-obis[aboi].edamotoy) <r*r 
         ){
        obis[activeobi].edamotox= obis[activeobi].edamotox + (obis[aboi].edamotox-obis[activeobi].edamotox);
        obis[activeobi].edamotoy= obis[activeobi].edamotoy + (obis[aboi].edamotoy-obis[activeobi].edamotoy);  
        obis[activeobi].edasakix= obis[activeobi].edasakix+ (obis[aboi].edamotox-obis[activeobi].edamotox);
        obis[activeobi].edasakiy= obis[activeobi].edasakiy+ (obis[aboi].edamotoy-obis[activeobi].edamotoy);   
       }
      if(
             (obis[activeobi].edamotox-obis[aboi].edasakix)*(obis[activeobi].edamotox-obis[aboi].edasakix)
            +(obis[activeobi].edamotoy-obis[aboi].edasakiy)*(obis[activeobi].edamotoy-obis[aboi].edasakiy) <r*r 
         ){
        obis[activeobi].edamotox= obis[activeobi].edamotox + (obis[aboi].edasakix-obis[activeobi].edamotox);
        obis[activeobi].edamotoy= obis[activeobi].edamotoy + (obis[aboi].edasakiy-obis[activeobi].edamotoy);  
        obis[activeobi].edasakix= obis[activeobi].edasakix+ (obis[aboi].edasakix-obis[activeobi].edamotox);
        obis[activeobi].edasakiy= obis[activeobi].edasakiy+ (obis[aboi].edasakiy-obis[activeobi].edamotoy);   
       }
      if(
             (obis[activeobi].edasakix-obis[aboi].edamotox)*(obis[activeobi].edasakix-obis[aboi].edamotox)
            +(obis[activeobi].edasakiy-obis[aboi].edamotoy)*(obis[activeobi].edasakiy-obis[aboi].edamotoy) <r*r 
         ){
        obis[activeobi].edamotox= obis[activeobi].edamotox + (obis[aboi].edamotox-obis[activeobi].edasakix);
        obis[activeobi].edamotoy= obis[activeobi].edamotoy + (obis[aboi].edamotoy-obis[activeobi].edasakiy);  
        obis[activeobi].edasakix= obis[activeobi].edasakix+ (obis[aboi].edamotox-obis[activeobi].edasakix);
        obis[activeobi].edasakiy= obis[activeobi].edasakiy+ (obis[aboi].edamotoy-obis[activeobi].edasakiy);   
       }
      if(
             (obis[activeobi].edasakix-obis[aboi].edasakix)*(obis[activeobi].edasakix-obis[aboi].edasakix)
            +(obis[activeobi].edasakiy-obis[aboi].edasakiy)*(obis[activeobi].edasakiy-obis[aboi].edasakiy) <r*r 
         ){
        obis[activeobi].edamotox= obis[activeobi].edamotox + (obis[aboi].edasakix-obis[activeobi].edasakix);
        obis[activeobi].edamotoy= obis[activeobi].edamotoy + (obis[aboi].edasakiy-obis[activeobi].edasakiy);  
        obis[activeobi].edasakix= obis[activeobi].edasakix+ (obis[aboi].edasakix-obis[activeobi].edasakix);
        obis[activeobi].edasakiy= obis[activeobi].edasakiy+ (obis[aboi].edasakiy-obis[activeobi].edasakiy);   
       }
    }
   
 }

//最初に行う作業
 public void init() {
  addMouseListener(this);
  addMouseMotionListener(this);
  // 初期表示
 /* addEdge() ;*/ 
 posx0=0 ;posy0=0; 
  lbel = new Label("おりお3");
  setBackground(Color.white);
  //　パネルの作成 
  setLayout(new BorderLayout());
  add("North",lbel); 
  Panel pnl = new Panel();
  Button KihonsiKihonsiButton = new Button("基本枝の入力"); 
  KihonsiKihonsiButton.addActionListener(this); 
  pnl.add(KihonsiKihonsiButton); 
  Button KihonsiEnzuButton = new Button("基本枝―>円図"); 
  KihonsiEnzuButton.addActionListener(this); 
  pnl.add(KihonsiEnzuButton); 
  add("South",pnl); 
  nobis=1;addObi(150,120,150,220);
  activeobi=1;addObiatosyori() ;    
  sagyouJyoutai=1;
 }
 public void destroy() {removeMouseListener(this);}
 
//マウス操作(ボタンを離したとき)
 public void mouseReleased(MouseEvent e) {  addObiatosyori() ;repaint(); }
 //マウス操作(ボタンを押したとき)
 public void mousePressed(MouseEvent e) {  
   posx0=e.getX();posy0=e.getY(); 
   posx1=e.getX();posy1=e.getY();
   obiBangouHantei(posx0,posy0);
   repaint();
 }
 public void mouseClicked(MouseEvent e) { }
 public void mouseEntered(MouseEvent e) { }
 public void mouseExited(MouseEvent e) {}
 //マウス操作(ドラッグしたとき)
 public void mouseDragged(MouseEvent e) {
  if(!heikouidou){
     obis[activeobi].edasakix =e.getX();
     obis[activeobi].edasakiy =e.getY();
  }
  if(heikouidou){
     obis[activeobi].edamotox =e.getX()+vposx0;                              
     obis[activeobi].edamotoy =e.getY()+vposy0;
     obis[activeobi].edasakix =e.getX()+vposx1;                              
     obis[activeobi].edasakiy =e.getY()+vposy1;
  }
     repaint();
 }
 
 public void mouseMoved(MouseEvent e) {}

//ペイント
 public void paint(Graphics g) {
 
    String c=new String();
    lbel.setText(c.valueOf(activeobi));
    //基本枝の描画
    for (int obibangou=1; obibangou<=nobis; obibangou++ ){
     g.drawLine( obis[obibangou].edamotox, obis[obibangou].edamotoy, obis[obibangou].edasakix, obis[obibangou].edasakiy); //直線
     g.drawOval(obis[obibangou].edamotox-r/2,obis[obibangou].edamotoy-r/2,r,r); //円
     g.drawOval(obis[obibangou].edasakix-r/2,obis[obibangou].edasakiy-r/2,r,r); //円
   }
   if ( sagyouJyoutai==2){
   //円領域の描画
    for (int obibangou=1; obibangou<=nobis; obibangou++ ){
     g.drawOval(obis[obibangou].edasakix-obis[obibangou].haba/2+enzurasi ,
                obis[obibangou].edasakiy-obis[obibangou].haba/2 ,obis[obibangou].haba,obis[obibangou].haba); //円
     g.drawOval(obis[obibangou].edasakix-r/2+enzurasi,obis[obibangou].edasakiy-r/4,r/2,r/2); //円
    }
     
   }


 }

//ボタンを押されたときの処理
 public void actionPerformed(ActionEvent e) { 
  if(e.getActionCommand().equals("基本枝の入力")) {
    lbel.setText("きほんし　から　きほんし" );
    sagyouJyoutai=1;
  } 
  if(e.getActionCommand().equals("基本枝―>円図")){
    lbel.setText("きほんし　から　えんず" );
       sagyouJyoutai=2;
       edaSettei();
    enSyokiIti();
  } 
  repaint(); 
 } 
//枝先と枝元を正しく設定
 void edaSettei() {
   //初期化 
    for (int obibangou=1; obibangou<=nobis; obibangou++ ){
      obis[obibangou].moto_saki_tadasii=false;
    }
   obis[1].moto_saki_tadasii=true;
//実際の判定

  for (int i=1; i<=nobis; i++ ){ 
   for (int sansyou_obibangou=1; sansyou_obibangou<=nobis; sansyou_obibangou++ ){
     if(obis[sansyou_obibangou].moto_saki_tadasii) 
  
        for (int hanteisuru_obibangou=2; hanteisuru_obibangou<=nobis; hanteisuru_obibangou++ ){
         if((sansyou_obibangou!= hanteisuru_obibangou)&&(!obis[hanteisuru_obibangou].moto_saki_tadasii)) {
          //もともと枝元先が正しい場合
            if(intkyori( obis[sansyou_obibangou].edamotox,   obis[sansyou_obibangou].edamotoy,
                     obis[hanteisuru_obibangou].edamotox,obis[hanteisuru_obibangou].edamotoy)<r){
                         obis[hanteisuru_obibangou].moto_saki_tadasii=true;
                     }
            if(intkyori( obis[sansyou_obibangou].edasakix,   obis[sansyou_obibangou].edasakiy,
                     obis[hanteisuru_obibangou].edamotox,obis[hanteisuru_obibangou].edamotoy)<r){
                         obis[hanteisuru_obibangou].moto_saki_tadasii=true;
                     }
          //もともとは枝元先が間違っている場合
            if(intkyori( obis[sansyou_obibangou].edamotox,   obis[sansyou_obibangou].edamotoy,
                     obis[hanteisuru_obibangou].edasakix,obis[hanteisuru_obibangou].edasakiy)<r){
                                           obis[hanteisuru_obibangou].edasakix= obis[hanteisuru_obibangou].edamotox;    
                                           obis[hanteisuru_obibangou].edasakiy= obis[hanteisuru_obibangou].edamotoy;   
                                          obis[hanteisuru_obibangou].edamotox= obis[sansyou_obibangou].edamotox;    
                                           obis[hanteisuru_obibangou].edamotoy= obis[sansyou_obibangou].edamotoy;   
                       obis[hanteisuru_obibangou].moto_saki_tadasii=true;
                    }
            if(intkyori( obis[sansyou_obibangou].edasakix,   obis[sansyou_obibangou].edasakiy,
                     obis[hanteisuru_obibangou].edasakix,obis[hanteisuru_obibangou].edasakiy)<r){
                                         obis[hanteisuru_obibangou].edasakix= obis[hanteisuru_obibangou].edamotox;    
                                           obis[hanteisuru_obibangou].edasakiy= obis[hanteisuru_obibangou].edamotoy;   
                                          obis[hanteisuru_obibangou].edamotox= obis[sansyou_obibangou].edasakix;    
                                           obis[hanteisuru_obibangou].edamotoy= obis[sansyou_obibangou].edasakiy;   
                         obis[hanteisuru_obibangou].moto_saki_tadasii=true;
                      }
         } //if　を受ける
       }   //for を受ける　
    }
   }

repaint();
 } 

//円領域の初期位置
  void enSyokiIti() {
 repaint();   


 } 

//２点間の距離計算（整数）
   int intkyori(int x0,int y0,int x1,int y1){
    int d;
         d= (int)Math.sqrt((float)(x1-x0)*(x1-x0)+(y1-y0)*(y1-y0));
       return d;
   }

}