数据库读取

#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 bgi "c:\bgi"
#define ppqq 30000
#define PI acos(-1.0)
#define HZK "c:\tc\hzk\hzk16"
long app=0,opple=0,Akm=0,sdibt=0;
int x=60,y=80;
char app1[123];
void cursor();/*被调函数的生命声明*/
void dispz();
void my_sound();
void load_pic();
void save_pic();
void input();
void newxy();
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 read_date(struct ranklist *student)/*数据库的读取及文本框的输入*/
{
    long n,i,j,m,p3,cpu,flag=0,lenth=0,k=0;
    char str[134],kk[123],arr[]= {"Please input your secret"},ch;
    double score;
    int kkp;
    char name[123];
    long start1,start2,start3,count=0,p1,p2,p4,start4;
    FILE *fp;
    int gmode,gdriver=DETECT;

    initgraph(&gdriver,&gmode,bgi);
    m=app;

    while(1)/*判断文件是否能打开*/
    {
        if(Akm==0)
        {
            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);

            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);
        }
        else
        {
            setcolor(15);
            outtextxy(110,135,app1);
            k=0;
            setcolor(0);
            rectangle(270,240,640,370);

            setfillstyle(1,0);
            floodfill(273,243,0);
        }
        Akm++;
        memset(app1,0,sizeof(app1));
        memset(str,0,sizeof(str));
        while(1)
        {

            key.key=bioskey(0);
            kkp=bioskey(2);
            ch=key.cmp[0];
            if((ch!=8&&ch!='
'&&(ch>='a'&&ch<='z')||((ch>='A'&&ch<='Z')&&(kkp&64||kkp&1||kkp&2))||(ch>='0'&&ch<='9'||ch=='.')||ch=='\'||ch==':'||ch=='_')&&strlen(str)<12)/*输入文本框时非法字符的限制*/
            {
                str[k++]=ch;
                str[k]='';

            }
            else if(ch==8)
            {
                if(k-1>=0)
                {
                    str[k-1]='';
                    k--;
                }
            }
            else if(ch=='
')
                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);
        if(strlen(app1)>=4&&app1[strlen(app1)-4]!='.')/*如果app1数组是否有.dbf,若无则加上.dbf*/
        {
            strcat(app1,".dbf");
            app1[strlen(app1)]='';
        }
        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);
            while(1)
            {
                cpu=getch();
                if(cpu=='1')
                    break;
                else if(cpu=='2')
                {
                    sdibt=2;
                    break;
                }
            }

            if(sdibt==2)
                return;

        }
        else break;
    }

    fclose(fp);
    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]='';
        j=0;
        for(i=0; i<p2; i++)
        {

            if(name[i]!=32)
                kk[j++]=name[i];
        }
        kk[j]='';
        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
",student[i].name,student[i].english,student[i].math,student[i].computer,student

               [i].sum);
    fclose(fp);
}
long Mouse_operate(long kk,long m,char dis[][100],int pos[],long *cmp)/*鼠标操作*/
{
    int buttons,sum=0,i;

    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<=165&&y>=435&&y<=455&&m)
        {
            setcolor(15);
            disphz(pos[0],437,dis[0],15,1);

            *cmp=0;
            if(buttons)
            {
                if(kk-3>=0)
                    return kk-3;
                return kk;
            }
        }
        else if(x>=260&&x<=325&&y>=435&&y<=455&&m)
        {
            setcolor(15);

            disphz(pos[1],437,dis[1],15,1);
            *cmp=1;

            *cmp=1;

            if(buttons)
            {
                if(kk+3<m)
                    return kk+3;
                return kk;
            }
        }
        else if(x>=420&&x<=485&&y>=435&&y<=455&&m)
        {
            setcolor(15);
            disphz(pos[2],437,dis[2],15,1);

            *cmp=2;
            if(buttons)
            {
                return -1;
            }
        }
        else if(x>=285&&x<=350&&y>=435&&y<=455&&m==0)
        {
            setcolor(15);
            disphz(285,440,"退出",15,1);


            *cmp=4;
            if(buttons)
                return -1;
        }
        else
        {
            if(*cmp==4)
                disphz(285,440,"退出",0,1);
            else
                disphz(pos[*cmp],437,dis[*cmp],0,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],p;
    long m,kk=0,l=6,n=0,cmp,num=0,flag=0,mmk=89;
    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,bgi);
    key.cmp[1]=2;
    while(1)
    {

        if(key.cmp[1]==1)
            break;
        k=50;
        q=10;
        l=6;
        if(mmk!=kk)
        {
            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]='';

            for(cmp=0; cmp<3; cmp++)
            {

                setfillstyle(1,4);
                if((kk==0&&cmp==0)||(cmp==1&&(kk+3>=app)))
                    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]);
            }

        }
        else
            cursor(x,y);

        opple=0;
        mmk=kk;
        p=x;
        q=y;
        cmp=1;
        kk=Mouse_operate(kk,m,dis,pos,&cmp) ;

        if(kk==-1||key.cmp[1]==1)/*如果键盘按到"esc",或者鼠标按退出键跳出循环*/
            break;
        n=3;
