import java.awt.*;
import java.util.*;
import java.lang.String;
import java.awt.Image;
import java.applet.Applet;
import java.awt.event.*;

//by KShindo
public class ukoyomi extends Applet
{
    Image offs;
    Graphics grf;
    Image ims[] = new Image[14];
    MediaTracker mt;
    TextField nnn,gat;
    int y,m,d;
    int km,kn;
    int mk[][] = new int[121][15];
    int dk[][] = new int[121][15];
    int mdays[] = new int[13];
    int sei, har, aki, tai, umi, kei, kok;
    int hurikaem, hurikaed;
    long q;
    String kd[] = new String[121];
    String rk[] = new String[6];
    String ek[] = new String[10];
    String tk[] = new String[12];
    String sn[] = new String[12];
    String ng[] = new String[4];
    String ppii;
    String syukujitu;
    boolean flag=false;
    boolean flagg=false;
    Calendar JST;
public void init(){
        setBackground(new Color(220,90,90));
        rk[0]="大 安";rk[1]="赤 口";rk[2]="先 勝";
        rk[3]="友 引";rk[4]="先 負";rk[5]="仏 滅";
        ek[0]="きのえ";ek[1]="きのと";ek[2]="ひのえ";ek[3]="ひのと";
        ek[4]="つちのえ";ek[5]="つちのと";ek[6]="かのえ";ek[7]="かのと";
        ek[8]="みずのえ";ek[9]="みずのと";
        tk[0]="ね";tk[1]="うし";tk[2]="とら";tk[3]="う";tk[4]="たつ";
        tk[5]="み";tk[6]="うま";tk[7]="ひつじ";tk[8]="さる";tk[9]="とり";
        tk[10]="いぬ";tk[11]="い";
        sn[0]="牡 羊";sn[1]="牡 牛";sn[2]="双 子";sn[3]="蟹";
        sn[4]="獅 子";sn[5]="乙 女";sn[6]="天 秤";sn[7]="蠍";
        sn[8]="射 手";sn[9]="山 羊";sn[10]="水 瓶";sn[11]="魚";
        ng[0]="明治";ng[1]="大正";ng[2]="昭和";ng[3]="平成";
        offs=createImage(175,288);
        grf=offs.getGraphics();
        resize(355,320);
        setLayout(null);
        nnn = new TextField(15);
        nnn.setBounds(30,23,55,20);
        add(nnn);
        gat = new TextField(15);
        gat.setBounds(85,23,30,20);
        add(gat);
        mt=new MediaTracker(this);
        for(int i=0;i<=12;i++){
            if(i<10){
                ims[i]=getImage(getCodeBase(),"uk"+"0"+i+".gif");
                mt.addImage(ims[i],0);
            }
            else{
                ims[i]=getImage(getCodeBase(),"uk"+i+".gif");
                mt.addImage(ims[i],0);
            }
        }
        kyureki_data();
        String tz[]=TimeZone.getAvailableIDs(9*60*60*1000);
        JST =  Calendar.getInstance(TimeZone.getTimeZone(tz[0]));
        y=JST.get(Calendar.YEAR);
        m=JST.get(Calendar.MONTH)+1;
        d=JST.get(Calendar.DATE);
        kyuureki();
        YMDstr();
        Graphics g=getGraphics();
        setCalendar(g);
        repaint();
    }

