鼠标操作

#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<graphics.h>
#include<conio.h>
#include<math.h>
#include<dos.h>
#define S 16
#define HZK "c:\\hzk16"
long app=0,opple=0,Akm=0,sdibt=0;
int x=60,y=80;
char app1[123];
void newxy();
void cursor();
void dispz();
void my_sound();
void load_pic();
void save_pic();
void input();
void read_date();
long Mouse_operate();
void disphz();
int oi=0;
struct HEAD
{
    char  file_type;
    char  file_date[3];
    long   file_num;
    short file_width;
    short rec_width;
} head;
struct file
{
    char field_name[10];
    char field_type[2];
    long  field_start;
    char field_width;
    char field_dight;
} Fild;
struct ranklist
{
    char name[123];
    double english;
    double math;
    double    sum;
    double computer;
} p;
union input
{
    int key;
    char cmp[2];
} key;
int  cmp(const void *a,const void *b)
{
    struct ranklist *c=(struct ranklist *)a;
    struct ranklist *d=(struct ranklist *)b;
    if(c->sum==d->sum)
        return d->english-c->english;
    return d->sum-c->sum;
}
void input()
{
    int gmode,gdriver=DETECT;
    long lenth=0,flag=0,m,k=0;
    char str[112],arr[]= {"Please input your secret"},ch;
    initgraph(&gdriver,&gmode,"");
    cleardevice();
    setcolor(4);
    setcolor(15);
    bar(110,120,310,150);
    disphz(110,100,"请输入数据库文件名，回车键结束",15,1);
    disphz(110,180,"提示",15,1);
    setcolor(15);
    outtextxy(142,215,"1.");
    disphz(155,210,"可以带盘符和路径，如：",15,1);
    setcolor(15);
    outtextxy(380,215,"c:\\tc\\ss.dbf");
    setcolor(15);
    outtextxy(145,235,"2.dbf");
    disphz(185,230,"可省略",15,1);
    memset(app1,0,sizeof(app1));
    do
    {
        flag++;
        if(flag%2==0)
            setcolor(15);
        else
            setcolor(0);
        line(110+lenth*16,150,110+lenth*16+10,150);
        delay(200);
    }
    while(!kbhit());
    setcolor(15);
    line(110+lenth*16,150,110+lenth*16+10,150);
    while(1)
    {

        ch=getch();
        if(ch!=8&&ch!='\r')
        {
            str[k++]=ch;
            str[k]='\0';

        }
        else if(ch==8)
        {
            if(k-1>=0)
            {
                str[k-1]='\0';
                k--;
            }
        }
        else
            break;
        setcolor(15);
        settextstyle(0,0,2);
        outtextxy(110,135,app1);
        setcolor(0);
        settextstyle(0,0,2);
        outtextxy(110,135,str);
        strcpy(app1,str);
        setcolor(15);
        line(110+lenth*16,150,110+lenth*16+10,150);
        lenth=strlen(str);
        do
        {
            flag++;
            if(flag%2==0)
                setcolor(15);
            else
                setcolor(0);
            line(110+lenth*16,150,110+lenth*16+10,150);
            delay(200);
        }
        while(!kbhit());
    }
    strcpy(app1,str);
}
void read_date(struct ranklist *student)
{
    long n,i,j,m,p3,cpu;
    char str[134],kk[123];
    double score;
    char ch,name[123];
    long start1,start2,start3,count=0,p1,p2,p4,start4;
    FILE *fp;
    m=app;
    input();
    while(1)
    {
        if(strlen(app1)>=4&&app1[strlen(app1)-4]!='.')
        {
            strcat(app1,".dbf");
            app1[strlen(app1)]='\0';
        }
        if((fp=fopen(app1,"rb"))==NULL)
        {


            setcolor(1);
            rectangle(270,240,580,370);

            setfillstyle(1,1);
            floodfill(273,243,1);
            setcolor(15);
            outtextxy(290,300,"1.");
            disphz(275,245,"打不开文件，请选择以下两种方案",15,1);
            disphz(310,295,"如果想重新输入请按数字一",15,1);
            setcolor(15);
            outtextxy(290,320,"2.");
            disphz(310,315,"如果想退出请按数字二",15,1);
            cpu=getch();
            if(cpu=='1')
                input();
            else
                sdibt=2;
        }
        else
            break;
        if(sdibt==2)
            return;

    }
    fp=fopen(app1,"rb");
    fread(&head,12,1,fp);
    fseek(fp,20,1);
    for(i=0;; i++)
    {
        fread(&Fild,18,1,fp);
        if(strcmp(Fild.field_name,"数学")==0)
        {
            start2=Fild.field_start;
            p1=Fild.field_width;
            count++;
        }
        if(strcmp(Fild.field_name,"姓名")==0)
        {
            start1=Fild.field_start;
            count++;
            p2=Fild.field_width;
        }
        if(strcmp(Fild.field_name,"英语")==0)
        {
            start3=Fild.field_start;
            count++;
            p3=Fild.field_width;
        }
        if(strcmp(Fild.field_name,"计算机")==0)
        {
            start4=Fild.field_start;
            count++;
            p4=Fild.field_width;
        }
        if(count==4)
            break;
        fseek(fp,14,1);
    }
    fseek(fp,head.file_width,0);
    for(m=0; m<head.file_num; m++)
    {
        fseek(fp,head.file_width+m*head.rec_width,0);
        ch=fgetc(fp);
        if(ch=='*')
            continue;
        fseek(fp,head.file_width+m*head.rec_width+start1,0);
        for(j=0; j<p2; j++)
            name[j]=fgetc(fp);
        name[j]='\0';
j=0;
        for(i=0; i<p2; i++)
        {
         
if(name[i]!=32)
    kk[j++]=name[i];
        }
kk[j]='\0';
        strcpy(student[app].name,kk);
        score=0;
        fseek(fp,m*head.rec_width+head.file_width+start2,0);
        fgets(str,p1,fp);
        for(i=0; i<strlen(str); i++)
        {
            if(str[i]==' ')
                continue;
            if(str[i]!='.'&&str[i-1]!='.')
                score+=str[i]-48;
            if(str[i+1]!='.'&&str[i]!='.'&&str[i-1]!='.')
                score*=10;
            if(str[i-1]=='.')
            {
                score+=(str[i]-48)/10.0;
                break;
            }
        }
        student[app].math=score;
        fseek(fp,m*head.rec_width+head.file_width+start3,0);
        fgets(str,p3,fp);
        score=0;
        for(i=0; i<strlen(str); i++)
        {
            if(str[i]==' ')
                continue;
            if(str[i]!='.'&&str[i-1]!='.')
                score+=str[i]-48;
            if(str[i+1]!='.'&&str[i]!='.'&&str[i-1]!='.')
                score*=10;
            if(str[i-1]=='.')
            {
                score+=(str[i]-48)/10.0;
                break;
            }
        }
        student[app].english=score;
        fseek(fp,m*head.rec_width+head.file_width+start4,0);
        fgets(str,p4,fp);
        score=0;
        for(i=0; i<strlen(str); i++)
        {
            if(str[i]==' ')
                continue;
            if(str[i]!='.'&&str[i-1]!='.')
                score+=str[i]-48;
            if(str[i+1]!='.'&&str[i]!='.'&&str[i-1]!='.')
                score*=10;
            if(str[i-1]=='.')
            {
                score+=(str[i]-48)/10.0;
                break;
            }
        }
        student[app].computer=score;
        student[app].sum=student[app].english+student[app].math+student[app].computer;
        fseek(fp,head.file_width+m*head.rec_width,0);
        app++;
    }
    qsort(student,app,sizeof(student[0]),cmp);
    for(i=0; i<app; i++)
        printf("%s %.2lf %.2lf %.2lf %.2lf\n",student[i].name,student[i].english,student[i].math,student[i].computer,student

               [i].sum);
    fclose(fp);
}
long Mouse_operate(long kk,long m)
{
    int buttons,sum=0;
    char str[100];
    setwritemode(XOR_PUT);

    if(Akm==0)
    {
        init(2,638,8,477);
        x=320;
        y=240;
    }
    Akm=2;
    cursor(x,y);
    for(;;)
    {
        newxy(&x,&y,&buttons);
        if(kbhit())
        {
            opple++;
            return kk;
        }
        if(x>=100&&x<=150&&y>=435&&y<=455&&buttons&&m)
        {
            if(kk-3>=0)
                return kk-3;
            return kk;
        }
        else if(x>=260&&x<=310&&y>=435&&y<=455&&buttons&&m)
        {

            if(kk+3<m)
                return kk+3;
            return kk;
        }
        else if(x>=420&&x<=470&&y>=435&&y<=455&&buttons&&m)
        {

            return -1;
        }
        else if(x>=285&&x<=330&&y>=435&&y<=455&&buttons&&m==0)
            return -1;

    }

}
int init(int xmin,int xmax,int ymin,int ymax)
{
    union REGS regs;
    regs.x.ax=0;
    int86(51,&regs,&regs);
    if(regs.x.ax==0)
        return 0;
    regs.x.ax=7;
    regs.x.cx=xmin;
    regs.x.dx=xmax;
    int86(51,&regs,&regs);
    regs.x.ax=8;
    regs.x.cx=ymin;
    regs.x.dx=ymax;
    int86(51,&regs,&regs);
    return -1;
}
int read_mouse(int *mx,int *my,int *mbutton)
{
    union REGS regs;
    int x0=*mx,y0=*my,button0=*mbutton;
    int xnew,ynew;
    do
    {
        regs.x.ax=3;
        int86(0x33,&regs,&regs);
        xnew=regs.x.cx;
        ynew=regs.x.dx;
        *mbutton=regs.x.bx;
    }
    while(xnew==0&&ynew==y0&&*mbutton==button0);
    *mx=xnew;
    *my=ynew;
    switch(*mbutton)
    {
    case 0:
        return 0;
    case 1:
        return 1;
    case 2:
        return 2;
    case 3:
        return 3;
    default :
        return 4;
    }
}
void newxy(int *mx,int *my,int *mbutt)
{
    int ch,xx0=*mx,yy0=*my;
    int xm,ym;
    ch=read_mouse(&xm,&ym,mbutt);
    cursor(xx0,yy0);
    cursor(xm,ym);
    *mx=xm;
    *my=ym;

}
void cursor(int x,int y)
{
    int x1,x2,y1,y2,x3,y3,x4,y4,x5,y5,x6,y6,x7,y7,x8,y8;
    x1=x-15;
    y1=y+15;

    line(x,y,x1,y1);
    x2=x1+5;
    y2=y1+10;
    line(x1,y1,x2,y2);
    x3=x-2;
    y3=y+15;
    line(x2,y2,x3,y3);
    x4=x-2;
    y4=y+35;
    line(x3,y3,x4,y4);
   x5=x+15;
   y5=y+15;
   line(x,y,x5,y5);
   x6=x5-5;
   y6=y5+10;
   line(x5,y5,x6,y6);
   x7=x+2;
   y7=y+15;
   line(x6,y6,x7,y7);
    x8=x7;
    y8=y+35;
   line(x7,y7,x8,y8);
   line(x4,y4,x8,y8);
   }

