cai.txt

BBS上淘来的一大堆C源代码

fh10(int r,int s1,int q1)
{    
    FILE *fp1,*fp2,*fp3;
    if((fp1=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f10","r"))==NULL){
        printf("对不起，你不是本软件的购买者，或你的数据库有缺损.\n");
        getch();
        exit(1);}
    fp2=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f10","r");
    fp3=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f10","a");    
    suan(r,fp1,fp2,fp3,s1,q1);
}
fh11(int r,int s1,int q1)
{    
    FILE *fp1,*fp2,*fp3;
    if((fp1=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f11","r"))==NULL){
        printf("对不起，你不是本软件的购买者，或你的数据库有缺损.\n");
        getch();
        exit(1);}
    fp2=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f11","r");
    fp3=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f11","a");    
    suan(r,fp1,fp2,fp3,s1,q1);
}
fh12(int r,int s1,int q1)
{    
    FILE *fp1,*fp2,*fp3;
    if((fp1=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f12","r"))==NULL){
        printf("对不起，你不是本软件的购买者，或你的数据库有缺损.\n");
        getch();
        exit(1);}
    fp2=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f12","r");
    fp3=fopen("c:\\WINDOWS\\Help\\Tours\\JIG软件\\六合彩\\f12","a");    
    suan(r,fp1,fp2,fp3,s1,q1);
}
suan(int r,int p,int f,int f1,int s1,int q1)
{
    FILE *fp1,*fp2,*fp3;
    int i,k,j,a[100];
    char b[200];

    fp1=p;fp2=f;fp3=f1;

    if(q1==0){fprintf(fp3,"%c%d",' ',s1);fclose(fp3);} /* q1=0说明数据库有问题*/
    if(q1==1){                                      /*  q1=1说明数据库没有问题 */
    j=0;
    fgets(b,200,fp1);
    for(k=0;k<200;k++){
        if(b[k]==0)break;
        if(b[k]==' ')j++;}
    fclose(fp1);
    for(i=0;i<(j+1);i++){
        fscanf(fp2,"%d",&a[i]);}
    fclose(fp2);
    lhc(r,a,j+1);} 
}    
lhc(int r1,int c[],int v)
{
    int i,j,k,n,l,h,z,t,x,y,r,m,e,s,o,g,q,t1,huan;
    int a[J],a2[4],b[I][J],d[16*17],f[J],w[49],u[49],p2[49];
    char p3[4],p4[4];
    o=g=q=0;

    window(6,15,75,22);
    for(i=15;i<24;i++){
        cprintf("                                                          ");}

    if((r1/10)==0){
        p3[0]=p3[1]=0;p3[2]=r1;}
    if(((r1/10)>0)&&((r1/10)<10)){
        p3[0]=0;p3[1]=(r1/10);p3[2]=(r1%10);}
    if((r1/10)>9){
        p3[0]=r1/100;p3[1]=(r1%100)/10;p3[2]=r1%10;}    
    p3[3]=':';

    for(r=0;r<2;r++){
        d[0]=(-1);n=l=t=h=0;x=1;z=16;
        
        if(r==0){ window(6,15,77,15); cprintf("请输入《地藏王送码》提供的⒋个数字：");}
        if(r==1){ window(6,16,77,16); cprintf("请输入《金鬼将军》提供的⒋个数字：");}

        for(i=0;i<4;i++){
         shide: a[i]=getch();
            switch(a[i])
            {
                case 48: a[i]=0; break;
                case 49: a[i]=1; break;
                case 50: a[i]=2; break;
                case 51: a[i]=3; break;
                case 52: a[i]=4; break;
                case 53: a[i]=5; break;
                case 54: a[i]=6; break;
                case 55: a[i]=7; break;
                case 56: a[i]=8; break;
                case 57: a[i]=9; break;
                default:  goto shide;
            }
            cprintf("%d ",a[i]);
            if(r==0){a2[i]=a[i];}    
                }

        for(i=0;i<4;i++){
            for(j=i+1;j<4;j++){
                if(a[i]>a[j]){
                    huan=a[i];a[i]=a[j];a[j]=huan;}
                      }
                }
            
        for(i=0;i<3;i++){
            a[i+4]=a[3]-a[i];
            a[i+10]=a[3]+a[i];}
        for(i=0;i<2;i++){
            a[i+7]=a[2]-a[i];
            a[i+13]=a[2]+a[i];}
        a[9]=a[1]-a[0];
        a[15]=a[1]+a[0];
        for(i=0;i<16;i++)
            for(j=0;j<16;j++){
                b[i][j]=a[i]*10+a[n];
                n++;
                if(n==16)
                n=0;}
        for(i=0;i<16;i++){
            if(a[i]>9){
            f[h]=a[i];
            h++;}}
        if(h>0){z++;
        for(i=0;i<16;i++){
            b[16][i]=f[t];
            t++;
            if(t==h)
            t=0;}}
        for(i=0;i<z;i++)
            for(j=0;j<16;j++){
                for(y=0;y<x;y++){
                    {if(b[i][j]!=d[y])l++;}
                    {if(l==x){d[x]=b[i][j];}}}
                {if(l==x)x++;}
                l=0;}    
        for(i=1;i<x;i++)
            for(k=0;k<v;k++){
                if(d[i]==c[k]){
                {if(r==0){w[o]=c[k];o++;}}
                {if(r==1){u[g]=c[k];g++;}}}}
        }
    m=0;
    for(e=0;e<o;e++){
        p2[e]=w[e];}
    t1=o;
    for(s=0;s<g;s++){
        for(e=0;e<o;e++){
            {if(u[s]!=w[e])m++;}
            {if(m==o){q++;p2[t1]=u[s];t1++;}}}
        m=0;}
    wenben(r1,p3,p2,a,a2,t1);
}    
wenben(int r1,char p3[],int p2[],int a[],int a2[],int t1)
{
    
    FILE *fp,*fp1,*fp2;
    int i,j,z,k,i1,jd;
    char b[400];
    int a4[200];

    j=jd=0;
    
    for(i=0;i<4;i++){
        for(i1=0;i1<t1;i1++){
            if(a[i]!=p2[i1])jd++;}
        if(jd==t1){
            t1++; p2[t1-1]=a[i];}
        jd=0;    
        }
    
    jd=0;
    for(i=0;i<4;i++){
        for(i1=0;i1<t1;i1++){
            if(a2[i]!=p2[i1])jd++;}
        if(jd==t1){
            t1++; p2[t1-1]=a2[i];}
        jd=0;    
        }