    public void update (Graphics g){paint(g);}
    public void paint(Graphics g) {
        grf.drawImage(ims[0],0,0,this);
        grf.drawImage(ims[m],0,105,this);
        int    x1,y1,xx1,yy1;
        double xx0,gm,l,r;
        int wo=125,ho=55;
        int tm,dm=25;
        gm=(double)kn/29.53*3.14159*360.0/180.0;
        for( tm=-dm;tm<=dm;tm++){
            l=Math.sqrt(dm*dm-tm*tm);
            if( gm>3.14159) l = -l;
            xx0= l-l*(1-Math.cos(gm));
            x1= wo+(int)l;
            y1= ho+tm;
            xx1=wo+(int)xx0;
            yy1=ho+tm;
            grf.setColor(Color.yellow);
            grf.drawLine(x1,y1,xx1,yy1);
        }
        if(kn==1) grf.drawString("新月",10,20);
        if(kn==3) grf.drawString("若月",10,20);
        if(kn==7) grf.drawString("弓張り月",10,20);
        if(kn==8) grf.drawString("上弦月",10,20);
        if(kn==14)grf.drawString("宵待ち月",10,20);
        if(kn==15&&km!=8)grf.drawString("もち月",10,20);
        if(kn==16)grf.drawString("いざよい月",10,20);
        if(kn==17)grf.drawString("立ち待ち月",10,20);
        if(kn==18)grf.drawString("居待ち月",10,20);
        if(kn==19)grf.drawString("臥し待ち月",10,20);
        if(kn==20)grf.drawString("更け待ち月",10,20);
        if(kn==21||kn==22)grf.drawString("有明月",10,20);
        if(kn==23||kn==24)grf.drawString("下弦月",10,20);
        if(kn==15&&km==8)grf.drawString("仲秋の名月",10,20);
        if(kn==13&&km==9)grf.drawString("十三夜",10,20);
        g.drawImage(offs,175,23,this);
        g.setColor(new Color(210,210,210));
        g.fillRect(2,23,26,10);
        g.fillRect(2,34,26,10);
        g.fillRect(115,23,26,10);
        g.fillRect(115,34,26,10);
        g.fillRect(142,23,28,21);
        g.setColor(new Color(0,0,0));
        g.drawString("+",12,33);
        g.drawString("-",13,44);
        g.drawString("+",124,33);
        g.drawString("-",125,44);
        g.drawString("O K",145,38);
        setCalendar(g);
        g.setColor(new Color(0,0,0));
        g.drawString("浮世絵暦(1900〜2020)　　　　　　　　program by K.Shindo",10,18);
        g.drawString("年号",8,203);
        g.drawString("年の干支",8,220);
        g.drawString("日の干支",8,237);
        g.drawString("星座",8,254);
        g.drawString("旧暦",8,271);
        g.drawString("六曜",8,288);
        g.drawString("祝日",8,305);
        show(g);
    }
    public void show(Graphics g){
        int p,u,z;
        int ye=(y+6)%10;
        int yt=(y+8)%12;
        long q=julius();
        int ne=((int)q+4)%10;
        int nt=((int)q+2)%12;
        g.setColor(new Color(255,210,120));
        g.fillRect(75,190,95,120);
        g.setColor(new Color(255,210,120));
        g.fillRect(75,195,95,115);
        p=(km+kn)%6;
        if(q<698189){z=0;u=y-1867;}
        else if(q<703450){z=1;u=y-1911;}
        else if(q<=726109){z=2;u=y-1925;}
        else              {z=3;u=y-1988;}
        g.setColor(new Color(0,0,0));
        g.drawString(ng[z]+"  "+Integer.toString(u)+" 年",85,204);
        g.drawString(ek[ye]+" "+tk[yt],85,220);
        g.drawString(ek[ne]+" "+tk[nt],85,237);
        g.drawString(sn[seiza()]+" 座",85,254);
        g.drawString(Integer.toString(km)+"月 "+Integer.toString(kn)
                                                            +"日",85,271);
        g.drawString(rk[p],85,288);
        syukujitu(g);
        sei=har=umi=kei=kok=aki=tai=0;
    }

    public void syukujitu(Graphics g){
        if(m==hurikaem && d==hurikaed && y>1972)
                            { syukujitu="振替え休日"; flag=true; }
        if(m==1 && d==1){
            if(y>1947){ syukujitu="元旦"; flag=true; }
            if(y<1948){ syukujitu="四方拝"; flag=true; }
        }
        if(m==1 && d==3 && y<1948){ syukujitu="元始祭"; flag=true; }
        if(m==1 && d==5 && y<1948){ syukujitu="新年宴会"; flag=true; }
        if(m==1 && d==sei && y>1947)  { syukujitu="成人の日"; flag=true; }
        if(m==2 && d==11){
            if(y>1965){syukujitu="建国記念日"; flag=true; }
            if(y<1966){syukujitu="紀元節"; flag=true; }
        }
        if(m==2 && d==24 && y==1989)  { syukujitu="昭和天皇大喪礼"; flag=true; }
        if(m==3 && d==har){
            if(y>1947){ syukujitu="春分の日"; flag=true; }
            if(y<1948){ syukujitu="春期皇霊祭"; flag=true; }
        }
        if(m==1 && d==3 && y<1948){ syukujitu="元始祭"; flag=true; }
        if(m==4 && d==3 && y<1948){ syukujitu="神武天皇祭"; flag=true; }
        if(m==4 && d==10 && y==1959) { syukujitu="皇太子結婚儀"; flag=true; }
        if(m==4 && d==29 && y>1926 && y<1948) { syukujitu="天長節"; flag=true; }
        if(m==4 && d==29 && y>1947 && y<1989)  { syukujitu="天皇誕生日"; flag=true; }
        if(m==4 && d==29 && y>1988) { syukujitu="昭和の日"; flag=true; }
        if(m==5 && d==3 && y>1947){ syukujitu="憲法記念日"; flag=true; }
        if(m==5 && d==4 && y>1984){ syukujitu="緑の日"; flag=true; }
        if(m==5 && d==5 && y>1947){ syukujitu="こどもの日"; flag=true; }
        if(m==6 && d==9 && y==1993){ syukujitu="皇太子結婚儀"; flag=true; }
        if(m==7 && d==20 && y>1994 && y<2003){ syukujitu="海の日"; flag=true; }
        if(m==7 && d==umi && y>2002)   { syukujitu="海の日"; flag=true; }
        if(m==9 && d==15 &&y>1995 && y<2003){ syukujitu="敬老の日"; flag=true; }
        if(m==9 && d==kei && y>2002)   { syukujitu="敬老の日"; flag=true; }
        if(m==10 && d==17 && y<1948){ syukujitu="神嘗祭"; flag=true; }
        if(m==10 && d==10 && y>1965 && y<2000) { syukujitu="体育の日"; flag=true; }
        if(m==10 && d==tai && y>1999) { syukujitu="体育の日"; flag=true; }
        if(m==9 && d==kok && y>2002)  { syukujitu="国民休日"; flag=true; }
        if(m==9 && d==aki){
            if(y>1947){ syukujitu="秋分の日"; flag=true; }
            if(y<1948){ syukujitu="秋期皇霊祭"; flag=true; }
        }
        if(m==11 && d==3){
            if(y>1947){ syukujitu="文化の日"; flag=true; }
            if(y<1948){ syukujitu="明治節"; flag=true; }
        }
        if(m==11 && d==23){
            if(y>1947)  { syukujitu="勤労感謝の日"; flag=true; }
            if(y>1926 && y<1948)  { syukujitu="新嘗祭"; flag=true; }
        }
        if(m==11 && d==12 && y==1990)  { syukujitu="即位礼正殿儀"; flag=true; }
        if(m==12 && d==23 && y>1988)  { syukujitu="天皇誕生日"; flag=true; }
        if(m==12 && d==25 && y>1927 && y<1948){ syukujitu="大正天皇祭"; flag=true; }
        g.setColor(new Color(200,0,0));
        if(flag) g.drawString(syukujitu,85,305);
        flag=false;
    }