void picture(struct ranklist b[])
{
    int i,j,gmode,gdriver=DETECT,q,kmp,a[3]= {9,8,6},k=30,pos[10];
    long m,kk=0,l=6,n=0,cmp,num=0,flag=0,mmk;
    char arr;
    char page[][77]= {"(F)","(B)","(Esc)"};
    char str[22][22]= {"10","20","30","40","50","60","70","80","90","100"},dis[3][100]= {"前页","后页","退出"};
    m=app;
    initgraph(&gdriver,&gmode,"");
    key.cmp[1]=2;
    while(1)
    {

        if(key.cmp[1]==1)
            break;
        k=50;
        q=10;
        l=6;

        line(25,10,25,405);
        line(20,15,25,10);
        line(30,15,25,10);
        line(25,403,550,403);
        line(540,399,550,403);
        line(540,407,550,403);
        outtextxy(15,15,"y");
        outtextxy(15,400,"o");
        outtextxy(560,400,"x");
        disphz(80,15,"学生成绩柱状图分布",4,2);
        for(i=0; i<=9; i++)
        {
            line(25,400-q*3,30,400-q*3);
            outtextxy(0,400-q*3,str[i]);
            q+=10;
        }
        kmp=0;
        for(i=0; i<3; i++)
        {
            setfillstyle(1,a[i]);
            bar(540,kmp,575,30+kmp);
            if(i==0)
                disphz(575,10+kmp,"英语",4,1);
            if(i==1)
                disphz(575,10+kmp,"数学",4,1);
            if(i==2)
                disphz(575,10+kmp,"计算机",4,1);
            kmp+=50;

        }
        flag++;
        for(i=0; i<3; i++)
        {
            if(i+kk>=m)
                break;

            disphz(k+60,405,b[i+kk].name,4,1);
            for(j=0; j<3; j++)
            {
                if(j==0)
                {
                    setfillstyle(1,9);
                    bar3d(k,400-b[i+kk].english*3,k+50,400,35,1);

                }
                else if(j==1)
                {
                    setfillstyle(1,8);
                    bar3d(k,400-b[i+kk].math*3,k+50,400,35,1);
                    if(flag==1)
                    {
                        pos[num]=k;
                        num++;
                    }
                }
                else
                {
                    setfillstyle(1,6);
                    bar3d(k,400-b[i+kk].computer*3,k+50,400,35,1);
                }
                k+=50;

            }
            k+=10;
        }
        pos[num]='\0';
        for(cmp=0; cmp<3; cmp++)
        {
            setfillstyle(1,4);
        if((kk==0&&cmp==0)||(cmp==1&&(kk==app-2)))
                setfillstyle(1,8);
            bar3d(pos[cmp],435,pos[cmp]+65,455,12,1);
            disphz(pos[cmp],437,dis[cmp],0,1);
            outtextxy(pos[cmp]+39,440,page[cmp]);
        }
        opple=0;mmk=kk;
        kk=Mouse_operate(kk,m);
        if(kk==-1||key.cmp[1]==1)
            break;
        n=3;

        while(n--)
        {
            delay(50000);
        }
        if(opple==1)
            kk=keyboard(kk,m)  ;
if(mmk!=kk)
        cleardevice();

    }
}
int keyboard(long kk,long  m)
{
    key.key=bioskey(0);
    if(key.cmp[0]=='F')
    {
        if(kk-3>=0)
            return kk-3;
        return kk;
    }
    else if(key.cmp[0]=='B')
    {
        if(kk+3<m)
            return kk+3;
        return kk;
    }
    return kk;

}
void graph(struct ranklist *b)
{
    int gmode,gdriver=DETECT,i,kmp,j,flag,p=0,kkp,hhh;
    long kk[7]= {0},start=0,l=2,kkk=2,m=0,k=30;
  int hh[12],s=0,s2=0;
    char name[123][123];
    initgraph(&gdriver,&gmode,"");
    cleardevice();
    disphz(28,15,"学生成绩饼状图分布",4,2);
    for(i=0; i<app; i++)
    {
        if(b[i].sum/3<=60)
            kk[0]++;
        else if(b[i].sum/3<=70)
            kk[1]++;
        else if(b[i].sum/3<=80)
            kk[2]++;
        else if(b[i].sum/3<=90)
            kk[3]++;
        else
            kk[4]++;
    }
    kmp=0;
 
    for(i=0; i<5; i++)
    {
        if(i==4)
            hh[i]=(1-s)*10000;
hh[i]=10000*kk[i]*1.0/app;
        s+=hh[i];
        setfillstyle(1,kkk++);
        bar(470,kmp,505,30+kmp);
        if(i==0)
            outtextxy(505,10+kmp,"0--60");
        if(i==1)
            outtextxy(505,10+kmp,"60--70");
        if(i==2)
            outtextxy(505,10+kmp,"70--80");
        if(i==3)
            outtextxy(505,10+kmp,"80--90");
        if(i==4)
            outtextxy(505,10+kmp,"90--100");
        kmp+=40;

    }
  for(i=0;i<5;i++){  
    j=0;
flag=0;hhh=1;
p=hh[i];kkp=p;
printf("%d\n",p);
getch();
 while(p)
    {

        if(p>0)
            flag++;
        p/=10;
        hhh*=10;

    }
    hhh/=10;
p=kkp; name[i][flag-2]='.';}
    
      /* while(hhh)
        {
            if(name[i][j]=='.')
            {
                j++;
            }
            name[i][j++]=p/hhh;
            hhh/=10;
            p/=10;
        }
    
name[i][j]='\0';
puts(name[i]);
getch();
}*/
    for(i=0; i<5; i++)
    {

        setfillstyle(1,l++);
        if(i==4)
            pieslice(360,240,start,360,100);
        else
            pieslice(360,240,start,start+kk[i]*360/app,100);
        start+=kk[i]*360/app;
s=start;
  s2=100*sin(s/2);
   
      
    }
    setfillstyle(1,4);
    bar3d(280,435,330,455,12,1);
    outtextxy(285,440,"Esc");
    k=Mouse_operate(k,m);
    if(k==-1)
        return;
    getch();
    cleardevice();
}
void disphz(int x,int y,char *p,int color,int m)
{
    int i,j,n,k;
    FILE *fp;
    char qh,wh;
    long offset;
    char buffer[S*S/8];
    char mask[]= {0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};
    if((fp=fopen(HZK,"rb"))==NULL)
        exit(0);
    while(*p!='\0')
    {
        qh=*p-0xa0;
        p++;
        wh=*p-0xa0;
        p++;
        offset=(94L*(qh-1)+wh-1)*S*S/8;
        fseek(fp,offset,0);
        fread(buffer,S*S/8,1,fp);
        for(i=0; i<S; i++)
        {
            for(j=0; j<S; j++)
            {
                if((buffer[S/8*i+j/8]&mask[j%8])!=0)
                    for(n=0; n<m; n++)
                        for(k=0; k<m; k++)
                            putpixel(x+j*m+n,y+i*m+k,color);
            }
        }
        x+=S*m+5;
    }
    fclose(fp);
    return;
}
void save_pic()
{
  FILE *fp;
int i;
char far *p;
long j;
fp=fopen("pic.dat","wb");
for(i=0;i<4;i++)
{
 outportb(0x3ce,4);
  outportb(0x3cf,i);
p=(char far*)0xa0000000L;
for(j=0;j<38400L;j++)
{ fputc(*p,fp);
   p++;
}
}
fclose(fp);
outportb(0x3cf,0);
}
void load_pic(int kk)
{
   FILE *fp;
int i,k=1;
char far *p;
long j;
fp=fopen("pic.dat","rb");
for(i=0;i<4;i++)
{
   outportb(0x3c4,2);
outportb(0x3c5,k);
p=(char far*)0xa0000000L-kk*80;
for(j=0;j<38400;j++)
{
     *p=getc(fp);
    p++;
}
k*=2;
}
fclose(fp);
outportb(0x3c5,0xcf);
}