while(n--)
    delay(ppqq);
        if(opple==1)
            kk=keyboard(kk,m,1)  ;/*如果键盘有按键，则调用键盘*/
        if(mmk!=kk)
            cleardevice();

    }
    closegraph();
}
int keyboard(long kk,long  m,int k)/*键盘操作判断翻页问题*/
{
    key.key=bioskey(0);
    if((key.cmp[0]=='F'||key.cmp[0]=='f')&&k==1)
    {
        if(kk-3>=0)
            return kk-3;
        return kk;
    }
    else if((key.cmp[0]=='B'||key.cmp[0]=='b')&&k==1)/*k==1说明柱状图调用k==2则是饼状图调用*/
    {
        if(kk+3<m)
            return kk+3;
        return kk;
    }
    else if((key.cmp[0]=='x'||key.cmp[0]=='X')&&k==2)
    {

        return -2;
    }
    return kk;

}
void ask_rate(long hh[],long kk[],char rate[][123])/*将每个分数段的人数百分比转换成字符串*/
{
    long i,j,p,k,flag,s;

    for(i=0; i<5; i++)
    {
        s=hh[i];
        flag=0;
        k=1;
        while(s)
        {
            s/=10;
            flag++;
            k*=10;
        }
        k/=10;
        j=0;
        while(k)
        {
            if(j==flag-2)
                rate[i][j]='.';
            else
            {
                rate[i][j]=hh[i]/k+48;
                hh[i]-=k*(hh[i]/k);
                k/=10;
            }
            j++;
        }
        if(j>0)
        {
            rate[i][j]='%';

            rate[i][j+1]='';
        }
        else
            rate[i][j]='';

    }

}

void graph(struct ranklist *b)/*画圆饼图(包括图例及其百分比）*/
{
    int gmode,gdriver=DETECT,kmp,i,j;
    long kk[7]= {0},start=0,l=2,kkk=2,m=0,k=30,mmp=0;
    long hh[123],s,flag=0,kkp;
    char rate[123][123];
    char name[123][123];
    char dis[6][100];
    double x,y,death,x1,y1;
    initgraph(&gdriver,&gmode,bgi);
    cleardevice();
    strcpy(dis[4],"退出");
    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++)
    {
        setfillstyle(1,kkk++);
        bar(490,kmp,515,20+kmp);
        if(i==0)
            outtextxy(515,10+kmp,"0--60");
        if(i==1)
            outtextxy(515,10+kmp,"60--70");
        if(i==2)
            outtextxy(515,10+kmp,"70--80");
        if(i==3)
            outtextxy(515,10+kmp,"80--90");
        if(i==4)
            outtextxy(515,10+kmp,"90--100");
        kmp+=30;

    }
    for(i=0; i<5; i++)
    {
        hh[i]=10000*kk[i]*1.0/app;
    }
    ask_rate(&hh,&kk,rate);
    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);
        mmp=start+kk[i]*360/app;
        x1=(double)start;
        y1=(double)mmp;

        death=(x1+y1)/2.0;

        if(death>90&&death<=180)
            death=180.0-death,x1=(double)360-(double)(150)*cos(death/180*PI),y1=(double)240-(double)150*sin(death/180*PI),flag=2;

        else if(death>=180&&death<270)
            death-=180.0,x1=(double)360-(double)(150)*cos(death/180*PI),y1=(double)240+(double)150*sin(death/180*PI),flag=3;
        else  if(death>=270&&death<=360)
            death=(double)360-death,x1=(double)360+(double)(150)*cos(death/180*PI),y1=(double)240+(double)150*sin(death/180*PI),flag=4;
        else if(death<=90)
            x1=(double)360+(double)(150)*cos(death/180*PI),y1=(double)240-(double)150*sin(death/180*PI),flag=1;
        start+=kk[i]*360/app;
        outtextxy(x1,y1,rate[i]);


    }



    setfillstyle(1,4);
    bar3d(280,435,350,455,12,1);
    disphz(285,440,dis[4],0,1);
    setcolor(15);
    outtextxy(324,440,"(X)");
    while(1)
    {
        k=Mouse_operate(k,0,dis,hh,&i) ;

        if(k==-1)
            return;
        else
            k=keyboard(k,m,2);
        if(k==-2)
            return;
    }
    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!='')
    {
        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,bgi);
    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);
    getch();
    closegraph();
}
void backspace()/*最后一屏结束语*/
{
    settextstyle(1,0,9);
    setcolor(4);
    outtextxy(220,220,"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(0);

    }

    save_pic();
    for(i=0; i<280; i++)
    {
        load_pic(i);
         my_sound((i+1)%66);
        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(15000);
    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];
        if(l==0)
          f=500;
        music(f,times);
    }
    return 0;
}

int main()
{
    struct ranklist student[123];
    title();/*封面*/

    read_date(student);/*读数据库及文本框输入*/
    if(sdibt==0)
    {
        picture(student);/*画柱状图*/
        graph(student);/*画圆饼图*/
        introduce();/*动画*/
    }
    return 0;
}