    private void setCalendar(Graphics g){
        int i,c,l,dw,dh,dm,dn;
        flagg=false;//add
        hurikaem=0;//add
        hurikaed=0;//add
        g.drawString("日",8,58);
        g.drawString("月",32,58);
        g.drawString("火",56,58);
        g.drawString("水",80,58);
        g.drawString("木",104,58);
        g.drawString("金",128,58);
        g.drawString("土",152,58);
        g.setColor(new Color(255,180,180));
        g.fillRect(2,60,24,126);
        g.setColor(new Color(250,230,210));
        g.fillRect(26,60,120,126);
        g.setColor(new Color(185,185,255));
        g.fillRect(146,60,24,126);
        g.setColor(new Color(0,0,0));
        for(c=2;c<=170;c+=24)g.drawLine(c,60,c,186);
        for(l=60;l<=191;l+=21)g.drawLine(2,l,170,l);
        dn=(int)(julius()-d+1)%7;
        dm=days(m);
        for(i=1;i<=dm;i++){
            dw=10+((i+dn-1)*24)%168;
            if(dw==10 && m==5 && (i==3 || i==4 || i==5) && y>2007){/////add.
                flagg=true;
                flag=false;
            }
            dh=75+((i+dn-1)*24)/168*21;

            int h=holiday(m,i);
            if(h==1){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                if(y>1972){
                    if(dw==10 ){
                        if(!flagg){
                            g.fillRect(dw+24-7,dh-14,23,20);
                            hurikaem=m;
                            hurikaed=i+1;
                            flag=false;
                        }

                        if( flagg && m==5 && d==6){//add.
                            hurikaem=5;
                            hurikaed=6;
                        }
                    }

                }
                g.setColor(new Color(0,0,0));
            }
            if(m==1 && i==15 && y>1947 && y<2000){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                sei=15;
            }
            if(m==1 && (i+dn-1)%7==1 && i>7 && i<15 && y>1999){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                sei=i;
            }
            if(m==7 && i==20 && y>1994 && y<2003){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                umi=20;
            }
            if(m==7 && (i+dn-1)%7==1 && i>14 && i<22 && y>2002){
                 g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                umi=i;
            }
            if(m==9 && i==15 && y>1995 && y<2003){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                kei=15;
            }
            if(m==9 && (i+dn-1)%7==1 && i>14 && i<22 && y>2002){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                kei=i;
            }
            if(m==9 && (i+dn-1)%7==2 && i>15 && i<23 && y>2002 && kei+2==aki){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                kok=kei+1;
            }
            if(m==10 && i==10 && y>1965 && y<2000){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                tai=10;
            }
            if(m==10 && (i+dn-1)%7==1 && i>7 && i<15 && y>1999){
                g.setColor(new Color(255,180,180));
                g.fillRect(dw-7,dh-14,23,20);
                tai=i;
            }
            g.setColor(new Color(0,0,0));
            g.drawString(""+i,dw,dh);
            if(d==i){
                g.setColor(new Color(0,150,0));
                g.drawRect(dw-6,dh-13,20,17);
            }
        }
    }