void title()
{
    int i,n=0,k=0;
    int gmode,gdriver=DETECT;
    char ppq[][111]= {"1:","一","二"};
    char str[][123]= {"","程","序","设","计"},arr[][111]= {"程序功能","显示学生成绩分布图","显示各分数段圆饼图"};
initgraph(&gdriver,&gmode,"");
    cleardevice();
    setcolor(15);
    rectangle(130,180,500,400);
    setbkcolor(3);
    outtextxy(170,180,":");
    settextstyle(1,0,9);
    outtextxy(70,20,"c");
    for(i=1; i<=5; i++)
    {
        setcolor(1);
        circle(100+n,80,50);
        disphz(70+n,46,str[i-1],4,3);
        if(i<=3)
        {
            disphz(170,180+k,arr[i-1],4,1);
            setcolor(4);
            if(i>=2)
                disphz(145,180+k,ppq[i-1],4,1);
        }
        n+=120;
        k+=30;
    }
    disphz(210,320,"按任意键继续",15,2);
}
void backspace()
{
    settextstyle(1,0,9);
    setcolor(4);
    outtextxy(120,120,"The End");
    getch();
}
void introduce()
{
    int i,k=0,n=30,p=0,l=5,opp=0,kk=0;
    char str[][12]= {"首","先","感","谢","王","老","师","一","年","来","的","谆","谆","教","悔","和","辛","勤","的","付","出"};
    char  arr[][13]= {"本","程","序","是","于","二","零","一","八","年","六","月","一","号","独","立","设","计","完","成","的"};
char   bbq[][123]={"设","计","人","：","夏","令","富"};    
    cleardevice();


    for(i=0; i<49; i++)
    {

        if(i<21)
            disphz(220+k,240,str[i],4,1);
        else if(i>=21&&i<42)
            disphz(180+opp,260,arr[i%21],4,1),opp+=20;
        else
            disphz(320+kk,290,bbq[i-42],4,2),kk+=30;
        k+=20;
        my_sound(i+1);
     
    }

    save_pic();
    for(i=0; i<250; i++)
    {
        load_pic(i);
        cleardevice();
    }
    backspace();

}
void music(unsigned int freq,int times)
{
    int i;
    union
    {
        int divisor;
        char c[2];
    } count;
    char bits;
    count.divisor=1193180/freq;
    outportb(0x43,0xb6);
    outportb(0x42,count.c[0]);
    outportb(0x42,count.c[1]);
    bits=inportb(0x61);
    outportb(0x61,bits|3);
    for(i=0; i<times; i++)
        delay(25000);
    outport(0x61,bits&0xfc);
    outportb(0x61,bits);
}
void my_sound(int l)
{
    int freq[8]= {0,256,294,330,349,392,440,494};
    int song[]= {   8,8,5,5,3,6,5,3,
                    2,1,2,3,1,0,
                    3,1,3,3,1,
                    3,3,5,6,5,0,
                    6,6,6,5,4,4,4,
                    2,3,2,1,2,0,
                    3,1,0,3,1,0,
                    3,3,5,6,6,0,
                    8,5,5,6,3,
                    2,1,2,3,5,5,
                    8,5,5,6,3,
                    2,1,2,3,1,1


                };
    float div[]= {  8,8,8,8,8,8,8,8,
                    8,8,8,8,4,4,
                    4,4,8,8,4,
                    8,8,8,8,4,4,
                    8,8,8,8,8,8,4,
                    8,8,8,8,4,4,
                    4,8,8,4,8,8,
                    8,8,8,8,4,4,
                    4,8,8,4,4,
                    8,8,8,8,4,4,
                    4,8,8,4,4,
                    8,8,8,8,4,4

                 };
    unsigned int f;
    int times,i;
    for(i=l; i<l+1; i++)
    {
        if(song[i]<0)
            f=freq[-song[i]]/2;
        else if(song[i]>7)
            f=freq[song[i]%7]*2;
        else if(song[i]==0)
            f=100000000000000;
        else
            f=freq[song[i]];
        times=16/div[i];
        music(f,times);
    }
    return 0;
}

int main()
{
    struct ranklist student[123];
    title();
    getch();
    read_date(student);
    if(sdibt==0)
    {
        picture(student);
        graph(student);
        introduce();
    }
    return 0;
}