    private int equinox(int m){
        int d=0;
        if(m==3)
            d=(int)(20.8431+0.242194*(y-1980)-(int)((y-1980)/4));
        if(m==9)
            d=(int)(23.2488+0.242194*(y-1980)-(int)((y-1980)/4));
        if(m==3)har=d;
        if(m==9)aki=d;
        return d;
    }
    private long jdate( ){
        int  md = 0;
        long ly=(long)y;
        for(int i=0;i<m;i++)
            md = md + days(i);
        long jd = (ly - 1) * 365 + (ly - 1) / 4 -
               (ly - 1) / 100 + (ly - 1) / 400 + md + d;
        return jd;
    }
    private int days(int m){
        int lep=0;
        if((y%4==0&&y%100!=0)||(y%400==0)) lep=1;
        mdays[0]=0;
        mdays[1]=31;
        mdays[2]=28+lep;
        mdays[3]=31;
        mdays[4]=30;
        mdays[5]=31;
        mdays[6]=30;
        mdays[7]=31;
        mdays[8]=31;
        mdays[9]=30;
        mdays[10]=31;
        mdays[11]=30;
        mdays[12]=31;
        return mdays[m];
    }
    private int holiday(int m,int d){
        int h=0;
        if(y>1947 && y<2000){
            if(m==1  && d==15)   h=1;
        }
        if(m==1 && d==1)    h=1;
        if(m==1 && d==3 && y<1948)    h=1;
        if(m==1 && d==5 && y<1948)    h=1;
        if(m==2 && d==11)   h=1;
        if(m==2 && d==24 && y==1989)    h=1;
        if(m==3)if(equinox(m)==d) h=1;
        if(m==4 && d==10 && y==1959)   h=1;
        if(m==4 && d==29 && y>1926)   h=1;
        if(m==4 && d==3 && y<1948)    h=1;
        if(m==5 && d==3 && y>1947)    h=1;
        if(y>1984)
            if(m==5 && d==4)    h=1;
            if(flagg && m==5 && d==6) h=1;//add.
        if(m==5 && d==5 && y>1947)    h=1;
        if(m==6 && d==9 && y==1993)    h=1;
        if(y>1994 && y<2003){
            if(m==7 && d==20)   h=1;
            if(m==9 && d==15)   h=1;
        }
        if(m==9)if(equinox(m)==d) h=1;
        if(y>1965 && y<2000){
            if(m==10  && d==10)   h=1;
        }
        if(m==10 && d==17 && y<1948)    h=1;
        if(m==11 && d==3 && y>1926)   h=1;
        if(m==11 && d==12 && y==1990)   h=1;
        if(m==11 && d==23)  h=1;
        if(m==12 && d==23 && y>1988)  h=1;
        if(m==12 && d==25 && y>1926 && y<1948)    h=1;
        return h;
    }
    private void YMDstr(){
        String nenn=Integer.toString(y);
        nnn.setText(nenn);
        String gatu=Integer.toString(m);
        gat.setText(gatu);
        ppii=Integer.toString(d);
    }
    private long julius(){
        int i,day=0;
        long ly,q;
        for(i=0;i<m;i++)
            day=day+days(i);
        ly=(long)y;
        q=(ly-1)*365+(ly-1)/4-
                       (ly-1)/100+(ly-1)/400+(long)day+d;
        return q;  /* ユリウス日は q+1731424.5 */
    }
    private void kyuureki(){
        int i,yy,iu,dc,db;
        yy=y-1900;
        for(i=1;i<=12;i++){
            if(m<=mk[yy][i]) break;
        }
        if (((m==2)||(m==3))&&(mk[yy][1]==1)&&(mk[yy][2]==3)){
            if (m==2){
                kn=31-dk[yy][1]+d+1;
                km=1;
                return;
            }
            if ((m==3)&&(d<dk[yy][2])){
                kn=31-dk[yy][1]+days(2)+d+1;
                 km=1;
                return;
            }
        }
        if(mk[yy][i]==mk[yy][i+1]){
            dc=dk[yy][i+1];
            db=dk[yy][i];
            if (d >= dc){
                kn=d-dc+1;
                km=i+1;
                return;
            }
            if( d < dc){
                if( d >= db){
                    km=i;
                    kn= d-db+1;
                    return;
                }
                if (d < db){
                    km= i-1;
                    kn=days(m-1)+d-dk[yy][i-1]+1;
                    return;
                }
            }
        }
        if ((mk[yy][13]!=0)&&(m==mk[yy][13])){
            for(iu=1;iu<=13;iu++){
                if((m-1)<=mk[yy][iu]){
                    break;
                }
            }
            if(d>=dk[yy][13]){
                km=iu;
                kn=d-dk[yy][13]+1;
                return;
            }
            if(d<dk[yy][13]){
                km=iu ;
                kn=days(m-1)-dk[yy][iu]+d+1;
                return;
            }
        }
        if ((mk[yy][13]!=0)&&(m==mk[yy][13]+1)){
            if(d>=dk[yy][i]){
                kn=d-dk[yy][i]+1;
                km=i;
                return;
            }
            if (d<dk[yy][i]){
                km=i-1;
                kn=days(mk[yy][13])-dk[yy][13]+d+1;
                return;
            }
        }
        dc= dk[yy][i];
        if (d>=dc){
            kn=d-dc+1;
            km=i;
        }
        if ((m==2)&&(i==1)&&(d<dc)){
            db=dk[yy-1][12];
            kn=31+d-db+1;
            km=12;
        }
        if((m==1)&&(mk[yy][1]==1)){
            if(d<dc){
                db=dk[yy-1][12];
                if(mk[yy-1][12]==1){
                        kn=d-db+1;
                }
                if((mk[yy-1][12]==12)){
                        kn=31+d-db+1;
                }
                km=12;
            }
            if(d>=dc){
                kn=d-dk[yy][1]+1;
                km=1;
            }
        }
        if((d<dc)&&(i!=1)){
                db=dk[yy][i-1];
                kn=days(m-1)+d-db+1;
                km=i-1;
        }
        if((m==1)&&(mk[yy][1]==2)){
            dc=dk[yy-1][12];
            if(d>=dc){
                kn=d-dc+1;
                km=12;
            }
            if(d<dc){
                db=dk[yy-1][11];
                kn=31+d-db+1;
                km=11;
            }
            return ;
        }
    }
    private int seiza(){
        double z[]=new double[4];
        double f[]=new double[4];
        double q[]=new double[4];
        double t1=(double)julius()-711857.4;
        t1=t1*(2.73791E-05+1.26013E-17*t1);
        double t2=t1*t1;
        double k1=0.917437;
        double k2=0.397881;
        double a1=0.0,a2,ff,cc,ss;
        double ec=0.0167301-4.192E-05*t1-1.3E-07*t2;
        double mo=-0.0361498+628.289*t1-2.86525E-06*t2;
        double pe=-1.26257+9.7864E-03*t1+2.55497E-06*t2;
        double nd=3.04414-4.21226E-03*t1+2.0847E-07*t2;
        double ic=2.27135E-04*t1-2.618E-07*t2;
        double ar=1.0;
        double r1=Math.sin(pe);
        double r2=Math.sin(nd);
        double r3=Math.sin(ic);
        double r4=Math.cos(pe);
        double r5=Math.cos(nd);
        double r6=Math.cos(ic);
        f[1]=r5*r4-r1*r2*r6;
        q[1]=-r5*r1-r4*r2*r6;
        f[2]=r1*r5*r6*k1+r4*r2*k1-r1*r3*k2;
        q[2]=r4*r5*r6*k1-r1*r2*k1-r4*r3*k2;
        f[3]=r1*r3*k1+r1*r5*r6*k2+r4*r2*k2;
        q[3]=r4*r3*k1+r4*r5*r6*k2-r1*r2*k2;
        mo=mo-2.0*3.14159*(int)(mo/2.0/3.14159);
        a1=0.0;
        do {
            a2=ec*Math.sin(a1+mo);
            a1=a2;
        } while (Math.abs(a2-a1) >1.0E-5);
        a1=a2+mo;
        ss=Math.sin(a1);
        ff=Math.cos(a1)-ec;
        for(int j=1;j<=3;j++){
            f[j]=ar*f[j];
            q[j]=ar*Math.sqrt(1.0-ec*ec)*q[j];
            z[j]=-ff*f[j]-ss*q[j];
        }
        cc=z[1];
        ss=z[2];
        double tw=Math.atan(ss/cc);
        if(cc<=0.0)      tw=tw+3.14159;
        else if(ss<=0.0) tw=tw+2.0*3.14159;
        cc=z[1]/Math.cos(tw);
        ss=z[3];
        double dc=Math.atan(ss/cc);
        ss=Math.sin(dc)*k2+Math.cos(dc)*Math.sin(tw)*k1;
        cc=Math.cos(dc)*Math.cos(tw);
        tw=Math.atan(ss/cc);
        if(cc<=0.0)      tw=tw+3.14159;
        else if(ss<=0.0) tw=tw+2.0*3.14159;
        tw=Math.atan(ss/cc);
        if(cc<=0.0)      tw=tw+3.14159;
        else if(ss<=0.0) tw=tw+2.0*3.14159;
        cc=cc/Math.cos(tw);
        double lp=tw;
        return (int)(lp*(6.0/3.14159));
    }

    public boolean mouseDown(Event e,int mx,int my){
        Graphics g=getGraphics();
        if(mx>2 &&  my>23 && mx<170 && my<45){
            if(mx>2 && my>23 && mx<29 && my<34){
                y+=1;
                d=1;
            }
            if(mx>2 && my>34 && mx<29 && my<45){
                y-=1;
                if(y<1900) y=1900;
            }
            if(mx>115 && my>23 && mx<142 && my<34){
                m+=1;
                if(m>12){
                    m=1;
                    y+=1;
                }
            }
            if(mx>115 && my>34 && mx<142 && my<45){
                m-=1;
                if(m< 1) {
                    m=12;
                    y-=1;
                }
            }
            if(mx>142 && my>23 && mx<170 && my<45){
                y=Integer.parseInt(nnn.getText());
                m=Integer.parseInt(gat.getText());
            }
        }
        if(mx>=2 && mx<=170 && my>=65 && my<=191){
            int px=mx,py=my,dtx,dty,dd;
            dtx=(px-2)/24;
            dty=(py-60)/21;
            dd=(dtx+1)+dty*7;
            d=dd-(int)(julius()-d+1)%7;
            q=julius();
            if(q<737791 && q>=693626) kyuureki();
            YMDstr();
            setCalendar(g);
            repaint();
        }
        String nenn=Integer.toString(y);
        nnn.setText(nenn);
        String gatu=Integer.toString(m);
        gat.setText(gatu);
        q=julius();
        if(q<737791 && q>=693626) kyuureki();
        setCalendar(g);
        repaint();
        return true;
    }

    public void kyureki_data(){
        // 恒星社厚生閣出版『こよみ便利帳』より
        // 1900    1月  2月  3月  4月  5月  6月  7月  8月  9月 10月 11月 12月  閏月
        kd[ 0] = " 131  3 1  331  429  528  627  726  825 1023 1122 1222  120  924 ";
        kd[ 1] = " 219  320  419  518  616  716  814  913 1012 1111 1211  110  0 0 ";
        kd[ 2] = " 2 8  310  4 8  5 8  6 6  7 5  8 4  9 2 10 2 1031 1130 1230  0 0 ";
        kd[ 3] = " 129  227  329  427  527  724  823  921 1021 1119 1219  118  625 ";
        kd[ 4] = " 216  317  416  515  614  713  811  910 10 9 11 8 12 7  1 6  0 0 ";
        kd[ 5] = " 2 4  3 6  4 5  5 5  6 3  7 3  8 1  830  929 1028 1127 1226  0 0 ";
        kd[ 6] = " 125  223  325  424  622  721  820  918 1018 1116 1216  114  523 ";
        kd[ 7] = " 213  314  413  512  611  711  8 9  9 8 10 7 11 6 12 5  1 4  0 0 ";
        kd[ 8] = " 2 2  3 3  4 1  5 1  530  629  728  827  926 1025 1124 1223  0 2 ";
        kd[ 9] = " 122  220  420  519  618  717  816  915 1014 1113 1213  111  322 ";
        // 1910
        kd[10] = " 210  311  410  5 9  6 7  7 7  8 5  9 4 10 3 11 2 12 2  1 1  0 0 ";
        kd[11] = " 130  3 1  330  429  528  626  824  922 1022 1121  119  1 7  726 ";
        kd[12] = " 218  319  417  517  615  714  813  911 1010 11 9 12 9  1 7  0 0 ";
        kd[13] = " 2 6  3 8  4 7  5 6  6 5  7 4  8 2  9 1  930 1029 1128 1227  0 0 ";
        kd[14] = " 126  225  327  425  525  723  821  920 1019 1118 1217  115  624 ";
        kd[15] = " 214  316  414  514  613  712  811  9 9 10 9 11 7 12 7  1 5  0 0 ";
        kd[16] = " 2 4  3 4  4 3  5 2  6 1  630  730  829  927 1027 1125 1225  0 0 ";
        kd[17] = " 123  222  421  521  619  719  818  916 1016 1115 1214  113  323 ";
        kd[18] = " 211  313  411  510  6 9  7 8  8 7  9 5 10 5 11 4 12 4  1 2  0 0 ";
        kd[19] = " 2 1  3 2  4 1  430  529  628  727  924 1024 1123 1222  121  826 ";
        // 1920
        kd[20] = " 220  320  419  518  616  716  814  912 1012 1111 1210  1 9  0 0 ";
        kd[21] = " 2 8  310  4 8  5 8  6 6  7 5  8 4  9 2 10 1 1031 1129 1229  0 0 ";
        kd[22] = " 128  227  328  427  527  724  823  921 1020 1119 1218  117  625 ";
        kd[23] = " 216  317  416  516  614  714  812  911 1010 11 9 12 8  1 6  0 0 ";
        kd[24] = " 2 5  3 6  4 4  5 4  6 2  7 2  8 1  830  929 1028 1127 1226  0 0 ";
        kd[25] = " 124  223  324  423  621  721  819  918 1018 1116 1216  114  523 ";
        kd[26] = " 213  314  412  512  610  710  8 8  9 7 10 7 11 5 12 5  1 4  0 0 ";
        kd[27] = " 2 2  3 4  4 2  5 1  531  629  729  827  926 1026 1124 1224  0 0 ";
        kd[28] = " 123  221  420  519  618  717  815  914 1014 1112 1212  111  322 ";
        kd[29] = " 210  311  410  5 9  6 7  7 7  8 5  9 3 10 3 11 1 12 1 1231  0 0 ";
        // 1930
        kd[30] = " 130  228  330  429  528  626  824  922 1022 1120 1220  119  726 ";
        kd[31] = " 217  319  418  518  616  715  814  912 1011 1110 12 9  1 8  0 0 ";
        kd[32] = " 2 6  3 7  4 6  5 6  6 4  7 4  8 2  9 1  930 1029 1128 1227  0 0 ";
        kd[33] = " 126  224  326  425  524  723  821  920 1019 1118 1217  115  623 ";
        kd[34] = " 214  315  414  513  612  712  810  9 9 10 9 11 7 12 7  1 5  0 0 ";
        kd[35] = " 2 4  3 5  4 3  5 3  6 1  7 1  730  829  928 1027 1126 1226  0 0 ";
        kd[36] = " 124  223  323  521  619  719  817  916 1015 1114 1214  113  421 ";
        kd[37] = " 211  313  411  510  6 9  7 8  8 6  9 5 10 4 11 3 12 3  1 2  0 0 ";
        kd[38] = " 131  3 2  4 1  430  529  628  727, 924 1023 1122 1222  120  825 ";
        kd[39] = " 219  321  420  519  617  717  815, 913 1013 1111 1211  1 9  0 0 ";
        // 1940
        kd[40] = " 2 8  3 9  4 8  5 7  6 6  7 5  8 4  9 2 10 1 1031 1129 1229  0 0 ";
        kd[41] = " 127  226  328  426  526  625  823  921 1020 1119 1218  117  724 ";
        kd[42] = " 215  317  415  515  614  713  812  911 1010 11 9 12 8  1 6  0 0 ";
        kd[43] = " 2 5  3 6  4 5  5 4  6 3  7 2  8 1  831  929 1029 1128 1227  0 0 ";
        kd[44] = " 126  224  324  423  621  720  819  917 1017 1116 1215  114  522 ";
        kd[45] = " 213  314  412  512  610  7 9  8 8  9 6 10 6 11 5 12 5  1 3  0 0 ";
        kd[46] = " 2 2  3 4  4 2  5 1  531  629  728  827  925 1025 1124 1223  0 0 ";
        kd[47] = " 122  221  421  520  619  718  816  915 1014 1113 1212  111  323 ";
        kd[48] = " 210  311  4 9  5 9  6 7  7 7  8 5  9 3 10 3 11 1 12 1 1230  0 0 ";
        kd[49] = " 129  228  330  428  528  626  726  922 1022 1120 1220  118  824 ";
        // 1950
        kd[50] = " 217  319  417  517  616  715  814  912 1011 1110,12 9  1 8  0 0 ";
        kd[51] = " 2 6  3 8  4 6  5 6  6 5  7 4  8 3  9 1 10 1 1030 1129 1228  0 0 ";
        kd[52] = " 127  225  326  424  524  722  821  919 1019 1117,1217  115  622 ";
        kd[53] = " 214  315  414  513  611  711  810  9 8 10 8 11 7 12 6  1 5  0 0 ";
        kd[54] = " 2 4  3 5  4 3  5 3  6 1  630  730  828  927 1027 1125 1225  0 0 ";
        kd[55] = " 124  223  324  522  620  719  818  916 1016 1114 1214  113  422 ";
        kd[56] = " 212  312  411  510  6 9  7 8  8 6  9 5 10 4 11 3 12 2  1 1  0 0 ";
        kd[57] = " 131  3 2  331  430  529  628  727  825 1023 1122 1221  120  924 ";
        kd[58] = " 219  320  419  519  617  717  815  913 1013 1111 1211  1 9  0 0 ";
        kd[59] = " 2 8  3 9  4 8  5 8  6 6  7 6  8 4  9 3 10 2 11 1 1130 1230  0 0 ";
        // 1960
        kd[60] = " 128  227  327  426  525  624  822  921 1020 1119 1218  117  724 ";
        kd[61] = " 215  317  415  515  613  713  811  910 1010 11 8 12 8  1 6  0 0 ";
        kd[62] = " 2 5  3 6  4 5  5 4  6 2  7 2  731  830  929 1028 1127 1227  0 0 ";
        kd[63] = " 125  224  325  424  621  721  819  918 1017 1116 1216  115  523 ";
        kd[64] = " 213  314  412  512  610  7 9  8 8  9 6 10 6 11 4 12 4  1 3  0 0 ";
        kd[65] = " 2 2  3 3  4 2  5 1  531  629  728  827  925 1024 1123  1223 0 0 ";
        kd[66] = " 122  220  322  520  619  718  816  915 1014 1112 1212  111  421 ";
        kd[67] = " 2 9  311  410  5 9  6 8  7 8  8 6  9 4 10 4 11 2 12 2 1231  0 0 ";
        kd[68] = " 130  228  329  428  527  626  725  922 1022 1120 1220  118  824 ";
        kd[69] = " 217  318  417  516  615  714  813  912 1011 1110 12 9  1 8  0 0 ";
        // 1970
        kd[70] = " 2 6  3 8  4 6  5 5  6 4  7 4  8 2  9 1  930 1030 1129 12 8  0 0 ";
        kd[71] = " 127  225  327  425  524  722  821  919 1019 1118 1218  116  623 ";
        kd[72] = " 215  315  414  513  611  711  8 9  9 8 10 7 11 6 12 6  1 5  0 0 ";
        kd[73] = " 2 3  3 5  4 3  5 3  6 1  630  730  828  926 1026 1125 1225  0 0 ";
        kd[74] = " 123  222  324  422  620  719  818  916 1015 1114 1214  112  522 ";
        kd[75] = " 211  313  412  511  610  7 9  8 7  9 6 10 5 11 3 12 3  1 1  0 0 ";
        kd[76] = " 131  3 1  331  429  529  627  727  825 1023 1122 1221  119  924 ";
        kd[77] = " 218  320  418  518  617  716  815  913 1013 1111 1211  1 9  0 0 ";
        kd[78] = " 2 7  3 9  4 8  5 7  6 6  7 5  8 4  9 3 10 2 11 1 1130 1230  0 0 ";
        kd[79] = " 128  227  328  426  526  624  823  921 1021 1120 1219  118  724 ";
        // 1980
        kd[80] = " 216  317  415  514  613  712  811  9 9 10 9 11 8 12 7  1 6  0 0 ";
        kd[81] = " 2 5  3 6  4 5  5 4  6 2  7 2  731  829  928 1028 1126 1226  0 0 ";
        kd[82] = " 125  224  325  424  621  721  819  917 1017 1116 1215  114  523 ";
        kd[83] = " 213  315  413  513  611  710  8 9  9 7 10 6 11 5 12 4  1 3  0 0 ";
        kd[84] = " 2 2  3 3  4 1  5 1  531  629  728  827  925 1024 1222  121 1123 ";
        kd[85] = " 220  321  420  520  618  718  816  915 1014 1112 1212  110  0 0 ";
        kd[86] = " 2 9  310  4 9  5 9  6 7  7 7  8 6  9 4 10 4 11 2 12 2 1231  0 0 ";
        kd[87] = " 129  228  329  428  528  626  824  923 1023 1121 1221  119  726 ";
        kd[88] = " 218  318  416  516  614  714  812  911 1011 11 9 12 9  1 8  0 0 ";
        kd[89] = " 2 6  3 8  4 6  5 5  6 4  7 3  8 2  831  930 1030 1128 1228  0 0 ";
        //1990
        kd[90] = " 127  225  327  425  524  722  820  919 1019 1117 1217  116  623 ";
        kd[91] = " 215  316  415  514  612  712  810  9 8 10 8 11 6 12 6  1 5  0 0 ";
        kd[92] = " 2 4  3 4  4 3  5 3  6 1  630  730  828  926 1026 1124 1224  0 0 ";
        kd[93] = " 123  221  323  521  620  719  818  916 1015 1114 1213  112  422 ";
        kd[94] = " 210  312  411  511  6 9  7 9  8 7  9 6 10 5 11 3 12 3  1 1  0 0 ";
        kd[95] = " 131  3 1  331  430  529  628  728  826 1024 1123 1222  120  925 ";
        kd[96] = " 219  319  418  517  616  716  814  913 1012 1111 1211  1 9  0 0 ";
        kd[97] = " 2 8  3 9  4 7  5 7  6 5  7 5  8 3  9 2 10 2 1031 1130 1230  0 0 ";
        kd[98] = " 128  227  328  426  526  723  822  921 1020 1119 1219  118  624 ";
        kd[99] = " 216  318  416  515  614  713  811  910 10 9 11 8 12 8  1 7  0 0 ";
        // 2000
        kd[100] = " 2 5  3 6  4 5  5 4  6 2  7 2  731  829  928 1027 1126 1226  0 0 ";
        kd[101] = " 124  223  325  424  621  721  819  917 1017 1115 1215  113  523 ";
        kd[102] = " 212  314  413  512  611  710  8 9  9 7 10 6 11 5 12 4  1 3  0 0 ";
        kd[103] = " 2 1  3 3  4 2  5 1  531  630  729  828  926 1025 1124 1223  0 0 ";
        kd[104] = " 122  220  419  519  618  717  816  914 1014 1112 1212  110  321 ";
        kd[105] = " 2 9  310  4 9  5 8  6 7  7 6  8 5  9 4 10 3 11 2 12 2 1231  0 0 ";
        kd[106] = " 129  228  329  428  527  626  725  922 1022 1121 1220  119  824 ";
        kd[107] = " 218  319  417  517  615  714  813  911 1011 1110 1210  1 8  0 0 ";
        kd[108] = " 2 7  3 8  4 6  5 5  6 4  7 3  8 1  831  929 1029 1128 1227  0 0 ";
        kd[109] = " 126  225  327  425  524  722  820  919 1018 1117 1216  115  623 ";
        // 2010
        kd[110] = " 214  316  414  514  612  712  810  9 8 10 8 11 6 12 6  1 4  0 0 ";
        kd[111] = " 2 3  3 5  4 3  5 3  6 2  7 1  731  829  927 1027 1125 1225  0 0 ";
        kd[112] = " 123  222  322  521  620  719  818  916 1015 1114 1213  112  421 ";
        kd[113] = " 210  312  410  510  6 9  7 8  8 7  9 5 10 5 11 3 12 3  1 1  0 0 ";
        kd[114] = " 131  3 1  331  429  529  627  727  825  924 1122 1222  120 1024 ";
        kd[115] = " 219  320  419  518  616  716  814  913 1013 1112 1211  110  0 0 ";
        kd[116] = " 2 8  3 9  4 7  5 7  6 5  7 4  8 3  9 1 10 1 1031 1129 1229  0 0 ";
        kd[117] = " 128  226  328  426  526  723  822  920 1020 1118 1218  117  624 ";
        kd[118] = " 216  317  416  515  614  713  811  910 10 9 11 8 12 7  1 6  0 0 ";
        kd[119] = " 2 5  3 7  4 5  5 5  6 3  7 3  8 1  830  929 1028 1127 1226  0 0 ";
        // 2020
        kd[120] = " 125  224  324  423  621  721  819  917 1017 1115 1215  113  523 ";
        int j,k;
        for(j=0;j<=120;j++){
            for(k=0;k<13;k++){
                mk[j][k+1] = Integer.parseInt(kd[j].substring( k*5 ,k*5+2).trim());
                dk[j][k+1] = Integer.parseInt(kd[j].substring( k*5+2,k*5+4).trim());
            }
        }
    }
}